[geniusbsd]

Добрый день Помогите плиз
Есть форма на ней два компонента
Edit1( Сокращенное Наименование) и Edit2(Полное Наименование)
Требуется во время набора в поле Edit1 Автоматически заполнять поле Edit2
Как я понимаю что нужно пока фокус на Edit1 Edit2.Text:=Edit1.Text
Как можно такое организовать?

[Страдалецъ]

Видимо так:

Код:

procedure TForm1.Edit1Change(Sender: TObject);
begin
 Edit2.Text := Edit1.Text
end;

Я правда, не очень понимаю зачем это нужно

[geniusbsd]

Спасибо.
А надо это по тому что лень вводить одно и то же

[NumLock]

Сообщение от geniusbsd

Edit1( Сокращенное Наименование) и Edit2(Полное Наименование)
Требуется во время набора в поле Edit1 Автоматически заполнять поле Edit2

имхо проще из полного наименования сделать сокращенное, чем из сокращенного полное. т.е. при наборе Edit2 автоматически генерировать Edit1

[geniusbsd]

Возможно вы и правы, но бывает что сокращенное название псевдоним а полное вообще ни чего общего не имеет. Это палка о двух концах. может просто полное наименование заполнять полностью вручную

[NumLock]

Сообщение от geniusbsd

бывает что сокращенное название псевдоним а полное вообще ни чего общего не имеет

тем более к чему вся эта тема?