paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-10 16:18:07 +01:00
Code Issues Packages Projects Releases Wiki Activity

IDEIntf: objectinspector: fixed painting outside paint event

Browse Source 
git-svn-id: trunk@37634 -
This commit is contained in:
mattias 2012-06-13 13:35:41 +00:00
parent b6a92e67e4
commit b1e9846595
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ideintf/objectinspector.pp
View File

@ -1341,7 +1341,7 @@ begin
Exclude(FStates,pgsApplyingValue);
end;
if FPropertyEditorHook=nil then
DoPaint(true)
Invalidate
else
FPropertyEditorHook.RefreshPropertyValues;
//DebugLn(['TOICustomPropertyGrid.SetRowValue ',CurRow.Name,' ',CurRow.Editor.GetVisualValue,' ',Assigned(FOnModified)]);
@ -1391,7 +1391,7 @@ begin
RefreshValueEdit;
//invalidate changed subproperties
DoPaint(True);
Invalidate;
end;
end;
@ -2793,7 +2793,7 @@ end;
procedure TOICustomPropertyGrid.RefreshPropertyValues;
begin
RefreshValueEdit;
DoPaint(true);
Invalidate;
end;
procedure TOICustomPropertyGrid.ScrollToActiveItem;