zkey 0.51: window caption updated

git-svn-id: svn://kolibrios.org@2549 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Kirill Lipatov (Leency) 2012-04-03 10:41:15 +00:00
parent c6044e1fc1
commit 71ed2cda32
2 changed files with 8 additions and 17 deletions

View File

@ -1,6 +1,6 @@
include 'proc32.inc' include 'proc32.inc'
macro start_draw_window x,y,xsize,ysize,areacolor,caption,capsize macro start_draw_window x,y,xsize,ysize,areacolor,caption
{ {
;pusha ;pusha
mov eax, 12 ; function 12:tell os about windowdraw mov eax, 12 ; function 12:tell os about windowdraw
@ -11,15 +11,7 @@ macro start_draw_window x,y,xsize,ysize,areacolor,caption,capsize
mov ebx, x*65536+xsize ; [x start] *65536 + [x size] mov ebx, x*65536+xsize ; [x start] *65536 + [x size]
mov ecx, y*65536+ysize ; [y start] *65536 + [y size] mov ecx, y*65536+ysize ; [y start] *65536 + [y size]
mov edx, areacolor ; color of work area RRGGBB mov edx, areacolor ; color of work area RRGGBB
mov esi, 0x00334455 ; color of grab bar RRGGBB mov edi, caption ; color of frames RRGGBB
mov edi, 0x00ddeeff ; color of frames RRGGBB
int 0x40
; WINDOW LABEL
mov eax, 4 ; function 4 : write text to window
mov ebx, 8*65536+8 ; [x start] *65536 + [y start]
mov ecx, 0x00ffffff ; color of text RRGGBB
mov edx, caption ; pointer to text beginning
mov esi, capsize ; text length
int 0x40 int 0x40
;popa ;popa
} }

View File

@ -1,5 +1,5 @@
; ;
; ZKEY. Version 0.5. ; ZKEY. Version 0.51.
; Virtual keyboard for KolibriOS. ; Virtual keyboard for KolibriOS.
; ;
; Author: Asper ; Author: Asper
@ -39,7 +39,7 @@ draw_window:
jnz @f jnz @f
test byte [red_type], 2 test byte [red_type], 2
jnz .draw_switch_button jnz .draw_switch_button
start_draw_window 100,370,600,210,0x04224466,labelt, 35;labellen-labelt start_draw_window 100,370,600,210,0x14224466,labelt
stdcall draw_button, 15,50,23,20,2,N_KEYCOLOR,keyText,3,TEXTCOLOR ; Esc stdcall draw_button, 15,50,23,20,2,N_KEYCOLOR,keyText,3,TEXTCOLOR ; Esc
@ -406,8 +406,7 @@ ret
; DATA AREA ; DATA AREA
; Application Title ; Application Title
labelt db 'ZKEY v.0.5 - keyboard for KolibriOS' labelt db 'ZKEY v0.51 - keyboard for KolibriOS', 0
labellen:
SwitchText db ' ASCII SCAN ' SwitchText db ' ASCII SCAN '