Entwickler-Ecke

Multimedia / Grafik - Bilder überblenden


fcg - Do 22.05.03 16:58
Titel: Bilder überblenden
hi @ all

Wie kann ich sowas anstelen. Habe Zwei Image Komponenten, und nach einer bestimmten Zeit, soll das Zweite Image von Links über das Erste 'reingeflogen' kommen sich langsam über das erste einblenden.

Habe leider momentan kein Plan wie ichs anstellen soll.

thÄnXx

fcg


Aya - Sa 24.05.03 14:45

Hi,

das simpelste wäre wohl einfach 2 Timer zu benutzen.
Timer 1 aktiviert nach z.B. 10sek Timer 2, welcher im 100ms takt Image2 über Image1 schiebt :)

So in etwa:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
//Timer 1:
procedure TForm1.Timer1OnTimer(Sender: TObject);
begin
  Timer2.Enabled:=true;
  Timer1.Enabled:=false;
end;

//Timer 2:
procedure TForm1.Timer2OnTimer(Sender: TObject);
begin
  Image2.Left:=Image2.Left+5;
end;


Au'revoir,
Aya~