badpork/kolibrios
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Pull Requests Activity

zkey 0.51: window caption updated

Browse Source 
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
programs/system/zkey/trunk/ASPAPI.INC
View File

@ -1,25 +1,17 @@
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
mov eax, 12 ; function 12:tell os about windowdraw
mov ebx, 1 ; 1, start of draw
int 0x40
; DRAW WINDOW
mov eax, 0 ; function 0 : define and draw window
mov ebx, x*65536+xsize ; [x start] *65536 + [x size]
mov ecx, y*65536+ysize ; [y start] *65536 + [y size]
mov eax, 0 ; function 0 : define and draw window
mov ebx, x*65536+xsize ; [x start] *65536 + [x size]
mov ecx, y*65536+ysize ; [y start] *65536 + [y size]
mov edx, areacolor ; color of work area RRGGBB
mov esi, 0x00334455 ; color of grab bar 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
mov edi, caption ; color of frames RRGGBB
int 0x40
;popa
}

7
programs/system/zkey/trunk/ZKEY.ASM
View File

@ -1,5 +1,5 @@
;
; ZKEY. Version 0.5.
; ZKEY. Version 0.51.
; Virtual keyboard for KolibriOS.
;
; Author: Asper
@ -39,7 +39,7 @@ draw_window:
jnz @f
test byte [red_type], 2
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
@ -406,8 +406,7 @@ ret
; DATA AREA
; Application Title
labelt db 'ZKEY v.0.5 - keyboard for KolibriOS'
labellen:
labelt db 'ZKEY v0.51 - keyboard for KolibriOS', 0
SwitchText db ' ASCII SCAN '