mirror of https://gitlab.com/basile.b/dexed.git
inspector-based-widget: checkboxes for bool/enum
This commit is contained in:
parent
0eb82a0dfe
commit
39daec46c1
|
@ -62,6 +62,7 @@ inherited CEOptionEditorWidget: TCEOptionEditorWidget
|
||||||
Top = 0
|
Top = 0
|
||||||
Width = 405
|
Width = 405
|
||||||
Align = alClient
|
Align = alClient
|
||||||
|
CheckboxForBoolean = False
|
||||||
DefaultValueFont.Color = clWindowText
|
DefaultValueFont.Color = clWindowText
|
||||||
Filter = [tkInteger, tkChar, tkEnumeration, tkFloat, tkSet, tkMethod, tkSString, tkLString, tkAString, tkWString, tkVariant, tkArray, tkRecord, tkInterface, tkClass, tkObject, tkWChar, tkBool, tkInt64, tkQWord, tkDynArray, tkInterfaceRaw, tkProcVar, tkUString, tkUChar, tkHelper]
|
Filter = [tkInteger, tkChar, tkEnumeration, tkFloat, tkSet, tkMethod, tkSString, tkLString, tkAString, tkWString, tkVariant, tkArray, tkRecord, tkInterface, tkClass, tkObject, tkWChar, tkBool, tkInt64, tkQWord, tkDynArray, tkInterfaceRaw, tkProcVar, tkUString, tkUChar, tkHelper]
|
||||||
Indent = 16
|
Indent = 16
|
||||||
|
|
|
@ -63,6 +63,7 @@ begin
|
||||||
fDockable := false;
|
fDockable := false;
|
||||||
fModal:= true;
|
fModal:= true;
|
||||||
fEdOptsSubj := TCEEditableOptionsSubject.create;
|
fEdOptsSubj := TCEEditableOptionsSubject.create;
|
||||||
|
inspector.CheckboxForBoolean := true;
|
||||||
//
|
//
|
||||||
png := TPortableNetworkGraphic.Create;
|
png := TPortableNetworkGraphic.Create;
|
||||||
try
|
try
|
||||||
|
|
|
@ -143,13 +143,14 @@ inherited CEProjectConfigurationWidget: TCEProjectConfigurationWidget
|
||||||
Top = 0
|
Top = 0
|
||||||
Width = 272
|
Width = 272
|
||||||
Align = alClient
|
Align = alClient
|
||||||
|
CheckboxForBoolean = False
|
||||||
DefaultValueFont.Color = clWindowText
|
DefaultValueFont.Color = clWindowText
|
||||||
Filter = [tkInteger, tkChar, tkEnumeration, tkFloat, tkSet, tkMethod, tkSString, tkLString, tkAString, tkWString, tkVariant, tkArray, tkRecord, tkInterface, tkClass, tkWChar, tkBool, tkInt64, tkQWord, tkDynArray, tkInterfaceRaw, tkProcVar, tkUString, tkUChar, tkHelper]
|
Filter = [tkInteger, tkChar, tkEnumeration, tkFloat, tkSet, tkMethod, tkSString, tkLString, tkAString, tkWString, tkVariant, tkArray, tkRecord, tkInterface, tkClass, tkWChar, tkBool, tkInt64, tkQWord, tkDynArray, tkInterfaceRaw, tkProcVar, tkUString, tkUChar, tkHelper]
|
||||||
Indent = 16
|
Indent = 16
|
||||||
NameFont.Color = clWindowText
|
NameFont.Color = clWindowText
|
||||||
OnModified = inspectorModified
|
OnModified = inspectorModified
|
||||||
PreferredSplitterX = 145
|
PreferredSplitterX = 150
|
||||||
SplitterX = 145
|
SplitterX = 150
|
||||||
ValueFont.Color = clGreen
|
ValueFont.Color = clGreen
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
|
|
@ -78,6 +78,7 @@ begin
|
||||||
end;
|
end;
|
||||||
Tree.Selected := Tree.Items.GetLastNode;
|
Tree.Selected := Tree.Items.GetLastNode;
|
||||||
inspector.OnEditorFilter := @GridFilter;
|
inspector.OnEditorFilter := @GridFilter;
|
||||||
|
inspector.CheckboxForBoolean := true;
|
||||||
//
|
//
|
||||||
EntitiesConnector.addObserver(self);
|
EntitiesConnector.addObserver(self);
|
||||||
end;
|
end;
|
||||||
|
|
|
@ -121,11 +121,14 @@ inherited CEToolsEditorWidget: TCEToolsEditorWidget
|
||||||
Top = 0
|
Top = 0
|
||||||
Width = 268
|
Width = 268
|
||||||
Align = alClient
|
Align = alClient
|
||||||
|
CheckboxForBoolean = False
|
||||||
DefaultValueFont.Color = clWindowText
|
DefaultValueFont.Color = clWindowText
|
||||||
Filter = [tkInteger, tkChar, tkEnumeration, tkFloat, tkSet, tkMethod, tkSString, tkLString, tkAString, tkWString, tkVariant, tkArray, tkRecord, tkInterface, tkClass, tkObject, tkWChar, tkBool, tkInt64, tkQWord, tkDynArray, tkInterfaceRaw, tkProcVar, tkUString, tkUChar, tkHelper]
|
Filter = [tkInteger, tkChar, tkEnumeration, tkFloat, tkSet, tkMethod, tkSString, tkLString, tkAString, tkWString, tkVariant, tkArray, tkRecord, tkInterface, tkClass, tkObject, tkWChar, tkBool, tkInt64, tkQWord, tkDynArray, tkInterfaceRaw, tkProcVar, tkUString, tkUChar, tkHelper]
|
||||||
Indent = 16
|
Indent = 16
|
||||||
NameFont.Color = clWindowText
|
NameFont.Color = clWindowText
|
||||||
OnModified = propsEdModified
|
OnModified = propsEdModified
|
||||||
|
PreferredSplitterX = 150
|
||||||
|
SplitterX = 150
|
||||||
ValueFont.Color = clGreen
|
ValueFont.Color = clGreen
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
|
|
@ -45,6 +45,7 @@ var
|
||||||
png: TPortableNetworkGraphic;
|
png: TPortableNetworkGraphic;
|
||||||
begin
|
begin
|
||||||
inherited;
|
inherited;
|
||||||
|
propsEd.CheckboxForBoolean := true;
|
||||||
png := TPortableNetworkGraphic.Create;
|
png := TPortableNetworkGraphic.Create;
|
||||||
try
|
try
|
||||||
png.LoadFromLazarusResource('arrow_up');
|
png.LoadFromLazarusResource('arrow_up');
|
||||||
|
|
Loading…
Reference in New Issue