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

IDEintf: object inspector: comment

Browse Source 
git-svn-id: trunk@44251 -
This commit is contained in:
mattias 2014-02-26 18:15:38 +00:00
parent 206cae270e
commit 86fdb15eae
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
components/ideintf/objectinspector.pp
View File

@ -1479,6 +1479,7 @@ begin
end; end;
end; end;
{$ENDIF} {$ENDIF}
// CurRow is now invalid, do not access CurRow
if (OldChangeStep<>FChangeStep) then begin if (OldChangeStep<>FChangeStep) then begin
// the selection has changed => CurRow does not exist any more // the selection has changed => CurRow does not exist any more
@ -1628,8 +1629,10 @@ var
NewValue: string; NewValue: string;
EditorAttributes: TPropertyAttributes; EditorAttributes: TPropertyAttributes;
begin begin
//if FRows.Count=0 then {if pgsCallingEdit in FStates then begin
// debugln(['TOICustomPropertyGrid.SetItemIndex ',DbgSName(Self),' ',dbgsname(FCurrentEdit),' ',dbgs(FStates),' GridIsUpdating=',GridIsUpdating,' FItemIndex=',FItemIndex,' NewIndex=',NewIndex]); DumpStack;
debugln(['TOICustomPropertyGrid.SetItemIndex ',DbgSName(Self),' ',dbgsname(FCurrentEdit),' ',dbgs(FStates),' GridIsUpdating=',GridIsUpdating,' FItemIndex=',FItemIndex,' NewIndex=',NewIndex]);
end;}
if GridIsUpdating or (FItemIndex = NewIndex) then if GridIsUpdating or (FItemIndex = NewIndex) then
exit; exit;
// save old edit value // save old edit value