From a9e804419f0f064ac80a0faaff708158a8c93fab Mon Sep 17 00:00:00 2001 From: blikblum Date: Sun, 13 Apr 2008 14:19:07 +0000 Subject: [PATCH] * Avoid access violation when destroying at design time git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@422 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/virtualtreeview-unstable/VirtualTrees.pas | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/components/virtualtreeview-unstable/VirtualTrees.pas b/components/virtualtreeview-unstable/VirtualTrees.pas index 6cee63de5..b6e9d62ad 100644 --- a/components/virtualtreeview-unstable/VirtualTrees.pas +++ b/components/virtualtreeview-unstable/VirtualTrees.pas @@ -10747,8 +10747,6 @@ begin FCustomCheckChangeLink.Free; FScrollBarOptions.Free; FOptions.Free; - if FCheckImages <> FCustomCheckImages then - FCheckImages.Free; // The window handle must be destroyed before the header is freed because it is needed in WM_NCDESTROY. //todo_lcl_check @@ -10759,6 +10757,9 @@ begin FHeader.Free; FHeader := nil; + if FCheckImages <> FCustomCheckImages then + FCheckImages.Free; + FreeMem(FRoot); {$ifdef UseLocalMemoryManager}