Delphi-Quellcode:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if Key = VkKeyScan('a') then
caption := 'toll es wurde a gedrückt'
else Key = VkKeyScan('w') then <------In dieser Zeile meldet er den Fehler:
caption := 'es wurde w gedrückt';
end;
[Warning] Unit1.pas(33): Comparing signed and unsigned types - widened both operands
[edit=SirThornberry]Delphi-Tags gesetzt - nächstes mal bitte selbst machen - Mfg, SirThornberry[/edit]