ocs-comps-commits

[Si C. <tec...@us...>]

Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/LabelEdit/DB
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10593/Samples/VCL/LabelEdit/DB

Added Files:
	Project1.cfg Project1.dof Project1.dpr Project1.res Unit1.dfm 
	Unit1.pas 
Log Message:
Initially added to source control

--- NEW FILE: Project1.cfg ---
-$A-
-$B-
-$C+
-$D+
-$E-
-$F-
-$G+
-$H+
-$I-
-$J+
-$K-
-$L+
-$M-
-$N+
-$O-
-$P+
-$Q-
-$R-
-$S-
-$T+
-$U-
-$V+
-$W-
-$X+
-$YD
-$Z1
-cg
-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
-H+
-W+
-M
-$M16384,1048576
-K$00400000
-LE"d:\program files\borland\delphi5\Projects\Bpl"
-LN"d:\program files\borland\delphi5\Projects\Bpl"
-U"D:\packages\CDGen\Source;D:\packages\CDMail\Source;D:\packages\CDSubCls\Source"
-O"D:\packages\CDGen\Source;D:\packages\CDMail\Source;D:\packages\CDSubCls\Source"
-I"D:\packages\CDGen\Source;D:\packages\CDMail\Source;D:\packages\CDSubCls\Source"
-R"D:\packages\CDGen\Source;D:\packages\CDMail\Source;D:\packages\CDSubCls\Source"

--- NEW FILE: Project1.dof ---
[Compiler]
A=0
B=0
C=1
D=1
E=0
F=0
G=1
H=1
I=0
J=1
K=0
L=1
M=0
N=1
O=0
P=1
Q=0
R=0
S=0
T=1
U=0
V=1
W=0
X=1
Y=1
Z=1
ShowHints=1
ShowWarnings=1
UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
[Linker]
MapFile=0
OutputObjs=0
ConsoleApp=1
DebugInfo=0
RemoteSymbols=0
MinStackSize=16384
MaxStackSize=1048576
ImageBase=4194304
ExeDescription=
[Directories]
OutputDir=
UnitOutputDir=
PackageDLLOutputDir=
PackageDCPOutputDir=
SearchPath=D:\packages\CDGen\Source;D:\packages\CDMail\Source;D:\packages\CDSubCls\Source
Packages=Vcl50;Vclx50;VclSmp50;Qrpt50;Vcldb50;Vclbde50;ibevnt50;vcldbx50;TeeUI50;TeeDB50;Tee50;TeeQR50;VCLIB50;vclie50;Inetdb50;Inet50;NMFast50;dclocx50;dclaxserver50
Conditionals=
DebugSourceDirs=
UsePackages=0
[Parameters]
RunParams=
HostApplication=
[Language]
ActiveLang=
ProjectLang=$00000409
RootDir=
[Version Info]
IncludeVerInfo=1
AutoIncBuild=1
MajorVer=1
MinorVer=0
Release=0
Build=0
Debug=0
PreRelease=0
Special=0
Private=0
DLL=0
Locale=1033
CodePage=1252
[Version Info Keys]
CompanyName=Orcka
FileDescription=
FileVersion=1.0.0.0
InternalName=
LegalCopyright=Copyright © 2000.  Orcka Development.
LegalTrademarks=
OriginalFilename=
ProductName=
ProductVersion=1.0.0.0
Comments=
[HistoryLists\hlUnitAliases]
Count=1
Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
[HistoryLists\hlSearchPath]
Count=2
Item0=D:\packages\CDGen\Source;D:\packages\CDMail\Source;D:\packages\CDSubCls\Source
Item1=D:\packages\CDGen\Source;D:\packages\CDMail\Source;D:\packages\CDSubCls\Source;d:\orcka\source
[HistoryLists\hlOutputDirectorry]
Count=2
Item0=C:\Inetpub\wwwroot\cgi-bin
Item1=E:\Orcka
[HistoryLists\hlBPLOutput]
Count=1
Item0=D:\Orcka\D5

--- NEW FILE: Project1.res ---
(This appears to be a binary file; contents omitted.)

--- NEW FILE: Project1.dpr ---
program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

--- NEW FILE: Unit1.pas ---
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  OrckaLabelEdit, OrckaDBLabelEdit, ExtCtrls, DBCtrls, Db, DBTables;

type
  TForm1 = class(TForm)
    Table1: TTable;
    DBNavigator1: TDBNavigator;
    OrckaDBLabelEdit1: TOrckaDBLabelEdit;
    DataSource1: TDataSource;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

end.

--- NEW FILE: Unit1.dfm ---
(This appears to be a binary file; contents omitted.)