activecontrol.name ?

Hallo

kann jemand mir sagen, warum ich den fehler erhalte, wenn ich die Taste Enter drücke ?

Delphi-Quellcode:

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

begin

  if Ord(Key) = VK_RETURN then

   Caption:=Form1.activecontrol.name;

end;

**Bernhard Geyer**

Welchen Fehler?

**toms**

Mache eine Überprüfung, ob ActiveControl <> nil ist (resp mit Assigned)

thomas2009 (Gast) n/a Beiträge	#1 activecontrol.name ? 21. Jan 2009, 15:52 Hallo kann jemand mir sagen, warum ich den fehler erhalte, wenn ich die Taste Enter drücke ? markieren Delphi-Quellcode: procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char); begin if Ord(Key) = VK_RETURN then Caption:=Form1.activecontrol.name; end;
	Zitat

Bernhard Geyer Registriert seit: 13. Aug 2002 17.195 Beiträge Delphi 10.4 Sydney	#2 Re: activecontrol.name ? 21. Jan 2009, 15:55 Welchen Fehler? Windows Vista - Eine neue Erfahrung in Fehlern.
	Zitat

toms (CodeLib-Manager) Registriert seit: 10. Jun 2002 4.648 Beiträge Delphi XE Professional	#3 Re: activecontrol.name ? 21. Jan 2009, 15:58 Mache eine Überprüfung, ob ActiveControl <> nil ist (resp mit Assigned) Thomas
	Zitat