rkreutz Posted June 22, 2023 Share Posted June 22, 2023 Hallo, I'd like to ask for 1 simple Code Adjustment I Use the Desktop line of controls, because the Mobile one has simply not enuf Controls / Options. Combobox i have a new Combobox ready for use, but need some methods as virtual, to be able to override them the Combobox can independently set KeyField, DisplayField, LookUpList-Columns, DataField, PageSize etcpp uniGUI/uniGUI/Source/Core/uniGUIClasses.pas | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/uniGUI/uniGUI/Source/Core/uniGUIClasses.pas b/uniGUI/uniGUI/Source/Core/uniGUIClasses.pas index 3887a24..9ff85bf 100644 --- a/uniGUI/uniGUI/Source/Core/uniGUIClasses.pas +++ b/uniGUI/uniGUI/Source/Core/uniGUIClasses.pas @@ -1564,10 +1564,10 @@ type constructor Create(AOwner: TComponent); override; destructor Destroy; override; - procedure ResetOriginalValue(AIndex: Integer); overload; - procedure SetOriginalValue(Value: Variant; TargetJS:TJSControl=nil); overload; - procedure SetOriginalValueRaw(Value: string; TargetJS:TJSControl=nil); - procedure SetOriginalValue(Value: TJSObject; TargetJS:TJSControl=nil); overload; + procedure ResetOriginalValue(AIndex: Integer); overload; virtual; + procedure SetOriginalValue(Value: Variant; TargetJS:TJSControl=nil); overload; virtual; + procedure SetOriginalValueRaw(Value: string; TargetJS:TJSControl=nil); virtual; + procedure SetOriginalValue(Value: TJSObject; TargetJS:TJSControl=nil); overload; virtual; procedure WebFocus; override; function IsMultiComponent: Boolean; Link to comment Share on other sites More sharing options...
Stemon63 Posted June 22, 2023 Share Posted June 22, 2023 Nice style and nice icons! Link to comment Share on other sites More sharing options...
Recommended Posts