Also, er spuckt mir keinen Fehler aus, aber das Speicherproblem ist nach wie vor!
Wenn ich einmal auf die Datei klicke ist alles OK, nicht aber beim zweiten mal.
Das Programm schießt von 9 MB kurzzeitig auf über 600 MB! - Das System zeigt mir
dann, dass es 1000 MB zugesicherten Speicher verwendet.
Hier der derzeitige Code:
Delphi-Quellcode:
procedure TForm1.FLISTClick(Sender: TObject);
begin
if Assigned(memstr) then
begin
memstr.LoadFromFile(STV1.Path + '\' + FList.Items.Strings[FList.ItemIndex])
end
else
begin
memstr := TMemoryStream.Create;
memstr.LoadFromFile(STV1.Path + '\' + FList.Items.Strings[FList.ItemIndex]);
end;
Was ist das? Das ist doch wirklich zum
Danke!
[edit=Christian Seehase]Delphi-Tags gesetzt. Bitte künftig selber machen. Danke. Mfg, Christian Seehase[/edit]