Zitat von
Unplugged:
Source der update.dll
Delphi-Quellcode:
library update;
.
.
function GetVersion(
url: PChar; ListBox1: TListBox): TDownload;
stdcall;
overload;
Var
.
.
begin
daten.url :=
String(
url);
web := TIdHTTP.Create(
nil);
.
.
try
daten.count := StrToInt(temp);
except
ShowMessage('
Die Updatepage enthält Fehler');
Exit;
end;
.
.
web.Free;
.
end;
.
.
begin
end.
Hallo.
Ich hatte bei meiner Ligaverwaltung das gleiche Problem. TEILWEISE lag es wohl daran, daß ich zB
diverse CREATE's nicht freigab.
Hier sehe ich zB in der GetVersion ein web.create mit einem EXIT ohne "web.free".
Bei mir haben die FREE's geholfen ...
mfG aus Wien,
Alex