![]() |
|
|
|
|
#1
|
|||
|
|||
|
проблема такая, есть 2 формы, на одно располагаются компоненты edit, на второй label. Вводишь данные на form1 нажимаешь на кнопку и появляется form2 где лейблы принимают значения которые ввели в edit, но принимают они эти значения только когда кликнешь по ним мышью. нужно сделать так чтобы при открытия формы все 40 лейблов приняли значения едитов. помогите пожалуйста.
|
|
#2
|
||||
|
||||
|
Код:
procedure TForm1.Button1Click(Sender: TObject); begin Form2.Label1.Caption:=Edit1.Text; Form2.Label2.Caption:=Edit2.Text; Form2.Label3.Caption:=Edit3.Text; Form2.Label4.Caption:=Edit4.Text; Form2.Label5.Caption:=Edit5.Text; Form2.ShowModal; end; |
| Этот пользователь сказал Спасибо NumLock за это полезное сообщение: | ||
OTVET (21.01.2013)
| ||
|
#3
|
|||
|
|||
|
спасибо, а как еще сделать чтобы при этом закрывалось form1
|
|
#4
|
||||
|
||||
|
Код:
form1.close |
|
#5
|
||||
|
||||
|
Код:
Hide; Form2.ShowModal; Show; |
| Эти 2 пользователя(ей) сказали Спасибо NumLock за это полезное сообщение: | ||
chelsea_1993 (20.01.2013),
OTVET (21.01.2013)
| ||