Enquanto isso, na WVG, DATEPICKER
Enviado: 23 Jul 2024 20:26
Adicionei este fonte de 4 linhas na LIB
Adicionei este fonte de 3 linhas na rotina de teste
Aí, ao executar, clico no botão e acontece isto
Legal né ?
Foi só teste da criação do controle.
Só vai ficar anotado.
Código: Selecionar todos
CREATE CLASS wvgTstDatePicker INHERIT wvgtstControl
VAR ClassName INIT "SysDateTimePick32"
VAR Style INIT WS_CHILD + WS_TABSTOP
ENDCLASS
Código: Selecionar todos
WITH OBJECT aCtlList[ nCtlIndex++ ] := wvgTstDatePicker():New()
:Create( , , { -25, -19 }, { -1, - 10 } )
ENDWITH
Foi só teste da criação do controle.
Só vai ficar anotado.