mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-17 13:48:25 +02:00
delay property removal until wm_destroy (thx vincent)
git-svn-id: trunk@4910 -
This commit is contained in:
parent
fe21e46ca1
commit
b3d87bcc7f
@ -581,7 +581,6 @@ Begin
|
|||||||
Begin
|
Begin
|
||||||
If Handle <> 0 Then
|
If Handle <> 0 Then
|
||||||
begin
|
begin
|
||||||
RemoveProp(Handle, 'Lazarus');
|
|
||||||
DestroyAcceleratorTable(Windows.GetProp(Handle, 'Accel'));
|
DestroyAcceleratorTable(Windows.GetProp(Handle, 'Accel'));
|
||||||
DestroyWindow(Handle);
|
DestroyWindow(Handle);
|
||||||
end;
|
end;
|
||||||
@ -2887,6 +2886,9 @@ End;
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
|
Revision 1.148 2003/12/19 18:20:02 micha
|
||||||
|
delay property removal until wm_destroy (thx vincent)
|
||||||
|
|
||||||
Revision 1.147 2003/12/19 18:18:17 micha
|
Revision 1.147 2003/12/19 18:18:17 micha
|
||||||
fix window activation z-order
|
fix window activation z-order
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user