![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
DLL, с пакетами, использую DevExpress, компоненты xxDockxx, AV [WinXP]
Vlad Oshin © (2008-10-07 11:31:00)BDS2006.
Программа с DLL, с пакетами, использую DevExpress, компоненты xxDockxx, получаю AV при выходе.
Что характерно, если окошко "не прикреплено" к другим - то AV.
Если же прикреплено - то все нормально, штатный выход.
Текст dpr
----------------
{$IFDEF INLOG2}
JclStackTrackingOptions := [stExceptFrame, stStack, stRawMode, stAllModules, stStaticModuleList];
JclStartExceptionTracking;
JclAddExceptNotifier(LogException);
{$ENDIF}
try
DeleteLog;
WriteToLog('-= NumeroQuattro START =-');
Application.Initialize;
Application.Title := 'NumeroQuattro.Департамент';
Application.CreateForm(TfrmMain, frmMain);
Application.Run;
WriteToLog('-= NumeroQuattro END =-');
except
on E:Exception do WriteToLog('-= NumeroQuattro error: '+E.message);
end;
----------------
Лог
------------------
DateTime: 07.10.2008 11:11:08 -= NumeroQuattro START =-
DateTime: 07.10.2008 11:11:08 NumeroQuattro.Департамент: module NQUser.dll attach process
.......... module NQBasket.dll attach process
DateTime: 07.10.2008 11:11:12 Клик по окну класса:TButton(текст:Ok) подокно класса:TLogOnForm(текст:идентификация пользователя) подокно класса:TApplication(текст:NumeroQuattro.Департамент) vcl100.bpl
DateTime: 07.10.2008 11:11:30 Клик по окну класса:TBitBtn(текст:&Ignore) подокно класса:TfrmItemCard(текст:Карточка товара) подокно класса:TdxDockPanel(текст:Карточка товара) подокно класса:TdxFloatForm(текст:Карточка товара) подокно класса:TfrmMain(текст:NumeroQuattro.Департамент) подокно класса:TApplication(текст:NumeroQuattro.Департамент) vcl100.bpl
DateTime: 07.10.2008 11:11:39 -= NumeroQuattro END =-
DateTime: 07.10.2008 11:11:39
Exception occured at $52070BE2
Module "Forms"
Procedure "Forms.TCustomForm.SetVisible"
Unit "Forms.pas"
Line 3092
DateTime: 07.10.2008 11:11:42 NumeroQuattro.Департамент: module NQBasket.dll detach process
...........QUser.dll detach process
------------------
не выполняется, что логично, из-за выделеного
procedure TfrmMain.ApplicationEvents1Exception(Sender: TObject; E: Exception);
begin
WriteToLog('QQQQQQQQQq');
end;
=================================================
Кто сталкивался? Куда смотреть?
Vlad Oshin (2008-10-07 17:04:00) [1]излазил исходники, теперь в dpr написал последней строкой:
WriteToLog('-= NumeroQuattro END =-');
except
on E:Exception do WriteToLog('-= NumeroQuattro error: '+E.message);
end;
application.MainForm.Free;
end.
и выход нормально отрабатывает.
целый день убил..
Vlad Oshin (2008-10-07 11:49:00) [2]еще хочется добавить,
что даже в дизайн-time бывают какие-то непонятные ошибки, когда начинаешь TdxDockPanel кидать на форму.
Отсюда пошел путем создания их динамически..
может это компоненты глючат?
Vlad Oshin (2008-10-07 11:39:00) [3]
> не выполняется, что логично, из-за выделеного
а выделенным должно быть
> DateTime: 07.10.2008 11:11:39 -= NumeroQuattro END =-
т.е. программа уже завершилась