HBITMAP nach TBitmap

[KodeZwerg]

Ja ich lösch hBmp, myBitmap bleibt bestehen bzw wird immer ersetzt mit letztem hBmp.

edit
Ohhh ---> Bevor ich es verwende/zuweise
Das trifft zu!

Also in einer Function erstelle/lege kopie an (myBitmap)/lösche ich das HBITMAP
Erst ausserhalb, nach dieser Funktion, rufe ich myBitmap zum Anzeigen auf.
Sollte ich das ändern?

[EWeiss]

Zitat:

Ohhh ---> Bevor ich es verwende/zuweise
Das trifft zu!

Nun ja dann ist es weg.

gruss

[KodeZwerg]

Würde ein einmaliges Anzeigen von MyBitmap genügen damit Delphi sich den Inhalt merkt oder ist das Handle zu überreichen für mein Vorhaben eine Schlechte Wahl bzw erst HBITMAP frei geben wenn Programm beendet wird?

[EWeiss]

Zitat von KodeZwerg:

Würde ein einmaliges Anzeigen von MyBitmap genügen damit Delphi sich den Inhalt merkt oder ist das Handle zu überreichen für mein Vorhaben eine Schlechte Wahl bzw erst HBITMAP frei geben wenn Programm beendet wird?

Erstelle eine function die ein HBitmap zurück gibt.
Dieses weist du dann deinem TBitmap zu.

wenn MyBitmap das Handle hat dann behält es dieses solange bis du MyBitmap.free aufrufst.

Zitat:

HBITMAP frei geben wenn Programm beendet wird

Das darfst du nicht löschen es wird später mit MyBitmap.free freigegeben.
Es bleibt also so lange im Speicher bis MyBitmap es frei gibt.

gruss

[EWeiss]

Beispiele aus meinem Clock projekt. Copy\Paste

Delphi-Quellcode:

  hbmReturn := LoadSourceImage('Data\' + LastClock + '\Minute.png'); //<<<<< hbmReturn = HBitmap
  if hbmReturn <> 0 then
  begin
    MinBitmap := TBitmap.Create;
    MinBitmap.Handle := hbmReturn; //<<<<< So ist richtig, MinBitmap ist nun der Eigentümer von hbmReturn du darfst hbmReturn nicht löschen
  end;

  hbmReturn := LoadSourceImage('Data\' + LastClock + '\Hour.png'); //<<<<<< hbmReturn = HBitmap
  if hbmReturn <> 0 then
  begin
    HourBitmap := TBitmap.Create;
    HourBitmap.Handle := hbmReturn; //<<<<< HourBitmap ist nun der Eigentümer von hbmReturn du darfst hbmReturn nicht löschen
  end;

Hoffe das hilft.

Das löschen der Handles übernimmt später das jeweilige Bitmap in dem fall
MinBitmap.free; \ FreeAndNil(MinBitmap)
HourBitmap.free; \ FreeAndNil(HourBitmap)

gruss

[KodeZwerg]

Zitat von EWeiss:

Erstelle eine function die ein HBitmap zurück gibt.

Ja das sieht gut aus, da wäre ich nicht drauf gekommen, Danke!
DeleteObject(das_HBitmap_Result) nachdem ich es zugewiesen habe, wird erledigt!

Pseodo code um es zu verdeutlichen

Delphi-Quellcode:

var
 myBitmap: TBitmap;

   myBitmap:= TBitmap.Create; // <- das ist in FormCreate, nur damit man es hier sieht, ein Free ist im FormClose

function x : hbitmap;
 begin
   result := ein_HBitmap;
   DeleteObject(ein_HBitmap)
 end;

procedure y;
 das_HBitmap_Result: HBITMAP; 
 begin
   das_HBitmap_Result := x;
   myBitmap.Canvas.Handle := das_HBitmap_Result;
   // ab hier ist myBitmap gefüllt und ich kann....
   DeleteObject(das_HBitmap_Result);
   // ....das Handle freigeben, Richtig?
 end;

edit
Ic habe Deinen Nachtrag gelesen, DeleteObject() weglassen und nur über .Free freigeben, okay, Danke Dir!!

[EWeiss]

Zitat:

DeleteObject(das_HBitmap_Result);
// ....das Handle freigeben, Richtig?

Nein denn dann siehst du nichts mehr das Handle ist dann ungültig.
Du darfst es nicht löschen.

Nach der Übergabe bist du nicht mehr der Eigentümer des Handles es muss dann vom Object freigegeben werden welches es erhalten hat.

Delphi-Quellcode:

var
  myBitmap: TBitmap;

    myBitmap:= TBitmap.Create; // <- das ist in FormCreate, nur damit man es hier sieht, ein Free ist im FormClose

function x : hbitmap;
  begin
    result := ein_HBitmap;
    // DeleteObject(ein_HBitmap) // <<<<< nix löschen
  end;

procedure y;
begin
  myBitmap.Handle := x; // <<<<<< canvas.handle war falsch das ist das DC.. 
  // <<<< ab hier ist myBitmap gefüllt und du darfst das Handle nicht löschen
end;

gruss

[KodeZwerg]

Yo, hatte auch nochmal Nachtrag nachgetragen das ichs nun Verstanden habe nur Deinen Nachtrag zu spät gelesen.
Dankschön mein Problem wird wohl gelöst sein, ja ich hatte immer brav DeleteObject(), das war an dieser Stelle mein Fehler.
Da dachte ich in Post #1 sehr quer da ich mir ein Backup vom Bild versucht habe anzulegen wo Handle dann unabhängig ist.