Скачать: CL | DM;

Вторая форма   Найти похожие ветки 

← →
tytus ©   (2002-09-23 19:53) [0]

/главная форма/
unit1...
pablic name:string;
implementation
uses unit2;
procedure ......;
var form2:TForm2;
begin
form2:=TForm2.create(self);
form2.show(или visible:=true);
.
.
/вторая форма/
unit2
implementation
uses unit1;
procedure......;
var form1:TForm1;
begin
form1.name:=edit1.text;
.
.
end;
А теперь вопрос - как мне получить нажатием кнопки значение name в первой форме, одновременно закрывая вторую??????????
Или я глючу или WINNT с D5, но всегда при закрытии второй формы выдает Access Violation и кучу адресов....

---

← →
Shadow ©   (2002-09-23 20:01) [1]

А ошибка в каком месте?

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.014 c