[Delphi] Mały problemik

0

mam coć takiego
procedure TForm1.ClosingWin(var Message: TMessage);
begin
if Message.Msg = WM_QUERYENDSESSION then
begin
<font color="red">writedate;</span>
end;
DefaultHandler(Message)
end;

mam winde xp - podczas zamykania systemu powina być wykonywana procedura writedate - w innych przypadkach zamkniecia programu procedura ta działa dobrze i na innych winach działa też ale na xp wywala błąd - co jest nie tak [stuk]
[browar]

0

jaki błąd wywala? i co robi procedura writedate: może to jej wina?

0

procedura writedate; zapisuje dane z listviev - ale ta procedura działa bez problemu - tylko podczas wykrywania zamykania wina xp sie buntuje - a win 98 nie - zreszta gdy zamykam program normalnie przez Zamknij wykonywana jest ta sama procedura i tez jest ok [stuk]

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0