KolibriOS unit formatted to the Borland/Embarcadero style, migrated to native Delphi types

This commit is contained in:
2020-05-23 16:32:30 +03:00
parent eee4e1beeb
commit f77ebd28fc
13 changed files with 3502 additions and 3550 deletions

View File

@@ -81,7 +81,7 @@ begin
begin
BeginDraw;
DrawWindow(Left, Top, Right, Bottom, 'Draw Image', $00FFFFFF,
WS_SKINNED_FIXED + WS_COORD_CLIENT + WS_CAPTION, CAPTION_MOVABLE);
WS_SKINNED_FIXED + WS_CLIENT_COORDS + WS_CAPTION, CAPTION_MOVABLE);
with TargaFile.Header do
DrawImage(Image^, 30, 20, Width, Height);
EndDraw;