pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

* Fix compilation after recent changes

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1137 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
blikblum
2010-01-23 23:52:39 +00:00
parent 074c098df0
commit 6fc6056c5a
1 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
components/virtualtreeview-new/branches/4.8/VirtualTrees.pas
View File

@ -5059,8 +5059,10 @@ begin
begin
if Tree.HandleAllocated and PeekMessage(Msg, Tree.Handle, WM_CHANGESTATE, WM_CHANGESTATE, PM_REMOVE) then
begin
TranslateMessage(Msg);
DispatchMessage(Msg);
//todo: see if is correct / will work
Application.ProcessMessages;
//TranslateMessage(Msg);
//DispatchMessage(Msg);
end;
end;
end;