![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Странный глюк при работе с двумя формами. [D5, XP]
red_imp © (2008-05-21 13:13:00)Никак не могу понять в чем проблема. Один старый проект, все работало нормально, надо было немнго его подправить.
После исправлений совершенно другой процедуры, начало выкидывать глюки:
Из главной формы вызываеться форма - для заполнения данных
procedure TForm1.Button5Click(Sender: TObject); //"Выровнять"
begin
/////////////
Application.CreateForm(TForm2 , Form2);
form2.ShowModal;
////////////
end;
после ввода данных, и нажатия одной из кнопок, передаються данные на главную форму
procedure TForm2.Button1Click(Sender: TObject);
begin
if edit1.Text='' then begin showmessage('Введите данные'); edit1.SetFocus; end
else begin
form1.Label2.Caption:=ComboBox1.Text;
form1.Label3.Caption:=edit1.text;
form1.virint(1);
form2.close;
end;
end;
После чего оно через раз выкидывает ошибку
"access violation at adress 00490AB4 in module 'Project1'. Read of address 000004DE"
на строчке "Form1.Label2.Caption:=ComboBox1.Text;"
Мож кто пнет в правильном направлении?
Red_imp (2008-05-21 13:21:00) [21]Хм, это как? Я из form1, создаю form2, и form2 делаю модальной, при этом с первой формой ничего не делаю, она просто висит неактивная. Причем все работает но через раз.
Ega23 (2008-05-21 13:19:00) [22]
> form1 не существует
или form1.Label2 или CmboBox1
Palladin (2008-05-21 13:15:00) [23]form1 не существует