Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**ipworks**

Delphi-Quellcode:

			procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);

begin

  if Ord(key)=109 then icon.Left:=icon.Left+10; 

end;

ipworks Registriert seit: 27. Jul 2004 65 Beiträge	#3 Re: Tastatur Befehl! 8. Okt 2004, 17:39 markieren Delphi-Quellcode: procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char); begin if Ord(key)=109 then icon.Left:=icon.Left+10; end; Peter ------------------------------- mostly......pebkac http://www.ipworks.de
	Zitat