Now there is a way to make finer adjustments in the alignment of text, right/center/left by adding a space on left,right or both sides of the prompt
"Prompt" --> Default alignment
"Prompt " --> Left Alignment
" Prompt" --> Right Alignment
" Prompt " --> Center (horizontally) Alignment.
Following sample, demonstrates the usage.
- Code: Select all Expand view
- function BtnText1()
local oDlg, oBtn, oFont
DEFINE FONT oFont NAME "TAHOMA" SIZE 0,-16
DEFINE DIALOG oDlg SIZE 460,460 PIXEL TRUEPIXEL FONT oFont ;
TITLE "BTNBMP TEXT ALIGNMENTS"
@ 20,20 BTNBMP oBtn FILE "..\bitmaps\32x32\task.bmp" ;
PROMPT "Default" + CRLF + "Alignment" LEFT ;
SIZE 200,60 PIXEL OF oDlg 2007
@ 100,20 BTNBMP oBtn FILE "..\bitmaps\32x32\copy.bmp" ;
PROMPT "Left" + CRLF + "Alignment " LEFT ;
SIZE 200,60 PIXEL OF oDlg 2007
@ 180,20 BTNBMP oBtn FILE "..\bitmaps\32x32\paste.bmp" ;
PROMPT " Center" + CRLF + "Alignment " LEFT ;
SIZE 200,60 PIXEL OF oDlg 2007
@ 20,240 BTNBMP oBtn FILE "..\bitmaps\32x32\task.bmp" ;
PROMPT "Default" + CRLF + "Alignment" RIGHT ;
SIZE 200,60 PIXEL OF oDlg 2007
@ 100,240 BTNBMP oBtn FILE "..\bitmaps\32x32\copy.bmp" ;
PROMPT " Right" + CRLF + "Alignment" RIGHT ;
SIZE 200,60 PIXEL OF oDlg 2007
@ 180,240 BTNBMP oBtn FILE "..\bitmaps\32x32\paste.bmp" ;
PROMPT " Center" + CRLF + "Alignment " RIGHT ;
SIZE 200,60 PIXEL OF oDlg 2007
@ 260, 20 BTNBMP oBtn FILE "..\bitmaps\32x32\task.bmp" ;
PROMPT "Left " TOP ;
SIZE 128,80 PIXEL OF oDlg 2007
@ 260,165 BTNBMP oBtn FILE "..\bitmaps\32x32\copy.bmp" ;
PROMPT "Default" TOP ;
SIZE 128,80 PIXEL OF oDlg 2007
@ 260,312 BTNBMP oBtn FILE "..\bitmaps\32x32\paste.bmp" ;
PROMPT " Right" TOP ;
SIZE 128,80 PIXEL OF oDlg 2007
@ 360, 20 BTNBMP oBtn FILE "..\bitmaps\32x32\task.bmp" ;
PROMPT "Left " BOTTOM ;
SIZE 128,80 PIXEL OF oDlg 2007
@ 360,165 BTNBMP oBtn FILE "..\bitmaps\32x32\copy.bmp" ;
PROMPT "Default" BOTTOM ;
SIZE 128,80 PIXEL OF oDlg 2007
@ 360,312 BTNBMP oBtn FILE "..\bitmaps\32x32\paste.bmp" ;
PROMPT " Right" BOTTOM ;
SIZE 128,80 PIXEL OF oDlg 2007
ACTIVATE DIALOG oDlg CENTERED
RELEASE FONT oFont
return nil