Examples grouped by GUI and console

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

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.

View File

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

View File

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

View File

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

View File

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

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)

View File

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

View File

Before

Width:  |  Height:  |  Size: 9.5 KiB

After

Width:  |  Height:  |  Size: 9.5 KiB

View File

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

View File

Before

Width:  |  Height:  |  Size: 4.4 KiB

After

Width:  |  Height:  |  Size: 4.4 KiB

View File

Before

Width:  |  Height:  |  Size: 19 KiB

After

Width:  |  Height:  |  Size: 19 KiB

View File

Before

Width:  |  Height:  |  Size: 1.2 KiB

After

Width:  |  Height:  |  Size: 1.2 KiB

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

Before

Width:  |  Height:  |  Size: 4.1 KiB

After

Width:  |  Height:  |  Size: 4.1 KiB

View File

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

View File

Before

Width:  |  Height:  |  Size: 4.1 KiB

After

Width:  |  Height:  |  Size: 4.1 KiB

View File

Before

Width:  |  Height:  |  Size: 4.1 KiB

After

Width:  |  Height:  |  Size: 4.1 KiB

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

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
)