Zitat von
Xong:
Zitat von
Landfloh:
Und warum geht denn das nicht?
Delphi-Quellcode:
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
// Wenn "Nach-Unten"-Taste gedrückt wurde, setze Button.left auf 1. Öhm...
//if Key = 'VK_DOWN' then Button1.left := 1;
case Key of
VK_DOWN: Button1.Top := Button1.Top + 1;
VK_UP: Button1.Top := Button1.Top - 1;
{...}
end;
end;
Dann kommen die Fehlermeldungen:
[Fehler] Unit1.pas(29): Inkompatible Typen: 'Char' und 'Integer'
[Fehler] Unit1.pas(30): Inkompatible Typen: 'Char' und 'Integer'
