Zitat von
dizzy:
Einfach so:
Delphi-Quellcode:
Var
ActiveEdit: TEdit;
ActiveMemo: TMemo;
Begin
ActiveEdit.Text := 'Teschd';
End;
"ActiveEdit" ist ein Zeiger auf die Instanz von TEdit. Delphi nimmt dir jedoch beim Zugriff darauf sämtliche Zeigerarbeit ab, so dass du nicht sichtbar mit Zeigern hantierst. Das ganze Rumgecaste und Verpointerschnörksele ist hier komplett unnötig
Achso, das ist natürlich sehr einfach.
Eine Frage noch. In jedem OnEnter-Ereignnis eines TEdit bzw. TMemo
ist folgende Code-Zeile eingefügt:
Delphi-Quellcode:
ActiveEdit := (Sender as TEdit);
bzw.
ActiveMemo := (Sender as TMemo);
Das klappt nun natürlich nicht mehr, wenn ich Deinen Vorschlag einbaue.
Wie könnte ich das jetzt machen ?