Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Dialog background color
#7
Thanks for your help Gintara but i can't work out how to do it i'm kinda new at doing this sort of thing here is my code i have so far can u show me how to make the background behind text same as (ColorFromRGB(216 250 250)).just when and if u have time..

Code:
Copy      Help
\Dialog_Editor
function# hDlg message wParam lParam
if(hDlg) goto messages

GdiObject- brush=CreateSolidBrush(ColorFromRGB(167 246 2))
GdiObject- red=CreateSolidBrush(ColorFromRGB(216 250 250))

str controls = "3 5"
str cb3 si5
cb3="XTRA[]QUICKMACROS[]T.A.B"
si5="&Games.ico"
if(!ShowDialog("Web_Pages" &Web_Pages &controls)) ret

;BEGIN DIALOG
;0 "" 0x90C80A44 0x100 0 0 87 65 "WEB"
;2 Button 0x54030000 0x4 30 50 30 12 "Cancel"
;3 ComboBox 0x54230243 0x0 4 10 80 213 ""
;5 Static 0x54000003 0x0 34 24 26 24 ""
;4 Button 0x54020007 0x0 2 2 84 62 "WEB PAGES"
;END DIALOG
;DIALOG EDITOR: "" 0x2010901 "" ""


ret
;messages
mov 816 444 hDlg
sel message

,case WM_INITDIALOG
,case WM_COMMAND goto messages2
,case WM_CTLCOLORDLG ret brush
,case WM_CTLCOLORSTATIC ret brush
,case WM_CTLCOLORLISTBOX ret red
,
ret
;messages2
sel wParam
,case CBN_SELENDOK<<16|3
,_i=CB_SelectedItem(lParam)
,sel _i
,,case 0 web "http://nz.yahoo.com/" 0
,,case 1 web "www.quickmacros.com/forum" 0
,,case 2 web "www.tab.co.nz/racing/" 0

,case IDOK
ret 1


[/code]


Messages In This Thread

Forum Jump:


Users browsing this thread: 4 Guest(s)