Willkommen ~Gast!
Registrieren || Einloggen || Hilfe/FAQ || Staff
Probleme mit der Registrierung im Forum? Melde dich unter registerEin Bild.
Autor Beitrag
000
20.11.2001, 18:44
shenZi



Ich möchte das ein bestimmtes ereignis (z.B. objekt.top:=objekt.top-10) nach einer bestimmten zeit passiert und das immer und immer wieder also das z.B. sich ein objekt im viereck bewegt. das geht denk ich mal irgendwie mit dem timer ich kenne aber die befehle nicht

--

..::Follow the rabbit ::..


Dieser Beitrag wurde am 20.11.2001 um 18:44 von shenZi bearbeitet.
zum Seitenanfang zum Seitenende Profil || Suche
001
20.11.2001, 19:15
Retro



Der Timer ist genau das wonach du suchst! Er löst ein Ereignis (Timer) immer wieder nach der eingestellten Zeit aus, solange er auf Active steht.

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Object.Top := Object.Top - 10;
end;

so, mehr nicht!
Aber wie schon im letzen Post gesagt ;) versuch lieber mal richtig Delphi zu lernen... is net bös gemeint, nur so hast dus doch auch viel einfacher und kriegst mal nen bissel Durchblick in D.

Schaff dir mal nen vernünftiges Buch an, z.B. "Delphi 5 - Das Standartwerk" von "Addison-Wesley" an. Das liegt selbst bei mir hier rum, und wenn mal schnell ne Frage offen bleibt wird ins Inhaltsverzeichnis geguckt und fertig is ;)

Auch die Onlinehilfe von Delphi selber is sehr umfangreich, solange man nur mal schnell was in Erfahrung bringen will.

Aber trotzdem lass dich net vom Fragen stellen abhalten, nur besser man lernt etwas richtig, als nur so 3/4.

--

shielding people from their own stupidity is an evolutionary step backwards anyway.

/* God is dead!............Nietzsche */
/* Nietzsche is dead!......God */
/* Nietzsche is God!.......The Dead */

zum Seitenanfang zum Seitenende Profil || Suche
002
20.11.2001, 21:13
Another1



jep Online Hilfe von Delphi is sehr schön.

--

Another1

...relaxing..atm =)
... und Schweiz suckt!

zum Seitenanfang zum Seitenende Profil || Suche
003
21.11.2001, 11:49
shenZi



ich hatte sowieso vor mir bald ein gutes delphi buch zuzulegen.
vielleicht werd ich dann mal so ein gott wie retro ;)
wie man ein objekt bewegt mit einem gewissem intervall war mir schon klar, aber ich wollte das ein objekt sich im viereck bewegt

--

..::Follow the rabbit ::..


Dieser Beitrag wurde am 21.11.2001 um 11:49 von shenZi bearbeitet.
zum Seitenanfang zum Seitenende Profil || Suche
004
21.11.2001, 15:12
Retro



Was hast du vor? lol
Das einfachste ist, die aktuelle Position des Objektes abzufragen, und es dementsprechend nach oben/unten/link/rechts zu bewegen, dazu brauchste if-Sätze.
Das steht fest, der Rest ist Logik, Rechnen und überlegen ;)

TForm1.Create(Sender: TObject);
begin
...Object.Top := 0;
...Object.Left := 0;
end;

TForm1.Timer1Timer(Sender: TObject);
var
...Left, Top: Integer;
begin
...Top := Object.Top;
...Left := Object.Left;

...if (Top <= 99) and (Left = 0) then
......Object.Top := Object.Top + 1;
...if (Top = 100) and (Left <= 99) then
......Object.Left := Object.Left + 1;
...if (Top >= 1) and (Left = 100) then
......Object.Top := Object.Top - 1;
...if (Top = 0) and (Left >= 1) then
......Object.Left := Object.Left - 1;
end;

Nun bewegt es sich in nem Rechteck von 100x100 Pixeln. Alles klar? :)
Top und Left wurden nur als Hilfvariablen benutzt, weil ich so schreibfaul bin. hrhr

--

shielding people from their own stupidity is an evolutionary step backwards anyway.

/* God is dead!............Nietzsche */
/* Nietzsche is dead!......God */
/* Nietzsche is God!.......The Dead */

zum Seitenanfang zum Seitenende Profil || Suche
005
21.11.2001, 17:55
shenZi



kk vielen dank

--

..::Follow the rabbit ::..

zum Seitenanfang zum Seitenende Profil || Suche