Hi,
ich habe mir folgende Funktion gebastelt:
Delphi-Quellcode:
function IEListAllCookieNames:TStrings;
var
temp: TStrings;
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;
FindAllFiles ist eine Dateisuch-Prozedur von Sakura/Luckie (
http://www.delphipraxis.net/internal...t=findallfiles). IECookiePath ist eine Konstante und enthält eine Pfadangabe (Bsp.: C:\bla\dir\). In der Zeile mit Delete versuche ich alles was vor dem @ ( AT ) im Dateinamen steht zu entfernen. Jedoch meldet der Compiler mir genau in dieser Zeile folgende Fehlermeldung und der Cursor bleibt am Ende der Zeil stehen.
Code:
[Fehler] Unit1.pas(90): Konstantenobjekt kann nicht als Var-Parameter weitergegeben werden
Ich habe schon in der Delphi-Hilfe nach diesen Compiler-Fehler gesucht, da steht aber nur: Dies ist eine reservierte Compilermeldung!
Ich komm einfach nicht drauf. Weiß jemand wo der Fehler liegt? Wenn ich mir die Fehlermeldung so anschaue denke ich das es etwas mit der Konstante "IECookiePath" zu tun hat, weiß aber nicht warum...