FireMonkey

[Peter666]

Hi,

ich hab hier ein Problem mit dem Verständniss. Ich möchte gerne ein Bitmap Button erstellen, dass wie folgt angezeigt wird. Das Bitmap besteht aus 5 einzelnen untereinander gezeichneten Bildern in der Reihenfolge: Deaktiviert, Normal, Hoover, Gedrückt, Gedrückt Hoover.
Es läuft wohl auf folgendes hinaus: Ich würde der Übersichtlichkeit ein abgeleitetes TImage (anstelle von TButton) nehmen und der Klasse eine TBitmapAnimation zuweisen die je nach Zustandsänderung ein Start bzw. Endvalue gezeichnet bekommt. Hat jemand vielleicht eine bessere Idee? Irgendwie gibts etwas derartiges nicht und naja mein Bauchgefühl sagt mir das das wie ich mir es vorstelle nicht wirklich sinnvoll ist.

Das heisst es wird wohl so etwas:

Code:

var
  w, h: single;
begin
  w := FButton.Width;
  h := FButton.Height / 5;
  with BitmapAnimation do
  begin
    StartValue.Canvas.BeginScene;
    StartValue.Canvas.DrawBitmap(FButton, RectF(0, 0, w, h),
      RectF(0, 0, w, h), 1);
    StartValue.Canvas.EndScene;
    StartValue.BitmapChanged;
    StopValue.Canvas.BeginScene;
    StopValue.Canvas.DrawBitmap(FButton, RectF(0, 2 * h, w, 2 * h + h),
      RectF(0, 0, w, h), 1);
    StopValue.Canvas.EndScene;
    StopValue.BitmapChanged;
  end;

Wie bekomme ich nun die Bitmapanimation dazu besagte Animation auszuführen? Ich habs mit StartAnimation() probiert, aber da tut sich irgendwie nichts

Peter