Habs mal so gemacht, funktionieren tuts immer noch genauso wie am Anfang!
NUR leider ist das Memoryleak immer noch vorhanden.
Kann man ja Wunderbar in der Ausgabe sehen. Der Timer steht auf 250ms.
Speicher beim Start: ca 7700K
Nach 1 Min : ca. 16000K
Nach 2 Min : ca. 30000K
So nach einigen Minuten 80000K
Das sieht nich gut aus!
wtf wenn ich das mal so sagen darf
Achja, aus dem Liste.Append hab ich Liste.add gemacht.
Der Aufruf erfolgt so :
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Memo1.Clear;
getWMIProcess(Memo1.Lines);
end;