Цитата:
Сообщение от brotherirk
как передать свойство объекта в свою процедуру для дальнейшего изменения?
|
Если надо изменить свойство объекта, почему не передать в параметрах сам этот объект? Этому что-то мешает?
Код:
procedure ChangeText(Edit: TMaskEdit);
begin
Edit.Text := 'aaaaaa';
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
ChangeText(MaskEdit1);
end;