ADDBUTTONS AND BUTTONS WITH DCREAD GUI

[digitsoft]

Hello Roger
As I can appends another button using
LOCAL local aButtons := { {'E~ditar' ,70,22,{||DC_ReadGuiEvent(DCGUI_EXIT_OK,GetList) }} }


DCREAD GUI ;
EXPRESS ;
FIT ;
ADDBUTTONS ;
BUTTONS aButtons ;

[Tom]

Code: Select all

LOCAL aButtons := {}, GetList := {}, GetOptions := {}
aadd(aButtons,{ 'MyButton',50,12,{||MyButtonAction()},nil })
...

DCGET OPTIONS BUTTONS aButtons
DCREAD GUI ... OPTIONS GetOptions BUTTONS DCGUI_BUTTON_CUSTOM

[digitsoft]

Thanks for your help

[rdonnay]

Thanks Tom for that answer. I forgot it myself.