paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-21 23:19:29 +02:00
Code Issues Packages Projects Releases Wiki Activity

added debuln for OI fillcombobox

Browse Source 
git-svn-id: trunk@6892 -
This commit is contained in:
mattias 2005-03-04 17:20:03 +00:00
parent 5481188c27
commit 5ff7db8121
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ideintf/objectinspector.pp
View File

@ -1212,6 +1212,7 @@ begin
try
NewRow:=Rows[FItemIndex];
NewValue:=NewRow.Editor.GetVisualValue;
debugln('TOICustomPropertyGrid.FillComboboxItems A ',NewRow.Editor.ClassName,' ',NewRow.Editor.GetName,' NewValue="',NewValue,'"');
ValueComboBox.MaxLength:=NewRow.Editor.GetEditLimit;
ValueComboBox.Sorted:=paSortList in NewRow.Editor.GetAttributes;
ValueComboBox.Enabled:=not NewRow.IsReadOnly;