Anfänger Probleme: Helft mir bitte!

[MiKeNNtKoiNer]

So Leute da bin ich scon wieder mit nem Problem!!! :coder2: :coder2:

Ich hab vor, dass sich das panel immer weiter nach oben/unten/links/rechts beweg wenn ich den dazu gehörigen button drücke. Ich versuch das mit nem Timer aber da kommt immer eine Fehler Meldung! :gruebel:

Delphi-Quellcode:

procedure TForm3.Timer1Timer(Sender: TObject);
begin
If Button1.Click=true
Then panel1.Top := panel1.Top - 1;
end;

Bitte Helft mir

Danke schon mal im voraus.

Mfg Hagen

P.S.:
Fehlermeldung:
[Pascal Fehler] Unit3.pas(60): E2008 Inkompatible Typen
[Pascal Fataler Fehler] Project3.dpr(5): F2063 Verwendete Unit 'Unit3.pas' kann nicht compiliert werden
:wiejetzt: :wiejetzt: :wiejetzt: :wiejetzt: :wiejetzt:

[Noedel]

so kannst du die erste Zeile nicht schreiben, du musst wenn dann ne variable vom typ boolean in dem button anlegen, die dir sagt, dass der Button gedrückt wurde.

[fkerber]

Hi!

So wird das nicht funktionieren.
Warum möchtest du einen Timer verwenden? Dieser dient dazu, ohne weitere "Benutzereingriffe" eine Sache öfter durchzuführen (und in regelmäßigen Zeitabständen).
Du möchtest dein Panel ja nur auf ButtonClick bewegen - also reicht es, das Verändern der PanelPosition ins OnClick des Buttons zu machen.


Ciao, Frederic

[MiKeNNtKoiNer]

das versteh ich nicht was soll ich mit der variable machen?? und was boolean is hab ich inzwischen wieder vergessen

[mkinzler]

Könntest du deinem Beitrag einen Titel geben, welcher etwas über dein Problem aussagt. Einfach mit Edit abändern.

Zu deinem Problem. Den Code musst du im Click-Event des Buttons (onClick) abarbeiten

http://www.delphi-treff.de/tutorials/grundlagen/

[RWarnecke]

Zitat:

Zitat von Noedel

so kannst du die erste Zeile nicht schreiben, du musst wenn dann ne variable vom typ boolean in dem button anlegen, die dir sagt, dass der Button gedrückt wurde.

Oder du schreibst folgendes :

Delphi-Quellcode:

procedure TForm3.Timer1Timer(Sender: TObject);
begin
  If TButton(Sender).Name = 'Button1' Then 
    panel1.Top := panel1.Top - 1;
end;

[MiKeNNtKoiNer]

ich will doch das des panle wenn man auf den button klickt die ganze zeit weiter in dies richtng läuft

[DeddyH]

Delphi-Quellcode:

procedure TForm3.ButtonObenClick(Sender: TObject);
begin
  panel1.Top := panel1.Top - 1;
end;

[Phoenix]

Zitat:

Zitat von MiKeNNtKoiNer

ich will doch das des panle wenn man auf den button klickt die ganze zeit weiter in dies richtng läuft

Ich will, genauso wie mkinzler, dass Du Deinem Beitrag erstmal einen aussagekräftigen Titel gibst. In die Richtige Sparte schieben tu ich das jetzt schon...

[DP-Maintenance]

Dieses Thema wurde von "Phoenix" von "Programmieren allgemein" nach "VCL / WinForms / Controls" verschoben.
Nicht allgemein, sondern ziemlich spezisch Delphi und VCL-Controls...