
04.03.2013, 11:59
|
 |
LMD-DML
|
|
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
|
|
Цитата:
Сообщение от morebeauty
...чтобы TEdit постоянно отображал значение нужной мне текстовой переменной и изменял его (при вводе текста).
|
Код:
procedure TForm1.Edit1Change(Sender: TObject);
begin
MyTextVar:= Edit1.Text; // Edit1.Text при вводе равно MyTextVar
end;
и гденить в коде
Код:
...
MyTextVar:= 'Изменяюсь';
Edit1.Text:= MyTextVar; // индикатор
...
|