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

Examples grouped by GUI and console

Browse Source
This commit is contained in:
Владислав Джавадов 2020-06-08 01:23:29 +03:00
parent 69fbd69abc
commit 92d967d122
59 changed files with 46 additions and 76 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Examples/ColorButtons/build.bat
View File

@ -1 +0,0 @@
@call "%~dp0..\..\Lib\build.bat" "%~dp0ColorButtons"

0
Examples/ConsoleColors/ConsoleColors.dpr → Examples/Console/ConsoleColors/ConsoleColors.dpr
View File

1
Examples/Console/ConsoleColors/build.bat Normal file
View File

@ -0,0 +1 @@
@call "%~dp0..\..\..\Lib\build.bat" "%~dp0ConsoleColors"

1
Examples/Console/DateTime/build.bat Normal file
View File

@ -0,0 +1 @@
@call "%~dp0..\..\..\Lib\build.bat" "%~dp0DateTime"

0
Examples/GetCurrentDir/GetCurrentDir.dpr → Examples/Console/GetCurrentDir/GetCurrentDir.dpr
View File

1
Examples/Console/GetCurrentDir/build.bat Normal file
View File

@ -0,0 +1 @@
@call "%~dp0..\..\..\Lib\build.bat" "%~dp0GetCurrentDir"

0
Examples/Hello/Hello.dpr → Examples/Console/Hello/Hello.dpr
View File

1
Examples/Console/Hello/build.bat Normal file
View File

@ -0,0 +1 @@
@call "%~dp0..\..\..\Lib\build.bat" "%~dp0Hello"

0
Examples/LoadFile/LoadFile.dpr → Examples/Console/LoadFile/LoadFile.dpr
View File

1
Examples/Console/LoadFile/build.bat Normal file
View File

@ -0,0 +1 @@
@call "%~dp0..\..\..\Lib\build.bat" "%~dp0LoadFile"

0
Examples/ReadFolder/ReadFolder.dpr → Examples/Console/ReadFolder/ReadFolder.dpr
View File

1
Examples/Console/ReadFolder/build.bat Normal file
View File

@ -0,0 +1 @@
@call "%~dp0..\..\..\Lib\build.bat" "%~dp0ReadFolder"

1
Examples/ConsoleColors/build.bat
View File

@ -1 +0,0 @@
@call "%~dp0..\..\Lib\build.bat" "%~dp0ConsoleColors"

34
Examples/DateTime/DateTime.dpr
View File

@ -1,34 +0,0 @@
program DateTime;
uses
KolibriOS, CRT;
var
SystemDate: TSystemDate;
SystemTime: TSystemTime;
CursorPos: TConsolePoint;
begin
ConsoleInit('Date/Time');
SetCursorHeight(0);
SetCursorPos(27, 11);
Write(
'System Date and System Time'#10 +
' '
);
CursorPos := GetCursorPos;
repeat
SystemDate := GetSystemDate;
SystemTime := GetSystemTime;
with SystemDate, SystemTime do
begin
Write('%02x.%02x.%02x', Day, Month, Year);
Write(' - %02x:%02x:%02x', Hours, Minutes, Seconds);
end;
SetCursorPos(CursorPos);
Sleep(50);
until Escape;
ConsoleExit(True);
end.

1
Examples/DateTime/build.bat
View File

@ -1 +0,0 @@
@call "%~dp0..\..\Lib\build.bat" "%~dp0DateTime"

3
Examples/DrawImage/build.bat
View File

@ -1,3 +0,0 @@
@echo off
call "%~dp0..\..\Lib\build.bat" "%~dp0DrawImage"
copy "%~dp0*.tga" "%~dp0..\..\Bin" >nul

3
Examples/DrawImageEx/build.bat
View File

@ -1,3 +0,0 @@
@echo off
call "%~dp0..\..\Lib\build.bat" "%~dp0DrawImageEx"
copy "%~dp0*.bmp" "%~dp0..\..\Bin" >nul

1
Examples/DrawText/build.bat
View File

@ -1 +0,0 @@
@call "%~dp0..\..\Lib\build.bat" "%~dp0DrawText"

34
Examples/Examples.bpg
View File

@ -15,53 +15,53 @@ PROJECTS = ColorButtons.exe ConsoleColors.exe DateTime.exe DrawImage.exe DrawIma
default: $(PROJECTS)
#------------------------------------------------------------------------------
ColorButtons.exe: ColorButtons\ColorButtons.dpr
ColorButtons.exe: GUI\ColorButtons\ColorButtons.dpr
$(DCC)
ConsoleColors.exe: ConsoleColors\ConsoleColors.dpr
ConsoleColors.exe: Console\ConsoleColors\ConsoleColors.dpr
$(DCC)
DateTime.exe: DateTime\DateTime.dpr
DateTime.exe: Console\DateTime\DateTime.dpr
$(DCC)
DrawImage.exe: DrawImage\DrawImage.dpr
DrawImage.exe: GUI\DrawImage\DrawImage.dpr
$(DCC)
DrawImageEx.exe: DrawImageEx\DrawImageEx.dpr
DrawImageEx.exe: GUI\DrawImageEx\DrawImageEx.dpr
$(DCC)
DrawText.exe: DrawText\DrawText.dpr
DrawText.exe: GUI\DrawText\DrawText.dpr
$(DCC)
GetCurrentDirectory.exe: GetCurrentDir\GetCurrentDir.dpr
GetCurrentDirectory.exe: Console\GetCurrentDir\GetCurrentDir.dpr
$(DCC)
GetPixel.exe: GetPixel\GetPixel.dpr
GetPixel.exe: GUI\GetPixel\GetPixel.dpr
$(DCC)
GetPointOwner.exe: GetPointOwner\GetPointOwner.dpr
GetPointOwner.exe: GUI\GetPointOwner\GetPointOwner.dpr
$(DCC)
Hello.exe: Hello\Hello.dpr
Hello.exe: Console\Hello\Hello.dpr
$(DCC)
HelloGUI.exe: Hello\HelloGUI.dpr
HelloGUI.exe: GUI\Hello\HelloGUI.dpr
$(DCC)
LoadFile.exe: LoadFile\LoadFile.dpr
LoadFile.exe: Console\LoadFile\LoadFile.dpr
$(DCC)
ReadFolder.exe: ReadFolder\ReadFolder.dpr
ReadFolder.exe: Console\ReadFolder\ReadFolder.dpr
$(DCC)
Screenshot.exe: Screenshot\Screenshot.dpr
Screenshot.exe: GUI\Screenshot\Screenshot.dpr
$(DCC)
SetCursor.exe: SetCursor\SetCursor.dpr
SetCursor.exe: GUI\SetCursor\SetCursor.dpr
$(DCC)
SetPixel.exe: SetPixel\SetPixel.dpr
SetPixel.exe: GUI\SetPixel\SetPixel.dpr
$(DCC)
SetWindowPos.exe: SetWindowPos\SetWindowPos.dpr
SetWindowPos.exe: GUI\SetWindowPos\SetWindowPos.dpr
$(DCC)

0
Examples/ColorButtons/ColorButtons.dpr → Examples/GUI/ColorButtons/ColorButtons.dpr
View File

1
Examples/GUI/ColorButtons/build.bat Normal file
View File

@ -0,0 +1 @@
@call "%~dp0..\..\..\Lib\build.bat" "%~dp0ColorButtons"

0
Examples/DrawImage/DrawImage.dpr → Examples/GUI/DrawImage/DrawImage.dpr
View File

0
Examples/DrawImage/Lena.tga → Examples/GUI/DrawImage/Lena.tga
View File

Side by Side Swipe Overlay

Before

Width:  |  Height:  |  Size: 9.5 KiB

After

Width:  |  Height:  |  Size: 9.5 KiB

3
Examples/GUI/DrawImage/build.bat Normal file
View File

@ -0,0 +1,3 @@
@echo off
call "%~dp0..\..\..\Lib\build.bat" "%~dp0DrawImage"
copy "%~dp0*.tga" "%~dp0..\..\..\Bin" >nul

0
Examples/DrawImageEx/DrawImageEx.dpr → Examples/GUI/DrawImageEx/DrawImageEx.dpr
View File

0
Examples/DrawImageEx/Flower(4bpp).bmp → Examples/GUI/DrawImageEx/Flower(4bpp).bmp
View File

Side by Side Swipe Overlay

Before

Width:  |  Height:  |  Size: 4.4 KiB

After

Width:  |  Height:  |  Size: 4.4 KiB

0
Examples/DrawImageEx/House(24bpp).bmp → Examples/GUI/DrawImageEx/House(24bpp).bmp
View File

Side by Side Swipe Overlay

Before

Width:  |  Height:  |  Size: 19 KiB

After

Width:  |  Height:  |  Size: 19 KiB

0
Examples/DrawImageEx/Mario(1bpp).bmp → Examples/GUI/DrawImageEx/Mario(1bpp).bmp
View File

Side by Side Swipe Overlay

Before

Width:  |  Height:  |  Size: 1.2 KiB

After

Width:  |  Height:  |  Size: 1.2 KiB

3
Examples/GUI/DrawImageEx/build.bat Normal file
View File

@ -0,0 +1,3 @@
@echo off
call "%~dp0..\..\..\Lib\build.bat" "%~dp0DrawImageEx"
copy "%~dp0*.bmp" "%~dp0..\..\..\Bin" >nul

0
Examples/DrawText/DrawText.dpr → Examples/GUI/DrawText/DrawText.dpr
View File

1
Examples/GUI/DrawText/build.bat Normal file
View File

@ -0,0 +1 @@
@call "%~dp0..\..\..\Lib\build.bat" "%~dp0DrawText"

0
Examples/GetPixel/GetPixel.dpr → Examples/GUI/GetPixel/GetPixel.dpr
View File

1
Examples/GUI/GetPixel/build.bat Normal file
View File

@ -0,0 +1 @@
@call "%~dp0..\..\..\Lib\build.bat" "%~dp0GetPixel"

0
Examples/GetPointOwner/GetPointOwner.dpr → Examples/GUI/GetPointOwner/GetPointOwner.dpr
View File

1
Examples/GUI/GetPointOwner/build.bat Normal file
View File

@ -0,0 +1 @@
@call "%~dp0..\..\..\Lib\build.bat" "%~dp0GetPointOwner"

0
Examples/Hello/HelloGUI.dpr → Examples/GUI/Hello/HelloGUI.dpr
View File

1
Examples/GUI/Hello/build.bat Normal file
View File

@ -0,0 +1 @@
@call "%~dp0..\..\..\Lib\build.bat" "%~dp0HelloGUI"

0
Examples/Screenshot/Screenshot.dpr → Examples/GUI/Screenshot/Screenshot.dpr
View File

1
Examples/GUI/Screenshot/build.bat Normal file
View File

@ -0,0 +1 @@
@call "%~dp0..\..\..\Lib\build.bat" "%~dp0Screenshot"

0
Examples/SetCursor/SetCursor.dpr → Examples/GUI/SetCursor/SetCursor.dpr
View File

0
Examples/SetCursor/arrow.bmp → Examples/GUI/SetCursor/arrow.bmp
View File

Side by Side Swipe Overlay

Before

Width:  |  Height:  |  Size: 4.1 KiB

After

Width:  |  Height:  |  Size: 4.1 KiB

3
Examples/GUI/SetCursor/build.bat Normal file
View File

@ -0,0 +1,3 @@
@echo off
call "%~dp0..\..\..\Lib\build.bat" "%~dp0SetCursor"
copy "%~dp0*.bmp" "%~dp0..\..\..\Bin" >nul

0
Examples/SetCursor/point.bmp → Examples/GUI/SetCursor/point.bmp
View File

Side by Side Swipe Overlay

Before

Width:  |  Height:  |  Size: 4.1 KiB

After

Width:  |  Height:  |  Size: 4.1 KiB

0
Examples/SetCursor/wait.bmp → Examples/GUI/SetCursor/wait.bmp
View File

Side by Side Swipe Overlay

Before

Width:  |  Height:  |  Size: 4.1 KiB

After

Width:  |  Height:  |  Size: 4.1 KiB

0
Examples/SetPixel/SetPixel.dpr → Examples/GUI/SetPixel/SetPixel.dpr
View File

1
Examples/GUI/SetPixel/build.bat Normal file
View File

@ -0,0 +1 @@
@call "%~dp0..\..\..\Lib\build.bat" "%~dp0SetPixel"

0
Examples/SetWindowPos/SetWindowPos.dpr → Examples/GUI/SetWindowPos/SetWindowPos.dpr
View File

1
Examples/GUI/SetWindowPos/build.bat Normal file
View File

@ -0,0 +1 @@
@call "%~dp0..\..\..\Lib\build.bat" "%~dp0SetWindowPos"

1
Examples/GetCurrentDir/build.bat
View File

@ -1 +0,0 @@
@call "%~dp0..\..\Lib\build.bat" "%~dp0GetCurrentDir"

1
Examples/GetPixel/build.bat
View File

@ -1 +0,0 @@
@call "%~dp0..\..\Lib\build.bat" "%~dp0GetPixel"

1
Examples/GetPointOwner/build.bat
View File

@ -1 +0,0 @@
@call "%~dp0..\..\Lib\build.bat" "%~dp0GetPointOwner"

3
Examples/Hello/build.bat
View File

@ -1,3 +0,0 @@
@echo off
call "%~dp0..\..\Lib\build.bat" "%~dp0Hello"
call "%~dp0..\..\Lib\build.bat" "%~dp0HelloGUI"

1
Examples/LoadFile/build.bat
View File

@ -1 +0,0 @@
@call "%~dp0..\..\Lib\build.bat" "%~dp0LoadFile"

1
Examples/ReadFolder/build.bat
View File

@ -1 +0,0 @@
@call "%~dp0..\..\Lib\build.bat" "%~dp0ReadFolder"

1
Examples/Screenshot/build.bat
View File

@ -1 +0,0 @@
@call "%~dp0..\..\Lib\build.bat" "%~dp0Screenshot"

3
Examples/SetCursor/build.bat
View File

@ -1,3 +0,0 @@
@echo off
call "%~dp0..\..\Lib\build.bat" "%~dp0SetCursor"
copy "%~dp0*.bmp" "%~dp0..\..\Bin" >nul

1
Examples/SetPixel/build.bat
View File

@ -1 +0,0 @@
@call "%~dp0..\..\Lib\build.bat" "%~dp0SetPixel"

1
Examples/SetWindowPos/build.bat
View File

@ -1 +0,0 @@
@call "%~dp0..\..\Lib\build.bat" "%~dp0SetWindowPos"

7
build-examples.bat
View File

@ -1,6 +1,11 @@
@echo off
for /d %%f in (%~dp0Examples\*) do (
for /d %%f in (%~dp0Examples\Console\*) do (
call %%f\build.bat
if errorlevel 1 goto exit
)
for /d %%f in (%~dp0Examples\GUI\*) do (
call %%f\build.bat
if errorlevel 1 goto exit
)