Freeman/SDK
1
0
Fork 0
mirror of https://github.com/vapaamies/KolibriOS.git synced 2025-09-21 22:53:51 +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
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;