center line not working with add label

[Robert Alvarez]

'same for GRAPHIC LINE and XPRINT LINE

#COMPILE EXE
GLOBAL hDlg AS LONG

FUNCTION PBMAIN() AS LONG

DIALOG NEW 0, "SET center Line Test",,,200,200, %WS_SYSMENU, 0 TO hDlg

LOCAL V1, V2 AS SINGLE

'V1=94 'TWO LINE
'V1=95 'THREE LINE
V1=95.2 'FOUR LINE


'remark out 2 or 3 line for v1 94 ,95
CONTROL ADD LABEL, hDlg, 203,"4444" , 55, 50,75,12, 'FOUR LINE
CONTROL ADD LABEL, hDlg, 203,"3333" , 55, 60,75,12, 'THREE LINE
CONTROL ADD LABEL, hDlg, 203,"2222" , 55, 70,75,12 , 'TWO LINE
CONTROL ADD LABEL, hDlg, 203,"1111" , 55, 80,75,12,
CONTROL ADD LINE, hDlg, 203,"" , 50, V1,27,1, '%SS_BLACKFRAME
CONTROL ADD LABEL, hDlg, 203,"3333" , 55, 100,75,12,

DIALOG SHOW MODAL hDlg
END FUNCTION

---

'could also use _ key and change the Y LOCATION
#COMPILE EXE

FUNCTION PBMAIN() AS LONG
LOCAL hDlg, hFontTerminal AS LONG 'OEM CharSet = %OEM_CHARSET = 255

DIALOG NEW 0, "SET center Line Test",,,200,200, %WS_SYSMENU, 0 TO hDlg

LOCAL V1 AS SINGLE

V1=70

CONTROL ADD LABEL, hDlg, 203,"ABC" , 55, 60,100,12
CONTROL ADD LABEL, hDlg, 204,"___" , 55, V1,100,12
CONTROL ADD LABEL, hDlg, 205,"GHJ" , 55, 90,100,12

DIALOG SHOW MODAL hDlg
END FUNCTION