Jak mozna usunac katalog z menu start w ktorym sa skroty. Probowalem usunac wszystkie skroty ale jakos sie nie dalo ;( . Prosze nie odsylajcie mnie do faq bo juz probowalem tamtego sposobu i nie chcial dzialac ;( --pozdrawiam PEDROS {hello}
Delphi6
0
0
- jak coś to musisz dodac manualnie niektóre pliki do uses (ja bym wolał żebys nie pisął pliki : tfilelistbox tylko sam umiescił ten komponęt na formatce)
var
pliki : TFilelistbox;
i : integer;
begin
end;
pliki := tfilelistbox.create(self); piszę z pamięci wiec moze nie zadzialac
pliki.parent := nil; -||-
pliki.mask :='*.lnk';
pliki.directory := 'C:\windows\menu start\programy';
for i:=0 to pliki.items.count do *tylko nie dawaj count - 1 !!!!!!
begin
deletefile(pliki.directory+'\'+pliki.items[i]);
end;
pliki.free;
end;
Jak nie działa to daj znać
0
Dzieki za odpowiedz. Nie zrobilem tego dokladnie jak napisales ale dzieki tobie wpadlem na pomysl jak to zrobic :-) --pozdrawiam PEDROS {hello}
Delphi6