@Tormentor32: Ja, bei mir sah es auch so gruselig aus, schien wohl an den Frames zu hängen. Allerdings benutze ich auch momentan den Firefox... Wie auch immer.
@all: Ich habe meine Prozedur jetzt ein bisschen geändert:
Code:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if key=chr(49) then button1click(button1);
end;
Allerdings weiss ich nicht wie ich die Variable Key als Word-Variable abrufen soll.
Habe es auch wie bereits erwähnt mit dem Aufruf button1.click probiert.
Hoffe ihr könnt mir helfen... Wieder mal...
Gruß
Stefan