Image from Stream laden?

[Sir Rufo]

Zitat von OrNEC:

Zitat von NamenLozer:

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?

Ich will es mal mit einem Beispiel aus der Realität veranschaulichen:

Code:

Ich leihe mir ein Auto vom Autoverleiher
Mit dem Auto vom Chef mache ich meine Besorgungen

Wenn du das jetzt öfters machst, dann hast du den Hof voller gemieteter Wagen stehen und musst dir auch noch die Frage gefallen lassen, warum du die überhaupt angemietet hast.

Ok, versuchen wir es mal anders

Code:

Ich leihe mir ein Auto vom Autoverleiher
Mit dem Auto vom Chef mache ich meine Besorgungen
Dieses Auto gebe ich bei dem Autoverleiher wieder ab

MÖÖÖÖP - Der Verleiher schaut mich ungläubig an und der Chef ist kurz vor der Kernschmelze, es ist sein Auto

Also

• entweder ich leihe mir das Auto vom Verleiher, benutze es und gebe auch dieses geliehene Auto wieder ab
• oder ich nehme das Auto vom Chef (weil es da ist und keine Leihgebühren kostet)

[Namenloser]

Klasse Beispiel

[Perlsau]

Zitat von NamenLozer:

Klasse Beispiel

Dem schließe ich mich an: Sehr anschaulich, Sir Rufo. Vielleicht hat OrNEC jetzt verstanden, daß er mit dieser Zeile ms := tb.FieldAsBlob(tb.FieldIndex['picture']); einen zweiten Memorystream erzeugt. Denn das schien hauptsächlich sein Problem zu sein, wie ich das zu verstehen glaube.