Registriert seit: 6. Nov 2009
493 Beiträge
FreePascal / Lazarus
|
AW: Image from Stream laden?
3. Mär 2013, 21:47
Delphi-Quellcode:
if tb.FieldAsBlob(tb.FieldIndex['picture']) <> nil then
begin
// ms := TMemoryStream.Create; NEIN! Speicherleck!
ms := tb.FieldAsBlob(tb.FieldIndex['picture']);
ms.Position := 0;
DetailsMediaImage.Picture.LoadFromStream(ms);
end
else
DetailsMediaImage.Picture.LoadFromFile(ExtractFilePath(ParamStr(0)) + 'books.jpg');
Sag ma wieso wird da Speicherleck erzeugt?
|