Skip to content

Commit 107c49c

Browse files
committed
Create PascalAULWIndows Source
1 parent 804cc2a commit 107c49c

23 files changed

Lines changed: 21802 additions & 5 deletions

AULWindows.ico

187 KB
Binary file not shown.

AULWindows.lpi

Lines changed: 92 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,92 @@
1+
<?xml version="1.0" encoding="UTF-8"?>
2+
<CONFIG>
3+
<ProjectOptions>
4+
<Version Value="11"/>
5+
<PathDelim Value="\"/>
6+
<General>
7+
<SessionStorage Value="InProjectDir"/>
8+
<MainUnit Value="0"/>
9+
<Title Value="AULWindows"/>
10+
<Scaled Value="True"/>
11+
<ResourceType Value="res"/>
12+
<UseXPManifest Value="True"/>
13+
<XPManifest>
14+
<DpiAware Value="True"/>
15+
<ExecutionLevel Value="requireAdministrator"/>
16+
<TextName Value="SBS.AppDesktop.AULWindows"/>
17+
<TextDesc Value="Custom User Library Toolkit"/>
18+
</XPManifest>
19+
<Icon Value="0"/>
20+
</General>
21+
<VersionInfo>
22+
<UseVersionInfo Value="True"/>
23+
<AutoIncrementBuild Value="True"/>
24+
<MajorVersionNr Value="1"/>
25+
<MinorVersionNr Value="20"/>
26+
<BuildNr Value="48"/>
27+
<Attributes pvaPreRelease="True"/>
28+
<StringTable Comments="Custom User Library Toolkit" CompanyName="SBS Komputer" FileDescription="Custom User Library Toolkit" InternalName="AULWindows" LegalCopyright="Copyright 2020 - Stephanus Bagus Saputra" OriginalFilename="AULWindows" ProductName="AULWindows" ProductVersion="1.20"/>
29+
</VersionInfo>
30+
<BuildModes Count="1">
31+
<Item1 Name="Default" Default="True"/>
32+
</BuildModes>
33+
<PublishOptions>
34+
<Version Value="2"/>
35+
<UseFileFilters Value="True"/>
36+
</PublishOptions>
37+
<RunParams>
38+
<FormatVersion Value="2"/>
39+
<Modes Count="0"/>
40+
</RunParams>
41+
<RequiredPackages Count="1">
42+
<Item1>
43+
<PackageName Value="LCL"/>
44+
</Item1>
45+
</RequiredPackages>
46+
<Units Count="2">
47+
<Unit0>
48+
<Filename Value="AULWindows.lpr"/>
49+
<IsPartOfProject Value="True"/>
50+
</Unit0>
51+
<Unit1>
52+
<Filename Value="mainformunit.pas"/>
53+
<IsPartOfProject Value="True"/>
54+
<ComponentName Value="MainForm"/>
55+
<HasResources Value="True"/>
56+
<ResourceBaseClass Value="Form"/>
57+
<UnitName Value="MainFormUnit"/>
58+
</Unit1>
59+
</Units>
60+
</ProjectOptions>
61+
<CompilerOptions>
62+
<Version Value="11"/>
63+
<PathDelim Value="\"/>
64+
<Target>
65+
<Filename Value="AULWindows2"/>
66+
</Target>
67+
<SearchPaths>
68+
<IncludeFiles Value="$(ProjOutDir)"/>
69+
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
70+
</SearchPaths>
71+
<Linking>
72+
<Options>
73+
<Win32>
74+
<GraphicApplication Value="True"/>
75+
</Win32>
76+
</Options>
77+
</Linking>
78+
</CompilerOptions>
79+
<Debugging>
80+
<Exceptions Count="3">
81+
<Item1>
82+
<Name Value="EAbort"/>
83+
</Item1>
84+
<Item2>
85+
<Name Value="ECodetoolError"/>
86+
</Item2>
87+
<Item3>
88+
<Name Value="EFOpenError"/>
89+
</Item3>
90+
</Exceptions>
91+
</Debugging>
92+
</CONFIG>

AULWindows.lpr

Lines changed: 22 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,22 @@
1+
program AULWindows;
2+
3+
{$mode objfpc}{$H+}
4+
5+
uses
6+
{$IFDEF UNIX}{$IFDEF UseCThreads}
7+
cthreads,
8+
{$ENDIF}{$ENDIF}
9+
Interfaces, // this includes the LCL widgetset
10+
Forms, MainFormUnit
11+
{ you can add units after this };
12+
13+
{$R *.res}
14+
15+
begin
16+
RequireDerivedFormResource:=True;
17+
Application.Scaled:=True;
18+
Application.Initialize;
19+
Application.CreateForm(TMainForm, MainForm);
20+
Application.Run;
21+
end.
22+

AULWindows.lps

Lines changed: 159 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,159 @@
1+
<?xml version="1.0" encoding="UTF-8"?>
2+
<CONFIG>
3+
<ProjectSession>
4+
<PathDelim Value="\"/>
5+
<Version Value="11"/>
6+
<BuildModes Active="Default"/>
7+
<Units Count="2">
8+
<Unit0>
9+
<Filename Value="AULWindows.lpr"/>
10+
<IsPartOfProject Value="True"/>
11+
<EditorIndex Value="1"/>
12+
<TopLine Value="6"/>
13+
<CursorPos Y="21"/>
14+
<UsageCount Value="66"/>
15+
<Loaded Value="True"/>
16+
</Unit0>
17+
<Unit1>
18+
<Filename Value="mainformunit.pas"/>
19+
<IsPartOfProject Value="True"/>
20+
<ComponentName Value="MainForm"/>
21+
<HasResources Value="True"/>
22+
<ResourceBaseClass Value="Form"/>
23+
<UnitName Value="MainFormUnit"/>
24+
<IsVisibleTab Value="True"/>
25+
<TopLine Value="96"/>
26+
<CursorPos X="34" Y="109"/>
27+
<UsageCount Value="66"/>
28+
<Loaded Value="True"/>
29+
<LoadedDesigner Value="True"/>
30+
</Unit1>
31+
</Units>
32+
<JumpHistory Count="30" HistoryIndex="29">
33+
<Position1>
34+
<Filename Value="mainformunit.pas"/>
35+
<Caret Line="505" Column="5" TopLine="493"/>
36+
</Position1>
37+
<Position2>
38+
<Filename Value="mainformunit.pas"/>
39+
<Caret Line="495" Column="5" TopLine="485"/>
40+
</Position2>
41+
<Position3>
42+
<Filename Value="mainformunit.pas"/>
43+
<Caret Line="63" TopLine="55"/>
44+
</Position3>
45+
<Position4>
46+
<Filename Value="mainformunit.pas"/>
47+
<Caret Line="451" Column="122" TopLine="441"/>
48+
</Position4>
49+
<Position5>
50+
<Filename Value="mainformunit.pas"/>
51+
<Caret Line="493" Column="43" TopLine="485"/>
52+
</Position5>
53+
<Position6>
54+
<Filename Value="mainformunit.pas"/>
55+
<Caret Line="488" Column="3" TopLine="480"/>
56+
</Position6>
57+
<Position7>
58+
<Filename Value="mainformunit.pas"/>
59+
<Caret Line="494" Column="17" TopLine="481"/>
60+
</Position7>
61+
<Position8>
62+
<Filename Value="mainformunit.pas"/>
63+
<Caret Line="501" Column="5" TopLine="491"/>
64+
</Position8>
65+
<Position9>
66+
<Filename Value="mainformunit.pas"/>
67+
<Caret Line="497" Column="44" TopLine="491"/>
68+
</Position9>
69+
<Position10>
70+
<Filename Value="mainformunit.pas"/>
71+
<Caret Line="65" TopLine="57"/>
72+
</Position10>
73+
<Position11>
74+
<Filename Value="mainformunit.pas"/>
75+
<Caret Line="298" Column="10" TopLine="290"/>
76+
</Position11>
77+
<Position12>
78+
<Filename Value="mainformunit.pas"/>
79+
<Caret Line="150" Column="55" TopLine="143"/>
80+
</Position12>
81+
<Position13>
82+
<Filename Value="mainformunit.pas"/>
83+
<Caret Line="330" Column="11" TopLine="322"/>
84+
</Position13>
85+
<Position14>
86+
<Filename Value="mainformunit.pas"/>
87+
<Caret Line="495" Column="28" TopLine="492"/>
88+
</Position14>
89+
<Position15>
90+
<Filename Value="mainformunit.pas"/>
91+
<Caret Line="484" Column="5" TopLine="481"/>
92+
</Position15>
93+
<Position16>
94+
<Filename Value="mainformunit.pas"/>
95+
<Caret Line="483" Column="5" TopLine="480"/>
96+
</Position16>
97+
<Position17>
98+
<Filename Value="mainformunit.pas"/>
99+
<Caret Line="484" Column="5" TopLine="481"/>
100+
</Position17>
101+
<Position18>
102+
<Filename Value="mainformunit.pas"/>
103+
<Caret Line="483" Column="5" TopLine="480"/>
104+
</Position18>
105+
<Position19>
106+
<Filename Value="mainformunit.pas"/>
107+
<Caret Line="485" Column="5" TopLine="482"/>
108+
</Position19>
109+
<Position20>
110+
<Filename Value="mainformunit.pas"/>
111+
<Caret Line="484" Column="5" TopLine="481"/>
112+
</Position20>
113+
<Position21>
114+
<Filename Value="mainformunit.pas"/>
115+
<Caret Line="483" Column="5" TopLine="480"/>
116+
</Position21>
117+
<Position22>
118+
<Filename Value="mainformunit.pas"/>
119+
<Caret Line="482" Column="5" TopLine="479"/>
120+
</Position22>
121+
<Position23>
122+
<Filename Value="mainformunit.pas"/>
123+
<Caret Line="481" Column="5" TopLine="478"/>
124+
</Position23>
125+
<Position24>
126+
<Filename Value="mainformunit.pas"/>
127+
<Caret Line="482" Column="5" TopLine="479"/>
128+
</Position24>
129+
<Position25>
130+
<Filename Value="mainformunit.pas"/>
131+
<Caret Line="483" Column="5" TopLine="480"/>
132+
</Position25>
133+
<Position26>
134+
<Filename Value="mainformunit.pas"/>
135+
<Caret Line="484" Column="5" TopLine="481"/>
136+
</Position26>
137+
<Position27>
138+
<Filename Value="mainformunit.pas"/>
139+
<Caret Line="480" Column="16" TopLine="474"/>
140+
</Position27>
141+
<Position28>
142+
<Filename Value="mainformunit.pas"/>
143+
<Caret Line="111" Column="20" TopLine="104"/>
144+
</Position28>
145+
<Position29>
146+
<Filename Value="mainformunit.pas"/>
147+
<Caret Line="515" Column="48" TopLine="509"/>
148+
</Position29>
149+
<Position30>
150+
<Filename Value="mainformunit.pas"/>
151+
<Caret Line="62" Column="54" TopLine="57"/>
152+
</Position30>
153+
</JumpHistory>
154+
<RunParams>
155+
<FormatVersion Value="2"/>
156+
<Modes Count="0" ActiveMode=""/>
157+
</RunParams>
158+
</ProjectSession>
159+
</CONFIG>

AULWindows.png

25.4 KB
Loading

AULWindows.res

190 KB
Binary file not shown.

LICENSE

Lines changed: 3 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,5 @@
1-
BSD 3-Clause License
2-
3-
Copyright (c) 2023, Stephanus Dai Developer
1+
Copyright © ID 2022-2023 by Stephanus Bagus Saputra (www.stephanusdai.web.id)
2+
All rights reserved.
43

54
Redistribution and use in source and binary forms, with or without
65
modification, are permitted provided that the following conditions are met:
@@ -25,4 +24,4 @@ DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
2524
SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
2625
CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
2726
OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
28-
OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27+
OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

README.md

Lines changed: 16 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,2 +1,17 @@
1-
# PascalAULWindows
1+
AULWindows
2+
--------------------------------------------
3+
4+
author: Stephanus Bagus Saputra; email: stephanusdai@icloud.com; visit: http://stephanusdai.web.id
5+
26
AULWindows is Tool Software for Custom User Library Windows
7+
8+
9+
LOG VERSION
10+
--------------------------------------------
11+
12+
Version 1.20
13+
* Published
14+
15+
Version 2.20
16+
* Added feature for type display folder.
17+
* Added feature for clear log history.

0 commit comments

Comments
 (0)