Bild in einem Fenster von links nach rechts bewegen

[morphi]

Hi ich wollt mmich mal vorstellen hab vor einigen tagen mit delphi angefangen hab schon ein paar kleine sachen hinbekommen...
Jetzt wollt ich mir nen fenster machen wo ein bild von links nach rechts leuft...
hab das schon mit ner while schleife und scroll bar versucht aber das ging irgenwie net.
Ich hoffe das ihr mir weiter helfen könnt...
MFG morph

[edit=MrSpock]Titel geändert. Mfg, MrSpock[/edit]

[Nikolas]

:dp: Willkommen in der DP

- Der Titel soll etwas über dein Problem aussagen, bitte änder den doch und schreib dann nicht nur in Großbuchstaben.

- Wie hast du es denn versucht? Ein bischen Code würde da helfen.

[Nicodius]

:dp: WILLKOMMEN IN DER DP :dp:
falscher titel falsche kategorie ;)


aber wurscht ...

nimm nen timer aus dr system leiste und dann

Delphi-Quellcode:

Bild.Left := Bild.Left + 1; // oder eben den wert dens zurücklegen soll

such hier mal im forum unter timer ;)

[fkerber]

Hi!

Herzlich Willkommen in der DP.

Erste Bitte:
Ändere deine Überschrift. Dann wird dir schneller geholfen werden können.


Zu deinem Problem:
Schau dir mal die Komponente TImage an und dort die Eigentschaft left.
Das ganze dann z.B. in Verbindung mit einem Timer.



Ciao Frederic

[Karlson]

Servus und Willkommen hier,

Zunächst solltest du dir folgendes merken:

1.) Poste deine Frage in das entsprechende Forum, im Klatsch und Tratsch hat die Frage nichts zu suchen.
2.) Verwende einen Titel der etwas aussagt, z.B. Bild über's Fenster bewegen. Mit ANFÄNGER kann hier niemand was anfangen.

zur Frage: Schau dir mal die Komponente TTimer an, im Register System.

[Nicodius]

[OT]4 auf einmal :mrgreen: [/OT]

--> geh mal wortwörtlich auf die suche

[DP-Maintenance]

Dieses Thema wurde von "Daniel" von "Klatsch und Tratsch" nach "Sonstige Fragen zu Delphi" verschoben.

[malo]

Mit ScrollBar ein Beispiel:

Delphi-Quellcode:

procedure TForm1.ScrollBar1Change(Sender: TObject);
begin
  Image1.Left := ScrollBar1.Position;
end;

Wenn du dann den ScrollBar bewegst, bewegt sich das Bild mit. Wenn das Bild weiter nach rechts kommen soll, als es bisher geht, musst du beim ScrollBar die Eigenschaft "Max" höher setzen ;)

[arbu man]

tach erstmal :lol:

Delphi-Quellcode:

var i:integer;
begin
i:=image1.left;
repeat begin
i:=i+1;
image1.left:=i
end; until i=300;
end;

Ich hoffe das hilft dir :warn:

[Ultimator]

Hi arbu man! :hi:
Erstmal geb ich dir nen gut gemeinten Rat: Gewöhn dir ne saubere Formatierung deiner Sourcen an. Das hilft, später die Übersicht zu bewahren ;-)
Und dann könnte man das viel eleganter lösen ;-)

Delphi-Quellcode:

var i:integer;
begin
  for i:=0 to 300 do  
    Image1.Left:=i;
end;