LS,
The first error is "eedfadeH" on address 00000000
The 2nd error shown is: Range Check Error on the
OutputDebugString(PChar('Dispose ' + ClassName + ' ThreadID=' +
IntToStr(GetCurrentThreadId)));
line, of the procedure TIcsWndControl.Dispose(Disposing: Boolean).
Perhaps now someone might know what's happening ?
( W98, Delphi 7 program with TWSocketServer en TWSocket on the form. )
regards Jan.
procedure TIcsWndControl.Dispose(Disposing: Boolean);
begin
OutputDebugString(PChar('Dispose ' + ClassName + ' ThreadID=' +
IntToStr(GetCurrentThreadId)));
if not Disposed then begin
if Disposing then begin
OutputDebugString('Free managed resources');
end;
OutputDebugString('Free unmanaged resources');
DeallocateHWnd; // Don't forget to deallocate the window handle
Disposed := TRUE;
end;
end;
--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://www.elists.org/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be
