x11 Posted January 31, 2021 Share Posted January 31, 2021 Не могу найти в справке (в иерархии классов), где и когда появилось свойство ClearButton, у какого предка. Хотелось бы что-то вроде: procedure proc1(Control: TUniFormControl); begin (Control as TUniFormControl).ClearButton := False; end; чтобы в качестве параметра можно было передать и unimEdit, и unimDatePicker, и unimDBLookupCombobobox, и любую другую компоненту, где есть это свойство. Спасибо. Quote Link to comment Share on other sites More sharing options...
x11 Posted February 1, 2021 Author Share Posted February 1, 2021 up Quote Link to comment Share on other sites More sharing options...
Sherzod Posted February 1, 2021 Share Posted February 1, 2021 20 hours ago, x11 said: Хотелось бы что-то вроде: procedure proc1(Control: TUniFormControl); begin (Control as TUniFormControl).ClearButton := False; end; type TExUniFormControl = class(TUniFormControl) end; TExUniFormControl(Control).ClearButton := False; 1 Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.