Thank you Fred, I will try these today
 and let you know.

On Fri, Feb 19, 2021 at 5:19 PM fredvs <[email protected]> wrote:

> And to disable-enable:
>
>      procedure tmainfo.disablebutton(const sender: TObject);
> begin
> ttoolbar1.buttons[2].state := ttoolbar1.buttons[2].state + [as_disabled];
> end;
>
>    procedure tmainfo.enablebutton(const sender: TObject);
> begin
> ttoolbar1.buttons[2].state := ttoolbar1.buttons[2].state - [as_disabled];
> end;
>
>
>
> --
> Sent from: http://mseide-msegui-talk.13964.n8.nabble.com/
>
>
> _______________________________________________
> mseide-msegui-talk mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
>


-- 
Vasi
_______________________________________________
mseide-msegui-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Reply via email to