Форум: "Основная";
Текущий архив: 2003.08.04;
Скачать: [xml.tar.bz2];
ВнизForm1.onShow Найти похожие ветки
← →
denis24 (2003-07-23 10:04) [0]Есть две формы(form1,form2) .Обе созданы.Можно ли в сабже заполнять контролы form2?А то у меня выдает acess violetion......
← →
Skier (2003-07-23 10:06) [1]Абстрактный вопрос.
← →
Anatoly Podgoretsky (2003-07-23 10:10) [2]Можно.
Но у тебя ошибка в программе.
← →
Prov (2003-07-23 10:19) [3]Ты бы код привёл...
← →
denis24 (2003-07-23 10:59) [4]procedure TFRMMAIN.FormShow(Sender: TObject);
begin
with DataModule2.Query1 do begin
close;
sql.clear;
sql.add ("select * from dba.prdog_fiz_kred_dog");
open;
with DataModule2.Query2 do begin
close;
sql.clear;
sql.add("select BCP_CPIDD from cpdl order by BCP_CPIDD");
open;
while not eof do
begin
frmDetail_1.cmbkorporatsija.Items.Add (Fields [0].asstring);
next;//вот здесь и вылазит ошибка ,,,как будто форма не создана,но она создавалась вместе с с frmmain
← →
Reindeer Moss Eater (2003-07-23 11:01) [5]То что она создалась, еще не говорит о том, что переменная frmDetail_1 содержит ссылку на нее.
← →
denis24 (2003-07-23 11:10) [6]где это сделать?
← →
Reindeer Moss Eater (2003-07-23 11:18) [7]что "это" ?
← →
denis24 (2003-07-23 11:21) [8]нормально ответить нельзя?Конкретно можеш ответить?
← →
Reindeer Moss Eater (2003-07-23 11:24) [9]Сделай это в ванной.
← →
Spawn (2003-07-23 11:31) [10]denis24 (23.07.03 11:21) ты форму frmDetail_1 сам создаешь?
← →
Sandman25 (2003-07-23 11:32) [11]Это нужно переместить в TfrmDetail_1OnCreate
with DataModule2.Query2 do begin
close;
sql.clear;
sql.add("select BCP_CPIDD from cpdl order by BCP_CPIDD");
open;
while not eof do
begin
frmDetail_1.cmbkorporatsija.Items.Add (Fields [0].asstring);
next;//вот здесь и вылазит ошибка ,,,как будто форма не создана,но она создавалась вместе с с frmmain
← →
denis24 (2003-07-23 11:34) [12]To пожирателю чего-то,,,откуда такие мудаки берутся?
да
Application.CreateForm(TfrmDetail_1,frmDetail_1);
← →
Sandman25 (2003-07-23 11:35) [13]Но это же происходит ПОСЛЕ вызова procedure TFRMMAIN.FormShow(Sender: TObject);
Application.CreateForm(TfrmDetail_1,frmDetail_1);
См. Sandman25 © (23.07.03 11:32)
+
frmDetail_1.cmbkorporatsija.Items.Add (...
заменить на
cmbkorporatsija.Items.Add (...
← →
Skier (2003-07-23 11:37) [14]>Sandman25 © (23.07.03 11:35)
> Но это же происходит ПОСЛЕ вызова procedure TFRMMAIN.FormShow(Sender:
> TObject);
???
← →
Reindeer Moss Eater (2003-07-23 11:39) [15]To denis24 :
Их делают твои мама и папа.
← →
Sandman25 (2003-07-23 11:41) [16]Skier © (23.07.03 11:37)
Спутал с OnCreate.
← →
Anatoly Podgoretsky (2003-07-23 12:05) [17]100 процентов, что или не создана или переменная черт знает что содержит.
← →
Reindeer Moss Eater (2003-07-23 12:07) [18]Или вообще не форма вызывает исключение.
← →
Anatoly Podgoretsky (2003-07-23 12:09) [19]Sandman25 © (23.07.03 11:41)
Ничего не спутал, он же не указывает откуда эта строчка.
← →
Sandman25 (2003-07-23 12:14) [20]Я предполагал, что вторая форма "автосоздается" в dpr,
а судя по denis24 (23.07.03 10:59) (FormShow) загрузка происходит в OnShow.
Я сделал аналогичный проект, у меня никакого AV. Что-то он не договаривает.
← →
denis24 (2003-07-23 12:54) [21]Все решил по другому.
Там где создавал формы сделал первой frmDetail_1 а в его OnCreate
кинул нужный код
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.08.04;
Скачать: [xml.tar.bz2];
Память: 0.48 MB
Время: 0.008 c