颜色搭配的网站网站站长工具

;运行效果

;win32汇编环境,窗口程序使用跟踪条(滑块)控件示例一
;生成2条横的跟踪条，分别设置不同的数值范围，设置不同的进度副度的例子
;直接抄进RadAsm可编译运行。重要部分加备注。
;下面为asm文件
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
.386 
.model flat,stdcall 
option casemap:none 
include      windows.inc 
include      user32.inc
include      kernel32.inc 
 
includelib   user32.lib           
includelib   kernel32.lib 
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
WinMain proto :DWORD,:DWORD,:DWORD,:DWORD       
                                                
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
.DATA                                   
ClassName           db "SimpleWinClass",0        
AppName             db "窗口程序的模版",0  
szTRClassName       db "msctls_trackbar32",0        ;跟踪条控件类名
szSTClassName       db "static",0                   ;静态控件类名
szButtonClassName   db "button",0                   ;按钮类名
szCaption           db "提示",0
szFormat01          db "当前跟踪条所在的位置值是 %d",0

szSTCaptionA01      db "0",0   
szSTCaptionA02      db "100",0  
szSTCaptionA03      db "跟踪条一：",0 
szSTCaptionA04      db "0",0 

szSTCaptionB01      db "20",0   
szSTCaptionB02      db "170",0  
szSTCaptionB03      db "跟踪条二：",0 
szSTCaptionB04      db "20",0  

szButtonTitle01     db "查看跟踪条一当前位置值",0 
szButtonTitle02     db "把跟踪条一位置设到34单位处",0    

.DATA?                                  
hInstance HINSTANCE  ?                
CommandLine LPSTR    ? 

hID_TR01       dd    ?     ;跟踪条控件句柄
hID_TR02       dd    ?

hID_VALUECA01  dd    ? 
hID_VALUECA02  dd    ?
hID_VALUECA03  dd    ?
hID_VALUECA04  dd    ?

hID_VALUECB01  dd    ? 
hID_VALUECB02  dd    ?
hID_VALUECB03  dd    ?
hID_VALUECB04  dd    ?

hButton01      dd    ?  
hButton02      dd    ?

dwPos01        dd    ?
dwPos02        dd    ?
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>                
; Equ 等值定义
IDC_TR01      equ 101