Skip to content

Commit c6a7b7a

Browse files
codeleventhcodeleventh
committed
TypeAndRun 4b7
0 parents  commit c6a7b7a

683 files changed

Lines changed: 73713 additions & 0 deletions

File tree

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

‎!~Library/AlignEdit/AlignEdit.dcu‎

4.17 KB
Binary file not shown.

‎!~Library/AlignEdit/AlignEdit.pas‎

Lines changed: 63 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,63 @@
1+
unit AlignEdit;
2+
3+
interface
4+
5+
uses
6+
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
7+
StdCtrls;
8+
9+
type
10+
11+
TAlign = (eaLeft, eaCenter, eaRight);
12+
13+
TAlignEdit = class(TEdit)
14+
private
15+
{ Private-Deklarationen }
16+
FAlign: TAlign;
17+
procedure SetAlign(const Value: TAlign);
18+
protected
19+
{ Protected-Deklarationen }
20+
procedure CreateParams(var Params: TCreateParams); override;
21+
public
22+
{ Public-Deklarationen }
23+
constructor Create(AOwner: TComponent); override;
24+
published
25+
{ Published-Deklarationen }
26+
property Alignment: TAlign read FAlign write SetAlign default eaLeft;
27+
end;
28+
29+
procedure Register;
30+
31+
implementation
32+
33+
constructor TAlignEdit.Create(Aowner: TComponent);
34+
begin
35+
inherited Create(AOwner);
36+
FAlign := eaLeft;
37+
end;
38+
39+
procedure TAlignEdit.SetAlign(const Value: TAlign);
40+
begin
41+
if FAlign <> Value then
42+
begin
43+
FAlign := Value;
44+
RecreateWnd;
45+
end;
46+
end;
47+
48+
procedure TAlignEdit.CreateParams(var Params: TCreateParams);
49+
begin
50+
inherited;
51+
case FAlign of
52+
eaLeft: Params.Style := Params.Style or ES_LEFT;
53+
eaCenter: Params.Style := Params.Style or ES_CENTER;
54+
eaRight: Params.Style := Params.Style or ES_RIGHT;
55+
end;
56+
end;
57+
58+
procedure Register;
59+
begin
60+
RegisterComponents('Standard', [TAlignEdit]);
61+
end;
62+
63+
end.

‎!~Library/AlignEdit/AlignEditPackage.cfg‎

Lines changed: 39 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,39 @@
1+
-$A8
2+
-$B-
3+
-$C+
4+
-$D+
5+
-$E-
6+
-$F-
7+
-$G+
8+
-$H+
9+
-$I+
10+
-$J-
11+
-$K-
12+
-$L+
13+
-$M-
14+
-$N+
15+
-$O+
16+
-$P+
17+
-$Q-
18+
-$R-
19+
-$S-
20+
-$T-
21+
-$U-
22+
-$V+
23+
-$W-
24+
-$X+
25+
-$YD
26+
-$Z1
27+
-cg
28+
-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
29+
-H+
30+
-W+
31+
-M
32+
-$M16384,1048576
33+
-K$00400000
34+
-LE"c:\program files\borland\delphi7\Projects\Bpl"
35+
-LN"c:\program files\borland\delphi7\Projects\Bpl"
36+
-Z
37+
-w-UNSAFE_TYPE
38+
-w-UNSAFE_CODE
39+
-w-UNSAFE_CAST

‎!~Library/AlignEdit/AlignEditPackage.dcu‎

3.38 KB
Binary file not shown.

‎!~Library/AlignEdit/AlignEditPackage.dof‎

Lines changed: 132 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,132 @@
1+
[FileVersion]
2+
Version=7.0
3+
[Compiler]
4+
A=8
5+
B=0
6+
C=1
7+
D=1
8+
E=0
9+
F=0
10+
G=1
11+
H=1
12+
I=1
13+
J=0
14+
K=0
15+
L=1
16+
M=0
17+
N=1
18+
O=1
19+
P=1
20+
Q=0
21+
R=0
22+
S=0
23+
T=0
24+
U=0
25+
V=1
26+
W=0
27+
X=1
28+
Y=1
29+
Z=1
30+
ShowHints=1
31+
ShowWarnings=1
32+
UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
33+
NamespacePrefix=
34+
SymbolDeprecated=1
35+
SymbolLibrary=1
36+
SymbolPlatform=1
37+
UnitLibrary=1
38+
UnitPlatform=1
39+
UnitDeprecated=1
40+
HResultCompat=1
41+
HidingMember=1
42+
HiddenVirtual=1
43+
Garbage=1
44+
BoundsError=1
45+
ZeroNilCompat=1
46+
StringConstTruncated=1
47+
ForLoopVarVarPar=1
48+
TypedConstVarPar=1
49+
AsgToTypedConst=1
50+
CaseLabelRange=1
51+
ForVariable=1
52+
ConstructingAbstract=1
53+
ComparisonFalse=1
54+
ComparisonTrue=1
55+
ComparingSignedUnsigned=1
56+
CombiningSignedUnsigned=1
57+
UnsupportedConstruct=1
58+
FileOpen=1
59+
FileOpenUnitSrc=1
60+
BadGlobalSymbol=1
61+
DuplicateConstructorDestructor=1
62+
InvalidDirective=1
63+
PackageNoLink=1
64+
PackageThreadVar=1
65+
ImplicitImport=1
66+
HPPEMITIgnored=1
67+
NoRetVal=1
68+
UseBeforeDef=1
69+
ForLoopVarUndef=1
70+
UnitNameMismatch=1
71+
NoCFGFileFound=1
72+
MessageDirective=1
73+
ImplicitVariants=1
74+
UnicodeToLocale=1
75+
LocaleToUnicode=1
76+
ImagebaseMultiple=1
77+
SuspiciousTypecast=1
78+
PrivatePropAccessor=1
79+
UnsafeType=0
80+
UnsafeCode=0
81+
UnsafeCast=0
82+
[Linker]
83+
MapFile=0
84+
OutputObjs=0
85+
ConsoleApp=1
86+
DebugInfo=0
87+
RemoteSymbols=0
88+
MinStackSize=16384
89+
MaxStackSize=1048576
90+
ImageBase=4194304
91+
ExeDescription=
92+
[Directories]
93+
OutputDir=
94+
UnitOutputDir=
95+
PackageDLLOutputDir=
96+
PackageDCPOutputDir=
97+
SearchPath=
98+
Packages=
99+
Conditionals=
100+
DebugSourceDirs=
101+
UsePackages=0
102+
[Parameters]
103+
RunParams=
104+
HostApplication=
105+
Launcher=
106+
UseLauncher=0
107+
DebugCWD=
108+
[Version Info]
109+
IncludeVerInfo=1
110+
AutoIncBuild=0
111+
MajorVer=1
112+
MinorVer=0
113+
Release=0
114+
Build=0
115+
Debug=0
116+
PreRelease=0
117+
Special=0
118+
Private=0
119+
DLL=0
120+
Locale=1049
121+
CodePage=1251
122+
[Version Info Keys]
123+
CompanyName=
124+
FileDescription=
125+
FileVersion=1.0.0.0
126+
InternalName=
127+
LegalCopyright=
128+
LegalTrademarks=
129+
OriginalFilename=
130+
ProductName=
131+
ProductVersion=1.0.0.0
132+
Comments=

‎!~Library/AlignEdit/AlignEditPackage.dpk‎

Lines changed: 34 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,34 @@
1+
package AlignEditPackage;
2+
3+
{$R *.res}
4+
{$ALIGN 8}
5+
{$ASSERTIONS ON}
6+
{$BOOLEVAL OFF}
7+
{$DEBUGINFO ON}
8+
{$EXTENDEDSYNTAX ON}
9+
{$IMPORTEDDATA ON}
10+
{$IOCHECKS ON}
11+
{$LOCALSYMBOLS ON}
12+
{$LONGSTRINGS ON}
13+
{$OPENSTRINGS ON}
14+
{$OPTIMIZATION ON}
15+
{$OVERFLOWCHECKS OFF}
16+
{$RANGECHECKS OFF}
17+
{$REFERENCEINFO ON}
18+
{$SAFEDIVIDE OFF}
19+
{$STACKFRAMES OFF}
20+
{$TYPEDADDRESS OFF}
21+
{$VARSTRINGCHECKS ON}
22+
{$WRITEABLECONST OFF}
23+
{$MINENUMSIZE 1}
24+
{$IMAGEBASE $400000}
25+
{$IMPLICITBUILD OFF}
26+
27+
requires
28+
rtl,
29+
vcl;
30+
31+
contains
32+
AlignEdit in 'AlignEdit.pas';
33+
34+
end.

‎!~Library/AlignEdit/AlignEditPackage.res‎

1.5 KB
Binary file not shown.

‎!~Library/CoolTrayIcon/CoolTrayIcon.chm‎

23.1 KB
Binary file not shown.

‎!~Library/CoolTrayIcon/CoolTrayIcon.dcr‎

480 Bytes
Binary file not shown.

‎!~Library/CoolTrayIcon/CoolTrayIcon.dcu‎

26.4 KB
Binary file not shown.

0 commit comments

Comments
 (0)