Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.04;
Скачать: CL | DM;

Вниз

Ошибка при могократном открытии формы в Win98   Найти похожие ветки 

 
Fran   (2002-06-22 20:58) [0]

Уважаемые, кто сталкивался с таким: Ошибка при могократном открытии формы в Win98: есть главное меню проекта, из него создается форма:

procedure TfmMain.mnRecZbrakClick(Sender: TObject);
begin
gbFlagCrForm := False;
gbCancel := False;
Splash := ShowSplashWindow(Application.Icon,
"Подождите...", False, nil);
try
gdYear := funcYearDate;
gdDateBeg := funcFirstDay(gdYear);
gdDateEnd := funcLastDay(gdYear);
dmZbrak := TdmZbrak.Create(Application);
fmRegZbrak := TfmRegZbrak.Create(Application);
Splash.Free;
if gbFlagCrForm then fmRegZbrak.ShowModal;
finally
dmZbrak.Free;
fmRegZbrak.Free;
end;//try
end;

Щелкаю на меню и затем закрываю форму.
На 25 раз - Аксес виолейшн - Runtime error 216.
На NT 4.0 и Win2k такой проблемы нет. В чем проблема?


 
Юрий Зотов ©   (2002-06-22 21:45) [1]

Дык... Перед 25-м разом поставьте BreakPoint, пройдите отладчиком, посмотрите значения переменных - сами все и увидите.

А по этому фрагменту что же скажешь? Там ведь несколько классов, только Вы один знаете, как они работают и на что ссылаются. Ясно только, что где-то идет ссылка либо на еще не созданный объект (или непроинициализированный указатель, что одно и то же), либо на уже уничтоженный объект (или на уже освобожденный участок памяти, что тоже одно и то же).


 
Fran   (2002-06-23 15:47) [2]

Это не приемлемо, т.к. я работаю под Win2k, а клиенты под Win98. Ставить им Дельфи? И под Win2k такой проблемы нет. Тут, наверное, особенность компилятора Дельфей сказывается, как то он затачивает *.exe под Win2k, не учитывая особенностей Win98. Или особенность Win98 - не обнуляет какой-нибудь стек.


 
Юрий Зотов ©   (2002-06-23 15:57) [3]

Вряд ли это особенность компилятора Дельфей. Гораздо вероятнее, что это все же особенность программы. Не обнуляет какой-нибудь стек.



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

Текущий архив: 2002.07.04;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.011 c
6-9952
Serega 1
2002-04-25 07:08
2002.07.04
Почему вылазеет ошибка?


14-9976
dimich
2002-06-03 14:40
2002.07.04
Что делать с винтом?


14-9961
ev
2002-06-01 14:49
2002.07.04
oberon


3-9696
oss
2002-06-10 12:44
2002.07.04
Ado blob field


1-9827
TsvIlya
2002-06-24 14:35
2002.07.04
Писать текст в чужой проге