mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-05 21:18:27 +02:00
TCustomForm.WMDestroy does not Free anymore
git-svn-id: trunk@3675 -
This commit is contained in:
parent
0f6d6a66fd
commit
acd965c4d9
@ -257,7 +257,6 @@ begin
|
|||||||
|
|
||||||
// First set FHandle to 0, the window doesn't exist anymore.
|
// First set FHandle to 0, the window doesn't exist anymore.
|
||||||
inherited WMDestroy(Message);
|
inherited WMDestroy(Message);
|
||||||
Free;
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
{------------------------------------------------------------------------------
|
{------------------------------------------------------------------------------
|
||||||
@ -1198,6 +1197,9 @@ end;
|
|||||||
{ =============================================================================
|
{ =============================================================================
|
||||||
|
|
||||||
$Log$
|
$Log$
|
||||||
|
Revision 1.73 2002/11/30 08:35:42 mattias
|
||||||
|
TCustomForm.WMDestroy does not Free anymore
|
||||||
|
|
||||||
Revision 1.72 2002/11/29 15:14:47 mattias
|
Revision 1.72 2002/11/29 15:14:47 mattias
|
||||||
replaced many invalidates by invalidaterect
|
replaced many invalidates by invalidaterect
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user