Tasten druck!

[Daniel B]

Hallo,

Zitat:

Zitat von flomei

Gut. So funktioniert es! Wie kann ich eine Begrenzung festlegen?
Zum Beispiel so, dass das TImage nicht mehr als 200 Pixel verschoben werden kann?

Das dürfte weniger schwierig werden. Du merkst Dir beim Start des Programmes die aktuelle Position des Image, also Top und Left, dies kannst Du mit globalen Variablen machen. Oder, wenn Du weisst dass das Image immer an der gleichen Stelle ist, dann weisst Du es ja auch so schon.
So, jedes mal wenn Du das Image bewegst, mit Buttons oder sonst was, dann rechnest Du den momentanen Wert und den in der globalen Variable aus. Ist der Unterschied grösser als 200 Pixel, dann Diablest Du die Button zum weiter verscheiben.

Grüsse, Daniel :hi:

[flomei]

Beispiel?!? Das krieg nicht hin. Zumindest nicht alleine. Das hört sich auc h ziemlich kompliziert an. Könnte man das nicht mit unsichtbaren keineahnungwasmandanimmt Komponenten machen.

Thx!

MfG Florian

[Daniel B]

Zitat:

Zitat von flomei

Beispiel?!? Das krieg nicht hin.

Du willst es nur nicht selber machen! ;)
Also, die globale Variable heisst MyImage.
Setze ein ein Formular ein Image ganz oben links, also mit x und y auf 0. Dann brachst Du noch einen Button und folgenden Code. Ist jetzt nur für nach rechts.

Delphi-Quellcode:

var
  Form1: TForm1;
  MyImage: Integer;

implementation 
{$R *.dfm}

procedure TForm1.FormShow(Sender: TObject);
begin
  MyImage := 0;
  MyImage := Image1.Left;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  if Image1.Left < 20 then
  begin
    Image1.Left := Image1.Left + 1;
  end
  else
  begin
    Button1.Enabled := False;
  end;
end;

Da machst Du halt für alle vier Richtungen. Musst halt nur aufpassen, wann Du welche Buttons wieder Enablen musst.

Grüsse, Daniel :hi:

[flomei]

Wenn mein Rechner wieder heile ist probier ich das aus. Aber der Lüfter ist kaputt und deshalb ist er in Reparatur. Heute nachmittag hole ich ihn ab und dann kann ich endlich weiter machen. :coder:
Thx!

MfG Florian :hi:

P.S.: Ich kann das wirklich nicht. Wenn ich wüsste wie das geht würd ich wohl kaum fragen, oder DanielB??? :wink: