I'm now trying to draw a line on top of a dialog.
The following code does not work, and in any case I don't
see how it would RESIZE as the dialog chnaged sizes.
Could someone help point me in the right direction to
draw one simple straight line correctly?
----------------------------------------------------------
The following code does not work, and in any case I don't
see how it would RESIZE as the dialog chnaged sizes.
Could someone help point me in the right direction to
draw one simple straight line correctly?
----------------------------------------------------------
Code:
#COMPILE EXE #REGISTER NONE $INCLUDE "WIN32API.INC" $INCLUDE "MA.INC" FUNCTION PBMAIN() AS LONG LOCAL hDlg AS LONG DIALOG NEW 0,"Draw Line",,,320,240,_ %WS_CAPTION OR %WS_SYSMENU OR %WS_THICKFRAME OR %WS_MAXIMIZEBOX OR _ %WS_MINIMIZEBOX OR %DS_CONTEXTHELP,0 TO hDlg SelectObject(hDlg,GetStockObject(%Black_Pen)) MoveToEx hDlg,5, 5,BYVAL %NULL LineTo hDlg,5,200 DIALOG SHOW MODAL hDlg END FUNCTION
Comment