Einzelnen Beitrag anzeigen

Alex_ITA01

Registriert seit: 22. Sep 2003
1.115 Beiträge
 
Delphi 12 Athens
 
#1

Image toggeln lassen bei OnClick

  Alt 4. Nov 2004, 15:41
Hallo erstmal,
ich habe folgendes Problem:
Ich möchte beim Click auf ein Image, das "Picture" toggeln lassen.Also immer hin und her springen.
Das mache ich über die Tag-Eigenschaft damit ich keine zusätzliche Variable brauche.
Im FormCreate wird für beide Images das erste Picture aus der ImageList geladen aber im OnClick passiert nix...
Habt ihr eine Idee? Invalidate,Refresh und Repaint habe ich schon versucht.

MFG Alex


Delphi-Quellcode:
  if Image1.Tag = 0 then
  begin
    Image1.Tag := 1;
    ImageList1.GetBitmap(1,Image1.Picture.Bitmap);
  end
  else
  begin
    Image1.Tag := 0;
    ImageList1.GetBitmap(0,Image1.Picture.Bitmap);
  end;
Let's fetz sprach der Frosch und sprang in den Mixer
  Mit Zitat antworten Zitat