Использование Edit- a в процедуре

← →
Dest (2003-12-12 19:55) [0]

Как сделать так, чтобы при использовании в собственной процедуре, например Edit-а, не возникало ошибки:
Undeclared indentifier: Edit1
Надо написать что-то типа "TForm1.Edit1.text:=...", но так не получается. Возможно что-то где-то надо еще объявить.

← →
Palladin (2003-12-12 20:12) [1]

TForm1 это имя класса. Обращайся к объекту формы. Form1.
Или сделай процедуру методом класса.

← →
panov (2003-12-12 21:14) [2]

Передавай TEdit в качестве параметра:

procedure OnMyEdit(Edit: TEdit; const aText: String);
begin
Edit.Text := aText;
end;

Использование Edit- a в процедуре Найти похожие ветки