Ressourcenbild flackert

[Johannes013]

Hallo Leute, :)

ich habe drei Bitmaps in einer DLL abgelegt und mir daraus einen Button gebastelt.
Das Problem:

Wenn ich auf dem Hintergrundbild bin, fängt das Bild an zu flackern. Hat das was mit meinem OnMouseMove zu tun?

Delphi-Quellcode:

procedure TPMain.PBackMouseMove(Sender: TObject; Shift: TShiftState; X,Y: Integer);
begin
   if PWU1Ok.Picture.Bitmap<>GetBmpFunc('Pegasus.dll','OkNormal') then BitmapButton(PWU1OK,'Pegasus.dll','OkActive','OkHover','OkNormal','NORMAL');
end;

GetBMPFunc und BitmapButton sind selbstgeschrieben ( s. Anhang)
Was sollte ich ändern?

mfg Johannes013

[DeddyH]

Merk Dir einfach, welches Bild gerade angezeigt wird. Im Moment erzeugst Du immer wieder ein neues Bitmap, was Dir ruckzuck den Speicher zumüllt. Außerdem vergleichst Du hier Instanzen, d.h. die sind immer unterschiedlich, auch wenn das Bild dasselbe ist.

[Johannes013]

:wiejetzt: Wie kann ich denn die Bilder direkt vergleichen?

[DeddyH]

Du weißt doch, welches Bild aktuell geladen ist (solltest Du zumindest). Das merkst Du Dir einfach in einem privaten Feld und kannst dann damit vergleichen.