Freeman/SDK
1
0
Fork 0
mirror of https://github.com/vapaamies/KolibriOS.git synced 2024-09-19 17:41:01 +02:00
Code Issues Actions Packages Projects Releases Wiki Activity

KolibriOS window styles sorted by value, WS_NO_DRAW and WINDOW_BORDER_SIZE added

Browse Source
This commit is contained in:
Владислав Джавадов 2020-12-27 02:00:40 +03:00
parent e4a5b1e0a6
commit 66f8410294
2 changed files with 11 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
Examples/GUI/Screenshot/Screenshot.dpr
View File

@ -3,9 +3,6 @@ program Screenshot;
uses
KolibriOS;
const
BORDER_SIZE = 5;
type
TRGBTriple = packed record
Blue: Byte;
@ -63,8 +60,8 @@ begin
with ScreenSize do
begin
WndWidth := BORDER_SIZE * 2 + Width div 2 - 1;
WndHeight := BORDER_SIZE + GetSkinHeight + Height div 2 - 1;
WndWidth := WINDOW_BORDER_SIZE * 2 + Width div 2 - 1;
WndHeight := WINDOW_BORDER_SIZE + GetSkinHeight + Height div 2 - 1;
WndLeft := (Width - WndWidth) div 2;
WndTop := (Height - WndHeight) div 2;

15
Lib/KolibriOS.pas
View File

@ -245,15 +245,18 @@ type
const
INVALID_HANDLE = 0;
WINDOW_BORDER_SIZE = 5; // defined by kernel
// Window styles
WS_SKINNED_FIXED = $4000000;
WS_SKINNED_SIZABLE = $3000000;
WS_FIXED = $0000000;
WS_SIZABLE = $2000000;
WS_FIXED = $00000000;
WS_NO_DRAW = $01000000;
WS_SIZABLE = $02000000;
WS_SKINNED_SIZABLE = $03000000;
WS_SKINNED_FIXED = $04000000;
WS_CAPTION = $10000000;
WS_CLIENT_COORDS = $20000000;
WS_TRANSPARENT_FILL = $40000000;
WS_GRADIENT_FILL = $80000000;
WS_CLIENT_COORDS = $20000000;
WS_CAPTION = $10000000;
// Caption styles
CAPTION_MOVABLE = $00000000;