Zitat von
Klaus01:
Delphi-Quellcode:
function IEListAllCookieNames:TStrings;
var
temp: String;
i: integer;
begin
FindAllFiles(temp, IECookiePath, '*.txt', true);
for i:=0 to temp.Count-1 do
begin
Delete(temp.strings[i],0 , pos(temp.strings[i],'@'));
end;
Result:=temp;
end;
Vielleicht tut es ja so?
Wnn Du allerdings diese Funktion genommen hast ->
http://www.delphipraxis.net/internal...=392510#392510
Dann mußt Du eine TStringList nehmen.
Grüße
Klaus
[edit] Ergänzung TStringList [/edit]
FindAllFiles will TStrings als ersten Parameter haben. Klappt also nicht. Außerdem kann ich ja nicht mehrere Strings in einen String schieben...