ocs-comps-commits Mailing List for OCS Component Suite (Page 3)
Brought to you by:
tectsoft
Menu
▾
▴
ocs-comps-commits — Notification of Commits to CVS
You can subscribe to this list here.
| 2005 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
(122) |
Dec
(3) |
|---|
|
From: Si C. <tec...@us...> - 2005-11-21 10:33:45
|
Update of /cvsroot/ocs-comps/OCS2/Samples/CLX/AddinManager/Simple In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10593/Samples/CLX/AddinManager/Simple Added Files: AddinForm.dfm AddinForm.pas SimpleAddinManager.cfg SimpleAddinManager.conf SimpleAddinManager.desk SimpleAddinManager.dof SimpleAddinManager.dpr SimpleAddinManager.kof SimpleAddinManager.res Log Message: Initially added to source control --- NEW FILE: SimpleAddinManager.res --- (This appears to be a binary file; contents omitted.) --- NEW FILE: SimpleAddinManager.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 -LNd:\program files\borland\delphi4\Lib --- NEW FILE: SimpleAddinManager.dof --- [Compiler] A=1 B=0 C=1 D=1 E=0 F=0 G=1 H=1 I=1 J=1 K=0 L=1 M=0 N=1 O=1 P=1 Q=0 R=0 S=0 T=0 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= Packages= Conditionals= DebugSourceDirs= UsePackages=0 [Parameters] RunParams= HostApplication= [Version Info] IncludeVerInfo=0 AutoIncBuild=0 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= FileDescription= FileVersion=1.0.0.0 InternalName= LegalCopyright= LegalTrademarks= OriginalFilename= ProductName= ProductVersion=1.0.0.0 Comments= --- NEW FILE: AddinForm.pas --- unit AddinForm; interface uses SysUtils, Classes, QGraphics, QControls, QForms, QDialogs, OrckaAddinManager, QComCtrls, QMenus, QImgList, QExtCtrls, OrckaAddinManagerShared, QButtons, OrckaButton, QTypes, Qt; type TForm4 = class(TForm) OrckaAddinManager1: TOrckaAddinManager; MainMenu1: TMainMenu; mnuFile: TMenuItem; mnuClose: TMenuItem; mnuPlugins: TMenuItem; mnuLoad: TMenuItem; mnuUnload: TMenuItem; mnuHelp: TMenuItem; mnuAbout: TMenuItem; StatusBar1: TStatusBar; OpenDialog1: TOpenDialog; ControlBar1: TControlBar; ImageList1: TImageList; procedure mnuCloseClick(Sender: TObject); procedure mnuLoadClick(Sender: TObject); procedure mnuUnloadClick(Sender: TObject); procedure mnuAboutClick(Sender: TObject); procedure OrckaAddinManager1GetRegLocation(Sender: TObject; var RegistryLocaion: String); procedure OrckaAddinManager1GetAddinParams(Sender: TObject; AddinManagerParams: TOrckaAddinManagerParams); procedure FormCreate(Sender: TObject); procedure OrckaAddinManager1GetHandle(Sender: TObject; var Hwnd: QWidgetH); private procedure AppHint(Sender: TObject); public { Public declarations } end; var Form4: TForm4; implementation {$R *.dfm} resourcestring sDemo = 'Demo Application for Orcka Addin Manager' + #13#13'Copyright © 2000. Orcka.'; sRegLocation = 'Software\Orcka\AddinManagerDemo\'; procedure TForm4.mnuCloseClick(Sender: TObject); begin Close; end; procedure TForm4.mnuLoadClick(Sender: TObject); begin if OpenDialog1.Execute then begin OrckaAddinManager1.LoadAddin(OpenDialog1.FileName); mnuLoad.Enabled := False; mnuUnLoad.Enabled := True; end; end; procedure TForm4.mnuUnloadClick(Sender: TObject); begin {Unload the first plugin} OrckaAddinManager1.UnloadAddin(OpenDialog1.FileName); mnuUnLoad.Enabled := False; mnuLoad.Enabled := True; end; procedure TForm4.mnuAboutClick(Sender: TObject); begin ShowMessage(sDemo); end; procedure TForm4.OrckaAddinManager1GetRegLocation(Sender: TObject; var RegistryLocaion: String); begin RegistryLocaion := sRegLocation; end; procedure TForm4.OrckaAddinManager1GetAddinParams(Sender: TObject; AddinManagerParams: TOrckaAddinManagerParams); begin AddinManagerParams.AppHandle := Application.Handle; end; procedure TForm4.AppHint(Sender: TObject); begin StatusBar1.SimpleText := Application.Hint; StatusBar1.SimplePanel := CompareText(StatusBar1.SimpleText, '') <> 0; end; procedure TForm4.FormCreate(Sender: TObject); begin Application.OnHint := AppHint; end; procedure TForm4.OrckaAddinManager1GetHandle(Sender: TObject; var Hwnd: QWidgetH); begin Hwnd := Handle; end; end. --- NEW FILE: AddinForm.dfm --- (This appears to be a binary file; contents omitted.) --- NEW FILE: SimpleAddinManager.conf --- -$A8 -$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 -H+ -W+ -M -$M16384,1048576 -K$00400000 -U"/home/simon/kylix/lib/debug" -O"/home/simon/kylix/lib/debug" -I"/home/simon/kylix/lib/debug" -R"/home/simon/kylix/lib/debug" -DSHAREMEM --- NEW FILE: SimpleAddinManager.kof --- [Compiler] A=8 B=0 C=1 D=1 E=0 F=0 G=1 H=1 I=1 J=0 K=0 L=1 M=0 N=1 O=1 P=1 Q=0 R=0 S=0 T=0 U=0 V=1 W=0 X=1 Y=1 Z=1 ShowHints=1 ShowWarnings=1 UnitAliases= [Linker] MapFile=0 OutputObjs=0 ConsoleApp=1 DebugInfo=0 RemoteSymbols=0 MinStackSize=16384 MaxStackSize=1048576 ImageBase=4194304 ExeDescription= DynamicLoader=/lib/ld-linux.so.2 [Directories] OutputDir= UnitOutputDir= PackageDLLOutputDir= PackageDCPOutputDir= SearchPath=/home/simon/kylix/lib/debug Packages=baseclx:visualclx:visualdbclx:dataclx:indy:orckak1 Conditionals=SHAREMEM DebugSourceDirs= UsePackages=0 [Parameters] RunParams= HostApplication= Launcher=/usr/X11R6/bin/xterm -T KylixDebuggerOutput -e bash -i -c %debuggee% UseLauncher=0 DebugCWD= --- NEW FILE: SimpleAddinManager.dpr --- program SimpleAddinManager; uses QForms, qdialogs, AddinForm in 'AddinForm.pas' {Form4}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm4, Form4); Application.Run; showmessage('the end'); end. --- NEW FILE: SimpleAddinManager.desk --- [Closed Files] File_0=SourceModule,'/home/simon/orcka/source/OrckaAddinManager.pas',0,1,1,1,1,0,0 File_1=SourceModule,'/home/simon/orcka/Samples/SpellCheck/Visual/Unit1.pas',0,1,1,1,1,1,1 File_2=SourceModule,'/home/simon/orcka/Samples/Button/Unit1.pas',0,1,35,10,40,1,1 File_3=SourceModule,'/home/simon/kylix/source/clx/IniFiles.pas',0,1,744,1,760,0,0 File_4=SourceModule,'/home/simon/orcka/qikdic/Unit1.pas',0,1,148,1,153,1,1 File_5=SourceModule,'/home/simon/orcka/source/OrckaAddinManagerShared.pas',0,1,163,58,177,0,0 File_6=SourceModule,'/home/simon/orcka/source/OrckaStringGrid.pas',0,1,183,35,192,0,0 File_7=SourceModule,'/home/simon/orcka/source/OrckaRegister.pas',0,1,73,17,80,0,0 File_8=SourceModule,'/home/simon/orcka/source/CSVProcs.pas',0,1,35,13,40,0,0 File_9=SourceModule,'/home/simon/orcka/source/OrckaLibraryLoader.pas',0,1,33,58,43,0,0 [Modules] Module0=/home/simon/orcka/Samples/AddinManager/Simple/AddinForm.pas Module1=/home/simon/orcka/Samples/AddinManager/Simple/SimpleAddinManager.dpr Count=2 EditWindowCount=1 [/home/simon/orcka/Samples/AddinManager/Simple/AddinForm.pas] ModuleType=SourceModule FormState=1 FormOnTop=0 [/home/simon/orcka/Samples/AddinManager/Simple/SimpleAddinManager.dpr] ModuleType=SourceModule FormState=0 FormOnTop=0 [/home/simon/ProjectGroup1.bpg] FormState=0 FormOnTop=0 [EditWindow0] ViewCount=2 CurrentView=0 View0=0 View1=1 CodeExplorer=CodeExplorer@EditWindow0 MessageView=MessageView@EditWindow0 Create=1 Visible=1 State=0 Left=302 Top=208 Width=696 Height=482 MaxLeft=-1 MaxTop=-1 ClientWidth=696 ClientHeight=482 LeftPanelSize=140 LeftPanelClients=CodeExplorer@EditWindow0 LeftPanelData=000004000000000000000000000000000000000000000000000100000000000000000C000000436F64654578706C6F726572FFFFFFFF RightPanelSize=0 BottomPanelSize=52 BottomPanelClients=MessageView@EditWindow0 BottomPanelData=000004000000000000000000000000000000000000000000000100000000000000000B0000004D65737361676556696577FFFFFFFF [View0] Module=/home/simon/orcka/Samples/AddinManager/Simple/AddinForm.pas CursorX=61 CursorY=8 TopLine=1 LeftCol=17 [View1] Module=/home/simon/orcka/Samples/AddinManager/Simple/SimpleAddinManager.dpr CursorX=4 CursorY=4 TopLine=1 LeftCol=1 [Watches] Count=0 [Breakpoints] Count=0 [AddressBreakpoints] Count=0 [Main Window] Create=1 Visible=1 State=0 Left=3 Top=19 Width=1024 Height=87 MaxLeft=-1 MaxTop=-1 ClientWidth=1024 ClientHeight=87 [ProjectManager] Create=1 Visible=1 State=0 Left=369 Top=372 Width=535 Height=368 MaxLeft=-1 MaxTop=-1 ClientWidth=529 ClientHeight=343 TBDockHeight=368 LRDockWidth=535 Dockable=1 [AlignmentPalette] Create=1 Visible=0 State=0 Left=203 Top=117 Width=156 Height=85 MaxLeft=-1 MaxTop=-1 ClientWidth=150 ClientHeight=60 [PropertyInspector] Create=1 Visible=1 State=0 Left=3 Top=117 Width=190 Height=494 MaxLeft=-1 MaxTop=-1 ClientWidth=182 ClientHeight=467 TBDockHeight=494 LRDockWidth=190 Dockable=1 SplitPos=85 ArrangeBy=Name SelectedItem=OnGetHandle ExpandedItems= HiddenCategories= ShowStatusBar=1 [WatchWindow] Create=1 Visible=1 State=0 Left=0 Top=0 Width=407 Height=96 MaxLeft=-1 MaxTop=-1 ClientWidth=407 ClientHeight=96 TBDockHeight=149 LRDockWidth=421 Dockable=1 [BreakpointWindow] Create=1 Visible=1 State=0 Left=0 Top=0 Width=407 Height=96 MaxLeft=-1 MaxTop=-1 ClientWidth=407 ClientHeight=96 TBDockHeight=119 LRDockWidth=293 Dockable=1 Column0Width=123 Column1Width=92 Column2Width=246 Column3Width=246 Column4Width=92 Column5Width=92 [CallStackWindow] Create=1 Visible=1 State=0 Left=0 Top=0 Width=407 Height=96 MaxLeft=-1 MaxTop=-1 ClientWidth=407 ClientHeight=96 TBDockHeight=161 LRDockWidth=294 Dockable=1 [CodeExplorer@EditWindow0] Create=1 Visible=1 State=0 Left=0 Top=12 Width=140 Height=394 MaxLeft=-1 MaxTop=-1 ClientWidth=140 ClientHeight=394 TBDockHeight=305 LRDockWidth=140 Dockable=1 [MessageView@EditWindow0] Create=1 Visible=1 State=0 Left=12 Top=0 Width=684 Height=52 MaxLeft=-1 MaxTop=-1 ClientWidth=684 ClientHeight=52 TBDockHeight=52 LRDockWidth=443 Dockable=1 [DockHosts] DockHostCount=1 [DockSite0] DockSiteType=1 Create=1 Visible=0 State=0 Left=-3 Top=548 Width=421 Height=149 MaxLeft=-1 MaxTop=-1 ClientWidth=415 ClientHeight=124 TBDockHeight=149 LRDockWidth=421 Dockable=1 TabPosition=0 ActiveTab=Watch List TabDockClients=WatchWindow,BreakpointWindow,CallStackWindow |
|
From: Si C. <tec...@us...> - 2005-11-21 10:33:45
|
Update of /cvsroot/ocs-comps/OCS2/K1 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10593/K1 Added Files: orckak1.conf orckak1.dpk orckak1.dpu orckak1.kof orckak1.res Log Message: Initially added to source control --- NEW FILE: orckak1.dpk --- package orckak1; {$R *.res} {$R '../source/OrckaRegister.dcr'} {$ALIGN 8} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA ON} {$IOCHECKS ON} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION ON} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST OFF} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$IMPLICITBUILD OFF} requires baseclx, visualclx, designide; contains CSVProcs in '../source/CSVProcs.pas', OrckaAddinManager in '../source/OrckaAddinManager.pas', OrckaAddinManagerShared in '../source/OrckaAddinManagerShared.pas', OrckaButton in '../source/OrckaButton.pas', OrckaLibraryLoader in '../source/OrckaLibraryLoader.pas', OrckaRegister in '../source/OrckaRegister.pas', OrckaSpellChecker in '../source/OrckaSpellChecker.pas', OrckaStringGrid in '../source/OrckaStringGrid.pas', OrckaTimer in '../source/OrckaTimer.pas', OrckaWebLabel in '../source/OrckaWebLabel.pas'; end. --- NEW FILE: orckak1.conf --- -$A8 -$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 -H+ -W+ -M -$M16384,1048576 -K$00400000 -U"/home/simon/kylix/source/toolsapi" -O"/home/simon/kylix/source/toolsapi" -I"/home/simon/kylix/source/toolsapi" -R"/home/simon/kylix/source/toolsapi" -Z --- NEW FILE: orckak1.kof --- [Compiler] A=8 B=0 C=1 D=1 E=0 F=0 G=1 H=1 I=1 J=0 K=0 L=1 M=0 N=1 O=1 P=1 Q=0 R=0 S=0 T=0 U=0 V=1 W=0 X=1 Y=1 Z=1 ShowHints=1 ShowWarnings=1 UnitAliases= [Linker] MapFile=0 OutputObjs=0 ConsoleApp=1 DebugInfo=0 RemoteSymbols=0 MinStackSize=16384 MaxStackSize=1048576 ImageBase=4194304 ExeDescription= DynamicLoader=/lib/ld-linux.so.2 [Directories] OutputDir= UnitOutputDir= PackageDLLOutputDir= PackageDCPOutputDir= SearchPath=/home/simon/kylix/source/toolsapi Packages= Conditionals= DebugSourceDirs= UsePackages=0 [Parameters] RunParams= HostApplication= Launcher=/usr/X11R6/bin/xterm -T KylixDebuggerOutput -e bash -i -c %debuggee% UseLauncher=0 DebugCWD= --- NEW FILE: orckak1.res --- (This appears to be a binary file; contents omitted.) --- NEW FILE: orckak1.dpu --- (This appears to be a binary file; contents omitted.) |
|
From: Si C. <tec...@us...> - 2005-11-21 10:33:45
|
Update of /cvsroot/ocs-comps/OCS2/D6 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10593/D6 Added Files: OrckaD6.cfg OrckaD6.dof OrckaD6.dpk OrckaD6.dsk OrckaD6.res Log Message: Initially added to source control --- NEW FILE: OrckaD6.cfg --- -$A1 -$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 -E"C:\Inetpub\wwwroot\cgi-bin" -LE"c:\program files\borland\delphi6\Projects\Bpl" -LN"c:\program files\borland\delphi6\Projects\Bpl" -U"..\Source;D:\Program Files\Borland\Delphi6\Source\Rtl" -O"..\Source;D:\Program Files\Borland\Delphi6\Source\Rtl" -I"..\Source;D:\Program Files\Borland\Delphi6\Source\Rtl" -R"..\Source;D:\Program Files\Borland\Delphi6\Source\Rtl" --- NEW FILE: OrckaD6.dof --- [FileVersion] Version=6.0 [Compiler] A=1 B=0 C=1 D=1 E=0 F=0 G=0 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=0 U=0 V=1 W=0 X=1 Y=1 Z=1 ShowHints=0 ShowWarnings=0 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=Orcka Component Suite v2.0 (Simon Carter) [Directories] OutputDir=C:\Inetpub\wwwroot\cgi-bin UnitOutputDir= PackageDLLOutputDir= PackageDCPOutputDir= SearchPath=..\Source;D:\Program Files\Borland\Delphi6\Source\Rtl 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=D:\Program Files\Borland\Delphi6\Bin\delphi32.exe Launcher= UseLauncher=0 DebugCWD= [Language] ActiveLang= ProjectLang=$00000409 RootDir= [Version Info] IncludeVerInfo=1 AutoIncBuild=1 MajorVer=2 MinorVer=0 Release=0 Build=132 Debug=0 PreRelease=0 Special=0 Private=0 DLL=1 Locale=2057 CodePage=1252 [Version Info Keys] CompanyName=Orcka FileDescription= FileVersion=2.0.0.132 InternalName= LegalCopyright=Copyright © 1999 - 2001. 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\hlOutputDirectorry] Count=2 Item0=C:\Inetpub\wwwroot\cgi-bin Item1=D:\Program Files\Other\TB2K\Demo --- NEW FILE: OrckaD6.dsk --- [Closed Files] File_0=SourceModule,'D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Host\uMain.pas',0,1,1,1,4,0,0 File_1=SourceModule,'D:\Program Files\Orcka\Component Suite\Source\OrckaDBCtls.pas',0,1,31,12,38,0,0 File_2=SourceModule,'D:\Program Files\Orcka\Component Suite\Source\OrckaDV.inc',0,1,89,35,102,0,0 File_3=SourceModule,'D:\Inetpub\wwwroot\CGI-BIN\Source\mailconvert\Unit2.pas',0,1,31,24,53,0,0 File_4=SourceModule,'D:\Orcka\Source\OrckaRegister.pas',0,1,76,47,87,0,0 File_5=SourceModule,'D:\Orcka\Source\OrckaMapEditor.pas',0,1,67,19,68,0,0 File_6=SourceModule,'D:\Orcka\Source\OrckaSpellCheckForm.pas',0,1,334,15,348,0,0 File_7=SourceModule,'d:\program files\borland\delphi6\source\rtl\Win\Windows.pas',0,1,28544,14,28558,0,0 File_8=SourceModule,'d:\program files\borland\delphi6\source\vcl\ComCtrls.pas',0,1,2173,1,2187,0,0 [Modules] Module0=D:\Program Files\Orcka\Component Suite\Source\OrckaPluginManager.pas Module1=D:\Program Files\Orcka\Component Suite\D6\OrckaD6.dpk Count=2 EditWindowCount=1 PackageWindowCount=1 [D:\Program Files\Orcka\Component Suite\Source\OrckaPluginManager.pas] ModuleType=SourceModule FormState=1 FormOnTop=0 [D:\Program Files\Orcka\Component Suite\D6\OrckaD6.dpk] ModuleType=PackageEditModule FormState=0 FormOnTop=1 [D:\Program Files\Borland\Delphi6\Projects\ProjectGroup1.bpg] FormState=0 FormOnTop=0 [EditWindow0] ViewCount=2 CurrentView=1 View0=0 View1=1 CodeExplorer=CodeExplorer@EditWindow0 MessageView=MessageView@EditWindow0 Create=1 Visible=1 State=0 Left=272 Top=110 Width=742 Height=546 MaxLeft=-1 MaxTop=-1 ClientWidth=734 ClientHeight=519 LeftPanelSize=0 RightPanelSize=0 BottomPanelSize=0 BottomPanelClients=MessageView@EditWindow0 BottomPanelData=00000400010000000B0000004D65737361676556696577DE02000000000000023400000000000000010000000000000000000000000100000000DF020000000000000100000000DE020000000000000100000000DE02000000000000FFFFFFFF [View0] Module=D:\Program Files\Orcka\Component Suite\D6\OrckaD6.dpk CursorX=1 CursorY=1 TopLine=1 LeftCol=1 [View1] Module=D:\Program Files\Orcka\Component Suite\Source\OrckaPluginManager.pas CursorX=1 CursorY=3833 TopLine=3811 LeftCol=1 [PackageWindow0] Create=1 Visible=1 State=0 Left=252 Top=241 Width=368 Height=244 MaxLeft=-1 MaxTop=-1 ClientWidth=360 ClientHeight=220 TBDockHeight=244 LRDockWidth=368 Dockable=1 StatusBar=0 TextLabels=1 Toolbar=1 SectionWidth0=150 SectionWidth1=210 Module=D:\Program Files\Orcka\Component Suite\D6\OrckaD6.dpk [Watches] Count=0 [Breakpoints] Count=0 [AddressBreakpoints] Count=0 [Main Window] Create=1 Visible=1 State=0 Left=0 Top=0 Width=1024 Height=105 MaxLeft=-1 MaxTop=-1 ClientWidth=1016 ClientHeight=78 [ProjectManager] Create=1 Visible=1 State=0 Left=0 Top=0 Width=223 Height=479 MaxLeft=-1 MaxTop=-1 ClientWidth=223 ClientHeight=479 TBDockHeight=303 LRDockWidth=438 Dockable=1 [AlignmentPalette] Create=1 Visible=0 State=0 Left=200 Top=107 Width=156 Height=82 MaxLeft=-1 MaxTop=-1 ClientWidth=150 ClientHeight=60 [PropertyInspector] Create=1 Visible=1 State=0 Left=0 Top=0 Width=223 Height=479 MaxLeft=-1 MaxTop=-1 ClientWidth=223 ClientHeight=479 TBDockHeight=494 LRDockWidth=190 Dockable=1 SplitPos=85 ArrangeBy=Name SelectedItem=Name ExpandedItems=Value HiddenCategories=Legacy [WatchWindow] Create=1 Visible=0 State=0 Left=10 Top=554 Width=516 Height=179 MaxLeft=-1 MaxTop=-1 ClientWidth=508 ClientHeight=155 TBDockHeight=149 LRDockWidth=421 Dockable=1 [BreakpointWindow] Create=1 Visible=0 State=0 Left=10 Top=554 Width=516 Height=179 MaxLeft=-1 MaxTop=-1 ClientWidth=508 ClientHeight=155 TBDockHeight=197 LRDockWidth=737 Dockable=1 Column0Width=100 Column1Width=75 Column2Width=200 Column3Width=200 Column4Width=75 Column5Width=75 [CallStackWindow] Create=1 Visible=0 State=0 Left=10 Top=554 Width=516 Height=179 MaxLeft=-1 MaxTop=-1 ClientWidth=508 ClientHeight=155 TBDockHeight=161 LRDockWidth=294 Dockable=1 [ThreadStatusWindow] Create=1 Visible=0 State=0 Left=0 Top=0 Width=615 Height=546 MaxLeft=-1 MaxTop=-1 ClientWidth=607 ClientHeight=522 TBDockHeight=152 LRDockWidth=624 Dockable=1 Column0Width=145 Column1Width=100 Column2Width=115 Column3Width=250 [ModuleWindow] Create=1 Visible=0 State=0 Left=10 Top=554 Width=516 Height=179 MaxLeft=-1 MaxTop=-1 ClientWidth=508 ClientHeight=155 TBDockHeight=118 LRDockWidth=353 Dockable=1 Column0Width=125 Column1Width=100 Column2Width=155 EntryPointPane=225 CompUnitPane=104 [ObjectTree] Create=1 Visible=0 State=0 Left=0 Top=105 Width=190 Height=252 MaxLeft=-1 MaxTop=-1 ClientWidth=182 ClientHeight=228 TBDockHeight=252 LRDockWidth=190 Dockable=1 [DebugLogView] Create=1 Visible=0 State=0 Left=10 Top=554 Width=516 Height=179 MaxLeft=-1 MaxTop=-1 ClientWidth=508 ClientHeight=155 TBDockHeight=291 LRDockWidth=417 Dockable=1 [LocalVarsWindow] Create=1 Visible=0 State=0 Left=10 Top=462 Width=421 Height=189 MaxLeft=-1 MaxTop=-1 ClientWidth=413 ClientHeight=165 TBDockHeight=189 LRDockWidth=421 Dockable=1 [CodeExplorer@EditWindow0] Create=1 Visible=1 State=0 Left=0 Top=0 Width=223 Height=479 MaxLeft=-1 MaxTop=-1 ClientWidth=223 ClientHeight=479 TBDockHeight=305 LRDockWidth=140 Dockable=1 [MessageView@EditWindow0] Create=1 Visible=0 State=0 Left=12 Top=0 Width=722 Height=52 MaxLeft=-1 MaxTop=-1 ClientWidth=722 ClientHeight=52 TBDockHeight=52 LRDockWidth=443 Dockable=1 [DockHosts] DockHostCount=1 [DockSite0] DockSiteType=1 Create=1 Visible=1 State=0 Left=0 Top=107 Width=258 Height=511 MaxLeft=-1 MaxTop=-1 ClientWidth=250 ClientHeight=487 TBDockHeight=511 LRDockWidth=258 Dockable=1 TabPosition=2 ActiveTab=Object Inspector TabDockClients=PropertyInspector,ProjectManager,CodeExplorer@EditWindow0 --- NEW FILE: OrckaD6.dpk --- package OrckaD6; {$R *.res} {$R '..\Source\OrckaRegister.dcr'} {$ALIGN 1} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA OFF} {$IOCHECKS OFF} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION OFF} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST ON} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'Orcka Component Suite v2.0 (Simon Carter)'} {$DESIGNONLY} {$IMPLICITBUILD ON} requires vcl, VclSmp, Vcldb, designide, visualclx; contains OrckaScreenSaver in '..\Source\OrckaScreenSaver.pas', OrckaTimer in '..\Source\OrckaTimer.pas', OrckaVersionInfo in '..\Source\OrckaVersionInfo.pas', OrckaTrayIcon in '..\Source\OrckaTrayIcon.pas', OrckaSubClass in '..\Source\OrckaSubClass.pas', OrckaGroupBox in '..\Source\OrckaGroupBox.pas', OrckaRegister in '..\Source\OrckaRegister.pas', OrckaFontControls in '..\Source\OrckaFontControls.pas', OrckaInterceptor in '..\Source\OrckaInterceptor.pas', OrckaButton in '..\Source\OrckaButton.pas', OrckaEdit in '..\Source\OrckaEdit.pas', OrckaLibraryLoader in '..\Source\OrckaLibraryLoader.pas', OrckaMap in '..\Source\OrckaMap.pas', OrckaWebLabel in '..\Source\OrckaWebLabel.pas', OrckaLabelEdit in '..\source\OrckaLabelEdit.pas', OrckaDBLabelEdit in '..\Source\OrckaDBLabelEdit.pas', OrckaRuler in '..\Source\OrckaRuler.pas', OrckaMemo in '..\Source\OrckaMemo.pas', OrckaNotify in '..\Source\OrckaNotify.pas', OrckaMapEditor in '..\Source\OrckaMapEditor.pas', OrckaDBCtls in '..\Source\OrckaDBCtls.pas', OrckaSpellChecker in '..\Source\OrckaSpellChecker.pas', CSVProcs in '..\Source\CSVProcs.pas', OrckaStringGrid in '..\source\OrckaStringGrid.pas', OrckaDBGrid in '..\Source\OrckaDBGrid.pas', OrckaPluginManager in '..\Source\OrckaPluginManager.pas' {PluginManagerForm}, OrckaPluginManagerShared in '..\Source\OrckaPluginManagerShared.pas', OrckaAddinManager in '..\Source\OrckaAddinManager.pas', OrckaAddinManagerShared in '..\Source\OrckaAddinManagerShared.pas', PluginModule in '..\Source\PluginModule.pas'; end. --- NEW FILE: OrckaD6.res --- (This appears to be a binary file; contents omitted.) |
|
From: Si C. <tec...@us...> - 2005-11-21 10:33:45
|
Update of /cvsroot/ocs-comps/OCS2/Other/IDE In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10593/Other/IDE Added Files: OrckaMultiLineHints.dfm OrckaMultiLineHints.pas Log Message: Initially added to source control --- NEW FILE: OrckaMultiLineHints.dfm --- (This appears to be a binary file; contents omitted.) --- NEW FILE: OrckaMultiLineHints.pas --- (This appears to be a binary file; contents omitted.) |
|
From: Si C. <tec...@us...> - 2005-11-21 10:33:45
|
Update of /cvsroot/ocs-comps/OCS2/BCB6 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10593/BCB6 Added Files: OrckaBCB6.bpk OrckaBCB6.cpp OrckaBCB6.obj OrckaBCB6.res Log Message: Initially added to source control --- NEW FILE: OrckaBCB6.bpk --- <?xml version='1.0' encoding='utf-8' ?> <!-- C++Builder XML Project --> <PROJECT> <MACROS> <VERSION value="BCB.06.00"/> <PROJECT value="OrckaBCB6.bpl"/> <OBJFILES value="OrckaBCB6.obj ..\Source\OrckaStringGrid.obj ..\Source\OrckaSubClass.obj ..\Source\OrckaTimer.obj ..\Source\OrckaTrayIcon.obj ..\Source\OrckaVersionInfo.obj ..\Source\OrckaWebLabel.obj ..\Source\CSVProcs.obj ..\Source\OrckaAddinManager.obj ..\Source\OrckaAddinManagerShared.obj ..\Source\OrckaButton.obj ..\Source\OrckaDBCtls.obj ..\Source\OrckaDBLabelEdit.obj ..\Source\OrckaEdit.obj ..\Source\OrckaFontControls.obj ..\Source\OrckaGroupBox.obj ..\Source\OrckaInterceptor.obj ..\Source\OrckaLabelEdit.obj ..\Source\OrckaLibraryLoader.obj ..\Source\OrckaMap.obj ..\Source\OrckaMemo.obj ..\Source\OrckaNotify.obj ..\Source\OrckaRuler.obj ..\Source\OrckaScreenSaver.obj ..\Source\OrckaSpellChecker.obj ..\Source\OrckaRegister.obj ..\Source\OrckaDBGrid.obj ..\Source\OrckaPluginManager.obj"/> <RESFILES value="OrckaBCB6.res ..\Source\OrckaRegister.dcr"/> <IDLFILES value=""/> <IDLGENFILES value=""/> <DEFFILE value=""/> <RESDEPEN value="$(RESFILES) ..\Source\OrckaPluginManager.dfm"/> <LIBFILES value=""/> <LIBRARIES value="bcb2kaxserver.lib indy.lib dbxcds.lib dclocx.lib soaprtl.lib nmfast.lib dbexpress.lib inetdbxpress.lib inetdbbde.lib dsnapcon.lib dsnapcrba.lib teeqr.lib dss.lib tee.lib teedb.lib teeui.lib qrpt.lib bdecds.lib cds.lib ibxpress.lib vcldbx.lib bdertl.lib adortl.lib"/> <SPARELIBS value="rtl.lib vcl.lib vcldb.lib adortl.lib bdertl.lib vcldbx.lib ibxpress.lib cds.lib bdecds.lib qrpt.lib teeui.lib teedb.lib tee.lib dss.lib teeqr.lib visualdbclx.lib dsnapcrba.lib dsnapcon.lib bcbsmp.lib inetdbbde.lib inetdbxpress.lib dbexpress.lib nmfast.lib bcbie.lib soaprtl.lib dclocx.lib dbxcds.lib indy.lib bcb2kaxserver.lib VclSmp.lib"/> <PACKAGES value="designide.bpi visualdbclx.bpi vcl.bpi vcldb.bpi vclsmp.bpi visualclx.bpi rtl.bpi bcbsmp.bpi bcbie.bpi dbrtl.bpi dclstd.bpi vclx.bpi"/> <PATHCPP value=".;"/> <PATHPAS value=".;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source;..\Source"/> <PATHRC value=".;"/> <PATHASM value=".;"/> <DEBUGLIBPATH value="$(BCB)\lib\debug"/> <RELEASELIBPATH value="$(BCB)\lib\release"/> <LINKER value="ilink32"/> <USERDEFINES value="_DEBUG"/> <SYSDEFINES value="NO_STRICT;USEPACKAGES"/> <MAINSOURCE value="OrckaBCB6.cpp"/> <INCLUDEPATH value="$(BCB)\Source\vcl;$(BCB)\Source\Toolsapi;..\source;$(BCB)\include;$(BCB)\include\vcl;$(BCB)\lib"/> <LIBPATH value="$(BCB)\Projects\Lib;$(BCB)\Source\vcl;$(BCB)\Source\Toolsapi;..\source;$(BCB)\lib\obj;$(BCB)\lib;$(RELEASELIBPATH)"/> <WARNINGS value="-w-par -w-8027 -w-8026"/> <WARNOPTSTR value=""/> <OTHERFILES value=""/> </MACROS> <OPTIONS> <IDLCFLAGS value="-I$(BCB)\Source\vcl -I$(BCB)\Source\Toolsapi -I..\source -I$(BCB)\include -I$(BCB)\include\vcl -I$(BCB)\lib -src_suffix cpp -D_DEBUG -boa"/> <CFLAG1 value="-Od -w -Vx -Ve -Tkh30000 -X- -r- -a8 -b- -k -y -v -vi- -c -tWM"/> <CFLAG2 value=""/> <CFLAG3 value=""/> <PFLAGS value="-$YD -$W -$O- -$A8 -v -M -JPHNE"/> <RFLAGS value=""/> <AFLAGS value="/mx /w2 /zi"/> <LFLAGS value="-D"Orcka Component Suite v2.0 (Simon Carter)" -c- -aa -Tpp -Gpd -x -Gn -Gl -Gi -w -v"/> <IFLAGS value=""/> <OTHERFILES value=""/> </OPTIONS> <LINKER> <ALLOBJ value="c0pkg32.obj $(PACKAGES) sysinit.obj $(OBJFILES)"/> <ALLRES value="$(RESFILES)"/> <ALLLIB value="$(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib"/> <OTHERFILES value=""/> </LINKER> <FILELIST> <FILE FILENAME="OrckaBCB6.cpp" FORMNAME="" UNITNAME="OrckaBCB6" CONTAINERID="CCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="OrckaBCB6.res" FORMNAME="" UNITNAME="OrckaBCB6" CONTAINERID="ResTool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaStringGrid.pas" FORMNAME="" UNITNAME="OrckaStringGrid" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaSubClass.pas" FORMNAME="" UNITNAME="OrckaSubClass" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaTimer.pas" FORMNAME="" UNITNAME="OrckaTimer" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaTrayIcon.pas" FORMNAME="" UNITNAME="OrckaTrayIcon" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaVersionInfo.pas" FORMNAME="" UNITNAME="OrckaVersionInfo" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaWebLabel.pas" FORMNAME="" UNITNAME="OrckaWebLabel" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\CSVProcs.pas" FORMNAME="" UNITNAME="CSVProcs" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaAddinManager.pas" FORMNAME="" UNITNAME="OrckaAddinManager" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaAddinManagerShared.pas" FORMNAME="" UNITNAME="OrckaAddinManagerShared" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaButton.pas" FORMNAME="" UNITNAME="OrckaButton" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaDBCtls.pas" FORMNAME="" UNITNAME="OrckaDBCtls" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaDBLabelEdit.pas" FORMNAME="" UNITNAME="OrckaDBLabelEdit" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaEdit.pas" FORMNAME="" UNITNAME="OrckaEdit" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaFontControls.pas" FORMNAME="" UNITNAME="OrckaFontControls" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaGroupBox.pas" FORMNAME="" UNITNAME="OrckaGroupBox" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaInterceptor.pas" FORMNAME="" UNITNAME="OrckaInterceptor" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaLabelEdit.pas" FORMNAME="" UNITNAME="OrckaLabelEdit" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaLibraryLoader.pas" FORMNAME="" UNITNAME="OrckaLibraryLoader" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaMap.pas" FORMNAME="" UNITNAME="OrckaMap" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaMemo.pas" FORMNAME="" UNITNAME="OrckaMemo" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaNotify.pas" FORMNAME="" UNITNAME="OrckaNotify" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaRuler.pas" FORMNAME="" UNITNAME="OrckaRuler" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaScreenSaver.pas" FORMNAME="" UNITNAME="OrckaScreenSaver" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaSpellChecker.pas" FORMNAME="" UNITNAME="OrckaSpellChecker" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaRegister.pas" FORMNAME="" UNITNAME="OrckaRegister" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaRegister.dcr" FORMNAME="" UNITNAME="" CONTAINERID="DcrTool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="c:\cbuilder6\Lib\designide.bpi" FORMNAME="" UNITNAME="designide" CONTAINERID="BPITool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="c:\cbuilder6\Lib\visualdbclx.bpi" FORMNAME="" UNITNAME="visualdbclx" CONTAINERID="BPITool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\..\..\Borland\CBuilder6\Lib\vcl.bpi" FORMNAME="" UNITNAME="vcl" CONTAINERID="BPITool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\..\..\Borland\CBuilder6\Lib\vcldb.bpi" FORMNAME="" UNITNAME="vcldb" CONTAINERID="BPITool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\..\..\Borland\CBuilder6\Lib\vclsmp.bpi" FORMNAME="" UNITNAME="vclsmp" CONTAINERID="BPITool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\..\..\Borland\CBuilder6\Lib\visualclx.bpi" FORMNAME="" UNITNAME="visualclx" CONTAINERID="BPITool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\..\..\Borland\CBuilder6\Lib\rtl.bpi" FORMNAME="" UNITNAME="rtl" CONTAINERID="BPITool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\..\..\Borland\CBuilder6\Lib\bcbsmp.bpi" FORMNAME="" UNITNAME="bcbsmp" CONTAINERID="BPITool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\..\..\Borland\CBuilder6\Lib\bcbie.bpi" FORMNAME="" UNITNAME="bcbie" CONTAINERID="BPITool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaDBGrid.pas" FORMNAME="" UNITNAME="OrckaDBGrid" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\..\..\Other\TB2K\Packages\dbrtl.bpi" FORMNAME="" UNITNAME="dbrtl" CONTAINERID="BPITool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\OrckaPluginManager.pas" FORMNAME="PluginManagerForm" UNITNAME="" CONTAINERID="PascalCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\dclstd.bpi" FORMNAME="" UNITNAME="dclstd" CONTAINERID="BPITool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="..\Source\vclx.bpi" FORMNAME="" UNITNAME="vclx" CONTAINERID="BPITool" DESIGNCLASS="" LOCALCOMMAND=""/> </FILELIST> <BUILDTOOLS> </BUILDTOOLS> <IDEOPTIONS> [Version Info] IncludeVerInfo=1 AutoIncBuild=1 MajorVer=2 MinorVer=0 Release=0 Build=5 Debug=0 PreRelease=0 Special=0 Private=0 DLL=1 Locale=2057 CodePage=1252 [Version Info Keys] CompanyName=Orcka Development FileDescription= FileVersion=2.0.0.5 InternalName= LegalCopyright= LegalTrademarks= OriginalFilename= ProductName= ProductVersion=1.0.0.0 Comments= [HistoryLists\hlIncludePath] Count=8 Item0=..\..\..\Borland\CBuilder6\Source\vcl;..\..\..\Borland\CBuilder6\Source\Toolsapi;..\source;$(BCB)\include;$(BCB)\include\vcl;$(BCB)\lib Item1=..\..\..\Borland\CBuilder6\Source\vcl;..\..\..\Borland\CBuilder6\Source\Toolsapi;..\source;$(BCB)\include;$(BCB)\include\vcl Item2=..\..\..\Borland\CBuilder6\Source\Toolsapi;..\source;$(BCB)\include;$(BCB)\include\vcl Item3=..\..\..\Borland\CBuilder6\Source\Toolsapi;..\source;$(BCB)\include;$(BCB)\include\vcl;$(BCB)\Source\Toolsapi Item4=..\source;$(BCB)\include;$(BCB)\include\vcl;$(BCB)\Source\Toolsapi Item5=..\source;$(BCB)\include;$(BCB)\include\vcl;$(BCB)\Source\Toolsapi;D:\Program Files\Borland\CBuilder6\Include\Vcl Item6=..\source;$(BCB)\include;$(BCB)\include\vcl;$(BCB)\Source\Toolsapi;D:\Program Files\Borland\CBuilder6\Source\Toolsapi Item7=..\source;$(BCB)\include;$(BCB)\include\vcl [HistoryLists\hlLibraryPath] Count=7 Item0=$(BCB)\Projects\Lib;..\..\..\Borland\CBuilder6\Source\vcl;..\..\..\Borland\CBuilder6\Source\Toolsapi;..\source;$(BCB)\lib\obj;$(BCB)\lib;$(RELEASELIBPATH) Item1=..\..\..\Borland\CBuilder6\Source\vcl;..\..\..\Borland\CBuilder6\Source\Toolsapi;..\source;$(BCB)\lib\obj;$(BCB)\lib;$(RELEASELIBPATH) Item2=..\..\..\Borland\CBuilder6\Source\vcl;..\..\..\Borland\CBuilder6\Source\Toolsapi;..\source;$(BCB)\lib\obj;$(BCB)\lib;$(RELEASELIBPATH);D:\Program Files\Borland\CBuilder6\Lib Item3=;..\..\..\Borland\CBuilder6\Source\Toolsapi;..\source;$(BCB)\lib\obj;$(BCB)\lib;$(RELEASELIBPATH) Item4=..\..\..\Borland\CBuilder6\Source\Toolsapi;;;;..\source;$(BCB)\lib\obj;$(BCB)\lib;$(RELEASELIBPATH) Item5=..\source;$(BCB)\lib\obj;$(BCB)\lib;$(RELEASELIBPATH) Item6=;..\source;$(BCB)\lib\obj;$(BCB)\lib;$(RELEASELIBPATH) [HistoryLists\hlDebugSourcePath] Count=1 Item0=$(BCB)\source\vcl [HistoryLists\hlConditionals] Count=1 Item0=_DEBUG [Debugging] DebugSourceDirs=$(BCB)\source\vcl [Parameters] RunParams= Launcher= UseLauncher=0 DebugCWD= HostApplication= RemoteHost= RemotePath= RemoteLauncher= RemoteCWD= RemoteDebug=0 [Compiler] ShowInfoMsgs=0 LinkDebugVcl=0 LinkCGLIB=0 [CORBA] AddServerUnit=1 AddClientUnit=1 PrecompiledHeaders=1 [Language] ActiveLang= ProjectLang= RootDir= [Linker] LibPrefix= LibSuffix= LibVersion= </IDEOPTIONS> </PROJECT> --- NEW FILE: OrckaBCB6.cpp --- //--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #pragma package(smart_init) //--------------------------------------------------------------------------- // Package source. //--------------------------------------------------------------------------- int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void*) { return 1; } //--------------------------------------------------------------------------- --- NEW FILE: OrckaBCB6.obj --- (This appears to be a binary file; contents omitted.) --- NEW FILE: OrckaBCB6.res --- (This appears to be a binary file; contents omitted.) |
|
From: Si C. <tec...@us...> - 2005-11-21 10:33:45
|
Update of /cvsroot/ocs-comps/OCS2/D7 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10593/D7 Added Files: OrckaD7.cfg OrckaD7.dof OrckaD7.dpk OrckaD7.dsk OrckaD7.res Log Message: Initially added to source control --- NEW FILE: OrckaD7.cfg --- -$A1 -$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 -E"C:\Inetpub\wwwroot\cgi-bin" -LE"c:\program files\borland\delphi7\Projects\Bpl" -LN"c:\program files\borland\delphi7\Projects\Bpl" -U"..\Source;D:\Program Files\Borland\Delphi6\Source\Rtl" -O"..\Source;D:\Program Files\Borland\Delphi6\Source\Rtl" -I"..\Source;D:\Program Files\Borland\Delphi6\Source\Rtl" -R"..\Source;D:\Program Files\Borland\Delphi6\Source\Rtl" --- NEW FILE: OrckaD7.dpk --- package OrckaD7; {$R *.res} {$R '..\Source\OrckaRegister.dcr'} {$ALIGN 1} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA OFF} {$IOCHECKS OFF} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION OFF} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST ON} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'Orcka Component Suite v2.0 (Simon Carter)'} {$DESIGNONLY} {$IMPLICITBUILD ON} requires vcl, VclSmp, Vcldb, designide, visualclx; contains OrckaScreenSaver in '..\Source\OrckaScreenSaver.pas', OrckaTimer in '..\Source\OrckaTimer.pas', OrckaVersionInfo in '..\Source\OrckaVersionInfo.pas', OrckaTrayIcon in '..\Source\OrckaTrayIcon.pas', OrckaSubClass in '..\Source\OrckaSubClass.pas', OrckaGroupBox in '..\Source\OrckaGroupBox.pas', OrckaRegister in '..\Source\OrckaRegister.pas', OrckaFontControls in '..\Source\OrckaFontControls.pas', OrckaInterceptor in '..\Source\OrckaInterceptor.pas', OrckaButton in '..\Source\OrckaButton.pas', OrckaEdit in '..\Source\OrckaEdit.pas', OrckaLibraryLoader in '..\Source\OrckaLibraryLoader.pas', OrckaMap in '..\Source\OrckaMap.pas', OrckaWebLabel in '..\Source\OrckaWebLabel.pas', OrckaLabelEdit in '..\source\OrckaLabelEdit.pas', OrckaDBLabelEdit in '..\Source\OrckaDBLabelEdit.pas', OrckaRuler in '..\Source\OrckaRuler.pas', OrckaMemo in '..\Source\OrckaMemo.pas', OrckaNotify in '..\Source\OrckaNotify.pas', OrckaMapEditor in '..\Source\OrckaMapEditor.pas', OrckaDBCtls in '..\Source\OrckaDBCtls.pas', CSVProcs in '..\Source\CSVProcs.pas', OrckaStringGrid in '..\source\OrckaStringGrid.pas', OrckaDBGrid in '..\Source\OrckaDBGrid.pas'; end. --- NEW FILE: OrckaD7.dsk --- [Closed Files] File_0=SourceModule,'D:\Program Files\Orcka\Component Suite\Source\OrckaPluginManager.pas',0,1,2951,61,2965,0,0 File_1=SourceModule,'D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Host\uMain.pas',0,1,325,29,335,0,0 File_2=SourceModule,'D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Clients\Country\CountryForm.pas',0,1,38,27,41,0,0 File_3=SourceModule,'D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Clients\Country\CountryUnit.pas',0,1,196,30,212,0,0 File_4=SourceModule,'D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Clients\Customer\CustomerUnit.pas',0,1,200,31,216,0,0 File_5=SourceModule,'D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Clients\Parts\PartsUnit.pas',0,1,198,28,214,0,0 File_6=SourceModule,'D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Clients\Parts\PartsForm.pas',0,1,43,2,44,0,0 File_7=SourceModule,'D:\Program Files\Borland\Delphi6\Demos\Db\MastApp\DataMod.pas',0,1,1,1,1,0,0 File_8=SourceModule,'D:\Program Files\Borland\Delphi6\Demos\Db\MastApp\Main.pas',0,1,140,20,128,0,1 File_9=SourceModule,'D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Clients\Customer\images.rc',0,1,1,13,1,0,0 [Modules] Module0=D:\Program Files\Borland\Delphi7\Projects\Unit1.pas Count=1 EditWindowCount=1 PackageWindowCount=1 [D:\Program Files\Borland\Delphi7\Projects\Unit1.pas] ModuleType=SourceModule FormState=0 FormOnTop=0 [D:\Program Files\Orcka\Component Suite\D7\OrckaD7.dpk] FormState=0 FormOnTop=1 [D:\Program Files\Borland\Delphi7\Projects\ProjectGroup1.bpg] FormState=0 FormOnTop=0 [D:\Program Files\Borland\Delphi7\Projects\Project1.dpr] FormState=0 FormOnTop=0 [EditWindow0] ViewCount=1 CurrentView=0 View0=0 CodeExplorer=CodeExplorer@EditWindow0 MessageView=MessageView@EditWindow0 Create=1 Visible=1 State=0 Left=529 Top=284 Width=783 Height=542 MaxLeft=-1 MaxTop=-1 ClientWidth=775 ClientHeight=515 LeftPanelSize=140 LeftPanelClients=CodeExplorer@EditWindow0 LeftPanelData=000004000000000000000000000000000000000000000000000100000000000000000C000000436F64654578706C6F726572FFFFFFFF RightPanelSize=0 BottomPanelSize=0 BottomPanelClients=MessageView@EditWindow0 BottomPanelData=00000400010000000B0000004D657373616765566965770000000000000000000000000000000000FFFFFFFF [View0] Module=D:\Program Files\Borland\Delphi7\Projects\Unit1.pas CursorX=1 CursorY=1 TopLine=1 LeftCol=1 [PackageWindow0] Create=1 Visible=1 State=0 Left=252 Top=241 Width=368 Height=244 MaxLeft=-1 MaxTop=-1 ClientWidth=360 ClientHeight=220 TBDockHeight=244 LRDockWidth=368 Dockable=1 StatusBar=0 TextLabels=1 Toolbar=1 SectionWidth0=150 SectionWidth1=210 Module=D:\Program Files\Orcka\Component Suite\D7\OrckaD7.dpk [Watches] Count=0 [Breakpoints] Count=0 [AddressBreakpoints] Count=0 [Main Window] Create=1 Visible=1 State=0 Left=0 Top=0 Width=1152 Height=105 MaxLeft=-1 MaxTop=-1 ClientWidth=1144 ClientHeight=78 [ProjectManager] Create=1 Visible=0 State=0 Left=369 Top=372 Width=438 Height=303 MaxLeft=-1 MaxTop=-1 ClientWidth=430 ClientHeight=279 TBDockHeight=303 LRDockWidth=438 Dockable=1 [AlignmentPalette] Create=1 Visible=0 State=0 Left=200 Top=107 Width=156 Height=82 MaxLeft=-1 MaxTop=-1 ClientWidth=150 ClientHeight=60 [PropertyInspector] Create=1 Visible=1 State=0 Left=0 Top=397 Width=190 Height=429 MaxLeft=-1 MaxTop=-1 ClientWidth=182 ClientHeight=405 TBDockHeight=429 LRDockWidth=190 Dockable=1 SplitPos=85 ArrangeBy=Name SelectedItem= ExpandedItems= HiddenCategories= [ObjectTree] Create=1 Visible=1 State=0 Left=0 Top=105 Width=190 Height=290 MaxLeft=-1 MaxTop=-1 ClientWidth=182 ClientHeight=266 TBDockHeight=290 LRDockWidth=190 Dockable=1 [CodeExplorer@EditWindow0] Create=1 Visible=1 State=0 Left=0 Top=12 Width=140 Height=503 MaxLeft=-1 MaxTop=-1 ClientWidth=140 ClientHeight=503 TBDockHeight=305 LRDockWidth=140 Dockable=1 [MessageView@EditWindow0] Create=1 Visible=0 State=0 Left=-6 Top=-557 Width=443 Height=85 MaxLeft=-1 MaxTop=-1 ClientWidth=443 ClientHeight=85 TBDockHeight=85 LRDockWidth=443 Dockable=1 [DockHosts] DockHostCount=0 --- NEW FILE: OrckaD7.res --- (This appears to be a binary file; contents omitted.) --- NEW FILE: OrckaD7.dof --- [FileVersion] Version=7.0 [Compiler] A=1 B=0 C=1 D=1 E=0 F=0 G=0 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=0 U=0 V=1 W=0 X=1 Y=1 Z=1 ShowHints=0 ShowWarnings=0 UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; NamespacePrefix= SymbolDeprecated=1 SymbolLibrary=1 SymbolPlatform=1 UnitLibrary=1 UnitPlatform=1 UnitDeprecated=1 HResultCompat=1 HidingMember=1 HiddenVirtual=1 Garbage=1 BoundsError=1 ZeroNilCompat=1 StringConstTruncated=1 ForLoopVarVarPar=1 TypedConstVarPar=1 AsgToTypedConst=1 CaseLabelRange=1 ForVariable=1 ConstructingAbstract=1 ComparisonFalse=1 ComparisonTrue=1 ComparingSignedUnsigned=1 CombiningSignedUnsigned=1 UnsupportedConstruct=1 FileOpen=1 FileOpenUnitSrc=1 BadGlobalSymbol=1 DuplicateConstructorDestructor=1 InvalidDirective=1 PackageNoLink=1 PackageThreadVar=1 ImplicitImport=1 HPPEMITIgnored=1 NoRetVal=1 UseBeforeDef=1 ForLoopVarUndef=1 UnitNameMismatch=1 NoCFGFileFound=1 MessageDirective=1 ImplicitVariants=1 UnicodeToLocale=1 LocaleToUnicode=1 ImagebaseMultiple=1 SuspiciousTypecast=1 PrivatePropAccessor=1 UnsafeType=1 UnsafeCode=1 UnsafeCast=1 [Linker] MapFile=0 OutputObjs=0 ConsoleApp=1 DebugInfo=0 RemoteSymbols=0 MinStackSize=16384 MaxStackSize=1048576 ImageBase=4194304 ExeDescription=Orcka Component Suite v2.0 (Simon Carter) [Directories] OutputDir=C:\Inetpub\wwwroot\cgi-bin UnitOutputDir= PackageDLLOutputDir= PackageDCPOutputDir= SearchPath=..\Source;D:\Program Files\Borland\Delphi6\Source\Rtl 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=D:\Program Files\Borland\Delphi6\Bin\delphi32.exe Launcher= UseLauncher=0 DebugCWD= [Language] ActiveLang= ProjectLang= RootDir= [Version Info] IncludeVerInfo=1 AutoIncBuild=1 MajorVer=2 MinorVer=0 Release=0 Build=139 Debug=0 PreRelease=0 Special=0 Private=0 DLL=1 Locale=2057 CodePage=1252 [Version Info Keys] CompanyName=Orcka FileDescription= FileVersion=2.0.0.139 InternalName= LegalCopyright=Copyright © 1999 - 2001. 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=1 Item0=..\Source;D:\Program Files\Borland\Delphi6\Source\Rtl [HistoryLists\hlOutputDirectorry] Count=2 Item0=C:\Inetpub\wwwroot\cgi-bin Item1=D:\Program Files\Other\TB2K\Demo |
|
From: Si C. <tec...@us...> - 2005-11-21 10:33:45
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/Map In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10593/Samples/VCL/Map 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"c:\program files\borland\delphi5\Projects\Bpl" -LN"c:\program files\borland\delphi5\Projects\Bpl" -U"R:\Components\Orcka" -O"R:\Components\Orcka" -I"R:\Components\Orcka" -R"R:\Components\Orcka" --- NEW FILE: Project1.dof --- [Compiler] A=1 B=0 C=1 D=1 E=0 F=0 G=1 H=1 I=1 J=1 K=0 L=1 M=0 N=1 O=0 P=1 Q=0 R=0 S=0 T=0 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=R:\Components\Orcka Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;ibevnt50;Vclbde50;vcldbx50;Qrpt50;TeeUI50;TeeDB50;Tee50;Dss50;TeeQR50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;NMFast50;webmid50;dclocx50;dclaxserver50;ET;ETComps;OrckaD5 Conditionals= DebugSourceDirs= UsePackages=0 [Parameters] RunParams= HostApplication= [Language] ActiveLang= ProjectLang=$00000809 RootDir= [Version Info] IncludeVerInfo=0 AutoIncBuild=0 MajorVer=1 MinorVer=0 Release=0 Build=0 Debug=0 PreRelease=0 Special=0 Private=0 DLL=0 Locale=2057 CodePage=1252 [Version Info Keys] CompanyName= FileDescription= FileVersion=1.0.0.0 InternalName= LegalCopyright= LegalTrademarks= OriginalFilename= ProductName= ProductVersion=1.0.0.0 Comments= [Excluded Packages] D:\Program Files\Other\Indy\D5\dclindy50.BPL=INDY Designtime [HistoryLists\hlUnitAliases] Count=1 Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; [HistoryLists\hlSearchPath] Count=6 Item0=$(DELPHI)\Lib\Debug;R:\Components\Orcka Item1=C:\Program Files\Other\Tcomport;$(DELPHI)\Source\Toolsapi;R:\Components\Orcka;C:\Development\Projects\CTE\Source\Shared Item2=$(DELPHI)\Lib\Debug Item3=$(DELPHI)\Source\Toolsapi;C:\Program Files\Other\Tcomport Item4=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\Toolsapi;C:\Program Files\Other\Tcomport Item5=$(DELPHI)\Lib\Debug;C:\Program Files\Other\Tcomport [HistoryLists\hlOutputDirectorry] Count=2 Item0=c:\winnt\system32\ Item1=C:\WINNT\system32 --- 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, OrckaMap, ImgList, StdCtrls, Buttons, OrckaButton, ExtCtrls, ComCtrls; type TForm1 = class(TForm) Map: TOrckaMap; ImageList1: TImageList; Panel1: TPanel; OrckaButton1: TOrckaButton; OrckaButton2: TOrckaButton; OrckaButton3: TOrckaButton; OrckaButton4: TOrckaButton; OrckaButton5: TOrckaButton; OrckaButton6: TOrckaButton; OrckaButton7: TOrckaButton; OrckaButton8: TOrckaButton; OrckaButton9: TOrckaButton; OrckaButton10: TOrckaButton; StatusBar1: TStatusBar; OrckaButton11: TOrckaButton; OrckaButton12: TOrckaButton; ComboBox1: TComboBox; OrckaButton13: TOrckaButton; OrckaButton14: TOrckaButton; OrckaButton15: TOrckaButton; OrckaButton16: TOrckaButton; imgToolbar: TImageList; procedure FormCreate(Sender: TObject); procedure OrckaButton4Click(Sender: TObject); procedure OrckaButton1Click(Sender: TObject); procedure OrckaButton2Click(Sender: TObject); procedure OrckaButton3Click(Sender: TObject); procedure OrckaButton5Click(Sender: TObject); procedure OrckaButton7Click(Sender: TObject); procedure OrckaButton9Click(Sender: TObject); procedure OrckaButton10Click(Sender: TObject); procedure OrckaButton11Click(Sender: TObject); procedure MapKeySelect(Sender: TObject; Key: TOrckaMapKey; KeyID: Integer); procedure OrckaButton13Click(Sender: TObject); procedure ComboBox1Change(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.DFM} procedure TForm1.FormCreate(Sender: TObject); var I: Longint; begin OrckaButton7Click(nil); OrckaButton7Click(nil); ComboBox1.Items.Clear; for I := 0 to Map.KeyItems.Count -1 do ComboBox1.Items.AddObject(Map.KeyItems[I].Description,Map.KeyItems[I]); ComboBox1.ItemIndex := 0; ComboBox1Change(nil); end; procedure TForm1.OrckaButton4Click(Sender: TObject); begin Map.Reset; end; procedure TForm1.OrckaButton1Click(Sender: TObject); begin Map.ZoomOut; end; procedure TForm1.OrckaButton2Click(Sender: TObject); begin Map.ZoomOutSmall; end; procedure TForm1.OrckaButton3Click(Sender: TObject); begin Map.ZoomInSmall; end; procedure TForm1.OrckaButton5Click(Sender: TObject); begin Map.ZoomIn; end; procedure TForm1.OrckaButton7Click(Sender: TObject); begin Map.Designing := not Map.Designing; if Map.Designing then StatusBar1.Panels[0].Text := 'Unlocked' else StatusBar1.Panels[0].Text := 'Locked'; OrckaButton1.Enabled := not Map.Designing; OrckaButton2.Enabled := not Map.Designing; OrckaButton3.Enabled := not Map.Designing; OrckaButton4.Enabled := not Map.Designing; OrckaButton5.Enabled := not Map.Designing; end; procedure TForm1.OrckaButton9Click(Sender: TObject); begin Map.GridType := gtNone; end; procedure TForm1.OrckaButton10Click(Sender: TObject); begin Map.GridType := gtLines; end; procedure TForm1.OrckaButton11Click(Sender: TObject); begin Map.GridType := gtDots; end; procedure TForm1.MapKeySelect(Sender: TObject; Key: TOrckaMapKey; KeyID: Integer); var I: Longint; begin for I := 0 to ComboBox1.Items.Count -1 do if Pointer(Key) = ComboBox1.Items.Objects[I] then begin ComboBox1.ItemIndex := I; ComboBox1Change(nil); Break; end; end; procedure TForm1.OrckaButton13Click(Sender: TObject); begin TOrckaMapKey(ComboBox1.Items.Objects[ComboBox1.ItemIndex]).State := TKeyState((Sender as TOrckaButton).Tag); end; procedure TForm1.ComboBox1Change(Sender: TObject); begin case TOrckaMapKey(ComboBox1.Items.Objects[ComboBox1.ItemIndex]).State of ksNone: OrckaButton13.Down := True; ksSlow: OrckaButton14.Down := True; ksMedium: OrckaButton15.Down := True; ksFast: OrckaButton16.Down := True; end; end; end. --- NEW FILE: Unit1.dfm --- (This appears to be a binary file; contents omitted.) |
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/SpellCheck/Visual In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10593/Samples/VCL/SpellCheck/Visual Added Files: SpellCheck.cfg SpellCheck.dof SpellCheck.dpr SpellCheck.dsk SpellCheck.res Unit1.dfm Unit1.pas Log Message: Initially added to source control --- NEW FILE: SpellCheck.res --- (This appears to be a binary file; contents omitted.) --- NEW FILE: SpellCheck.dsk --- [Closed Files] File_0=SourceModule,'d:\orcka\source\OrckaSpellChecker.pas',0,1,34,1,38,0,0 File_1=SourceModule,'d:\program files\borland\delphi6\source\rtl\common\classes.pas',0,1,4159,1,4170,0,0 File_2=SourceModule,'d:\orcka\Source\OrckaNotify.pas',0,1,387,27,399,0,0 File_3=SourceModule,'d:\orcka\Source\OrckaButton.pas',0,1,43,3,19,0,0 File_4=SourceModule,'d:\orcka\Source\OrckaRegister.pas',0,1,31,32,38,0,0 File_5=SourceModule,'d:\orcka\Source\OrckaMap.pas',0,1,55,36,56,0,0 File_6=SourceModule,'D:\Orcka\Source\OrckaRuler.pas',0,1,431,14,454,0,0 File_7=SourceModule,'G:\Develop\CD\CDGen\Source\CDLabelEdit.pas',0,1,331,26,341,0,0 File_8=SourceModule,'D:\orcka\Source\OrckaLibraryLoader.pas',0,1,93,1,103,0,0 [Modules] Module0=D:\Program Files\Orcka\Component Suite\Source\OrckaSpellCheckForm.pas Module1=D:\Program Files\Orcka\Component Suite\Source\OrckaSpellChecker.pas Module2=D:\Program Files\Orcka\Component Suite\Samples\VCL\SpellCheck\Visual\Unit1.pas Module3=D:\Program Files\Orcka\Component Suite\Samples\VCL\SpellCheck\Visual\SpellCheck.dpr Count=4 EditWindowCount=1 [D:\Program Files\Orcka\Component Suite\Source\OrckaSpellCheckForm.pas] ModuleType=SourceModule FormState=1 FormOnTop=0 [D:\Program Files\Orcka\Component Suite\Source\OrckaSpellChecker.pas] ModuleType=SourceModule FormState=0 FormOnTop=0 [D:\Program Files\Orcka\Component Suite\Samples\VCL\SpellCheck\Visual\Unit1.pas] ModuleType=SourceModule FormState=0 FormOnTop=0 [D:\Program Files\Orcka\Component Suite\Samples\VCL\SpellCheck\Visual\SpellCheck.dpr] ModuleType=SourceModule FormState=0 FormOnTop=0 [D:\Program Files\Borland\Delphi6\Projects\ProjectGroup1.bpg] FormState=0 FormOnTop=0 [EditWindow0] ViewCount=4 CurrentView=2 View0=0 View1=1 View2=2 View3=3 CodeExplorer=CodeExplorer@EditWindow0 MessageView=MessageView@EditWindow0 Create=1 Visible=1 State=0 Left=272 Top=110 Width=742 Height=546 MaxLeft=-1 MaxTop=-1 ClientWidth=734 ClientHeight=519 LeftPanelSize=0 RightPanelSize=0 BottomPanelSize=0 BottomPanelClients=MessageView@EditWindow0 BottomPanelData=00000400010000000B0000004D65737361676556696577DE02000000000000023400000000000000010000000000000000000000000100000000DF020000000000000100000000DE020000000000000100000000DE02000000000000FFFFFFFF [View0] Module=D:\Program Files\Orcka\Component Suite\Samples\VCL\SpellCheck\Visual\SpellCheck.dpr CursorX=6 CursorY=5 TopLine=1 LeftCol=1 [View1] Module=D:\Program Files\Orcka\Component Suite\Samples\VCL\SpellCheck\Visual\Unit1.pas CursorX=35 CursorY=9 TopLine=1 LeftCol=1 [View2] Module=D:\Program Files\Orcka\Component Suite\Source\OrckaSpellCheckForm.pas CursorX=15 CursorY=446 TopLine=438 LeftCol=1 [View3] Module=D:\Program Files\Orcka\Component Suite\Source\OrckaSpellChecker.pas CursorX=1 CursorY=105 TopLine=103 LeftCol=1 [Watches] Count=0 [Breakpoints] Count=0 [AddressBreakpoints] Count=0 [Main Window] Create=1 Visible=1 State=0 Left=0 Top=0 Width=1024 Height=105 MaxLeft=-1 MaxTop=-1 ClientWidth=1016 ClientHeight=78 [ProjectManager] Create=1 Visible=1 State=0 Left=0 Top=0 Width=223 Height=479 MaxLeft=-1 MaxTop=-1 ClientWidth=223 ClientHeight=479 TBDockHeight=303 LRDockWidth=438 Dockable=1 [AlignmentPalette] Create=1 Visible=0 State=0 Left=200 Top=107 Width=156 Height=82 MaxLeft=-1 MaxTop=-1 ClientWidth=150 ClientHeight=60 [PropertyInspector] Create=1 Visible=1 State=0 Left=0 Top=0 Width=223 Height=479 MaxLeft=-1 MaxTop=-1 ClientWidth=223 ClientHeight=479 TBDockHeight=494 LRDockWidth=190 Dockable=1 SplitPos=85 ArrangeBy=Name SelectedItem=Name ExpandedItems=Value HiddenCategories=Legacy [WatchWindow] Create=1 Visible=0 State=0 Left=10 Top=554 Width=516 Height=179 MaxLeft=-1 MaxTop=-1 ClientWidth=508 ClientHeight=155 TBDockHeight=149 LRDockWidth=421 Dockable=1 [BreakpointWindow] Create=1 Visible=0 State=0 Left=10 Top=554 Width=516 Height=179 MaxLeft=-1 MaxTop=-1 ClientWidth=508 ClientHeight=155 TBDockHeight=197 LRDockWidth=737 Dockable=1 Column0Width=100 Column1Width=75 Column2Width=200 Column3Width=200 Column4Width=75 Column5Width=75 [CallStackWindow] Create=1 Visible=0 State=0 Left=10 Top=554 Width=516 Height=179 MaxLeft=-1 MaxTop=-1 ClientWidth=508 ClientHeight=155 TBDockHeight=161 LRDockWidth=294 Dockable=1 [ThreadStatusWindow] Create=1 Visible=0 State=0 Left=0 Top=0 Width=615 Height=546 MaxLeft=-1 MaxTop=-1 ClientWidth=607 ClientHeight=522 TBDockHeight=152 LRDockWidth=624 Dockable=1 Column0Width=145 Column1Width=100 Column2Width=115 Column3Width=250 [ModuleWindow] Create=1 Visible=0 State=0 Left=10 Top=554 Width=516 Height=179 MaxLeft=-1 MaxTop=-1 ClientWidth=508 ClientHeight=155 TBDockHeight=118 LRDockWidth=353 Dockable=1 Column0Width=125 Column1Width=100 Column2Width=155 EntryPointPane=225 CompUnitPane=104 [ObjectTree] Create=1 Visible=0 State=0 Left=0 Top=105 Width=190 Height=252 MaxLeft=-1 MaxTop=-1 ClientWidth=182 ClientHeight=228 TBDockHeight=252 LRDockWidth=190 Dockable=1 [DebugLogView] Create=1 Visible=0 State=0 Left=10 Top=554 Width=516 Height=179 MaxLeft=-1 MaxTop=-1 ClientWidth=508 ClientHeight=155 TBDockHeight=291 LRDockWidth=417 Dockable=1 [LocalVarsWindow] Create=1 Visible=0 State=0 Left=10 Top=462 Width=421 Height=189 MaxLeft=-1 MaxTop=-1 ClientWidth=413 ClientHeight=165 TBDockHeight=189 LRDockWidth=421 Dockable=1 [CodeExplorer@EditWindow0] Create=1 Visible=1 State=0 Left=0 Top=0 Width=223 Height=479 MaxLeft=-1 MaxTop=-1 ClientWidth=223 ClientHeight=479 TBDockHeight=305 LRDockWidth=140 Dockable=1 [MessageView@EditWindow0] Create=1 Visible=0 State=0 Left=12 Top=0 Width=722 Height=52 MaxLeft=-1 MaxTop=-1 ClientWidth=722 ClientHeight=52 TBDockHeight=52 LRDockWidth=443 Dockable=1 [DockHosts] DockHostCount=1 [DockSite0] DockSiteType=1 Create=1 Visible=1 State=0 Left=0 Top=107 Width=258 Height=511 MaxLeft=-1 MaxTop=-1 ClientWidth=250 ClientHeight=487 TBDockHeight=511 LRDockWidth=258 Dockable=1 TabPosition=2 ActiveTab=Object Inspector TabDockClients=PropertyInspector,ProjectManager,CodeExplorer@EditWindow0 --- NEW FILE: SpellCheck.cfg --- -$A8 -$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\delphi6\Projects\Bpl" -LN"d:\program files\borland\delphi6\Projects\Bpl" --- NEW FILE: SpellCheck.dof --- [Compiler] A=8 B=0 C=1 D=1 E=0 F=0 G=1 H=1 I=1 J=0 K=0 L=1 M=0 N=1 O=0 P=1 Q=0 R=0 S=0 T=0 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 MinStackSize=16384 MaxStackSize=1048576 ImageBase=4194304 ExeDescription= [Directories] OutputDir= UnitOutputDir= SearchPath= Packages=vcl;rtl;dbrtl;adortl;vcldb;vclx;bdertl;vcldbx;ibxpress;dsnap;cds;bdecds;qrpt;teeui;teedb;tee;dss;teeqr;visualclx;visualdbclx;dsnapcrba;dsnapcon;VclSmp;vclshlctrls;vclie;xmlrtl;inet;inetdbbde;inetdbxpress;inetdb;nmfast;webdsnap;websnap;dbexpress;dbxcds;indy;dclOffice2k;OrckaD6;ibam Conditionals= DebugSourceDirs= UsePackages=0 [Parameters] RunParams= HostApplication= [Version Info] IncludeVerInfo=0 AutoIncBuild=0 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= FileDescription= FileVersion=1.0.0.0 InternalName= LegalCopyright= LegalTrademarks= OriginalFilename= ProductName= ProductVersion=1.0.0.0 Comments= --- NEW FILE: Unit1.pas --- unit Unit1; interface {$I OrckaDV.inc} uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, OrckaSpellCheckForm, OrckaEdit, OrckaGroupBox, ComCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TButton; OpenDialog1: TOpenDialog; OrckaVisualSpellChecker1: TOrckaVisualSpellChecker; PageControl1: TPageControl; TabSheet1: TTabSheet; TabSheet2: TTabSheet; Memo1: TMemo; RichEdit1: TRichEdit; TabSheet3: TTabSheet; OrckaRadioGroupBox1: TOrckaRadioGroupBox; OrckaRadioGroupBox2: TOrckaRadioGroupBox; Edit1: TEdit; OrckaButtonEdit1: TOrckaButtonEdit; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin if PageControl1.ActivePage = TabSheet1 then OpenDialog1.Filter := 'Text Files|*.txt' else OpenDialog1.Filter := 'Rich Text Files|*.rtf'; {$IFDEF DelphiVer5Up} if OpenDialog1.Execute then case PageControl1.ActivePageIndex of 0: Memo1.Lines.LoadFromFile(OpenDialog1.FileName); 1: RichEdit1.Lines.LoadFromFile(OpenDialog1.FileName); end; {$ELSE} if OpenDialog1.Execute then if PageControl1.ActivePage = TabSheet1 then Memo1.Lines.LoadFromFile(OpenDialog1.FileName) else RichEdit1.Lines.LoadFromFile(OpenDialog1.FileName); {$ENDIF} end; procedure TForm1.Button2Click(Sender: TObject); begin if PageControl1.ActivePage = TabSheet3 then begin if OrckaRadioGroupBox1.Checked then OrckaVisualSpellChecker1.EditControl := TCustomEdit(Edit1) else OrckaVisualSpellChecker1.EditControl := TCustomEdit(OrckaButtonEdit1); end else begin if PageControl1.ActivePage = TabSheet1 then OrckaVisualSpellChecker1.EditControl := TCustomEdit(Memo1) else OrckaVisualSpellChecker1.EditControl := TCustomEdit(RichEdit1); end; if OrckaVisualSpellChecker1.Execute then ShowMessage('Spell Check Complete') else ShowMessage('Spell Check Cancelled'); end; end. --- NEW FILE: Unit1.dfm --- (This appears to be a binary file; contents omitted.) --- NEW FILE: SpellCheck.dpr --- program SpellCheck; uses Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end. |
|
From: Si C. <tec...@us...> - 2005-11-21 10:33:44
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/DBShare/Interbase/Host In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10593/Samples/VCL/PluginManager/DBShare/Interbase/Host Added Files: IB_DB_SHARE.cfg IB_DB_SHARE.dof IB_DB_SHARE.dpr IB_DB_SHARE.dsk IB_DB_SHARE.ini IB_DB_SHARE.res uMain.dfm uMain.pas uOpenedFile.dfm uOpenedFile.pas Log Message: Initially added to source control --- NEW FILE: uMain.dfm --- object Form1: TForm1 Left = 230 Top = 107 Width = 648 Height = 136 Caption = 'Database Handle Share - Interbase' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 OldCreateOrder = False PixelsPerInch = 96 TextHeight = 13 object ControlBar1: TControlBar Left = 0 Top = 0 Width = 640 Height = 63 Align = alClient AutoSize = True BevelEdges = [beTop] RowSize = 41 TabOrder = 0 end object StatusBar1: TStatusBar Left = 0 Top = 63 Width = 640 Height = 19 Panels = < item Width = 100 end item Width = 100 end item Width = 50 end> end object MainMenu1: TMainMenu Left = 184 Top = 32 object File1: TMenuItem Caption = '&File' object Close1: TMenuItem Caption = '&Close' OnClick = Close1Click end end object Help1: TMenuItem Caption = '&Help' object About1: TMenuItem Caption = '&About' end end end object ImageList1: TImageList Left = 216 Top = 32 end object OrckaPluginManager1: TOrckaPluginManager ImageList = ImageList1 Menu = MainMenu1 ToolBarStyle = tbsControlBar ControlBar = ControlBar1 FlatButtons = True ButtonSize = 26 Toolbars.DefaultToolbar = 'PluginToolbar' Toolbars.Public = True Toolbars.Toolbars.Strings = ( 'PluginToolbar') PluginSettingsType = psIniFile PluginIniFileName = 'asdf' PluginOptions = [poDoSleep, poDoProcessMessages, poDoShowHelp, poAllowInsertToolbars, poAllowRemoveToolbars, poOnActivate, poOnDeactivate, poOnException, poOnHelp, poOnMinimize, poOnRestore, poOnSettingsChanged, poOnShortCut, poOnShowHint] OnGetAddinParams = OrckaPluginManager1GetAddinParams OnGetHandle = OrckaPluginManager1GetHandle OnGetDatabaseHandle = OrckaPluginManager1GetDatabaseHandle OnInsertButton = OrckaPluginManager1InsertButton Left = 248 Top = 32 end object IBDatabase1: TIBDatabase Params.Strings = ( 'user_name=sysdba' 'password=masterkey') LoginPrompt = False DefaultTransaction = IBTransaction1 IdleTimer = 0 SQLDialect = 3 TraceFlags = [] Left = 8 Top = 32 end object IBTransaction1: TIBTransaction Active = False DefaultDatabase = IBDatabase1 AutoStopAction = saNone Left = 40 Top = 32 end object OpenDialog1: TOpenDialog FileName = 'employee.gdb' Filter = 'Sample Employee Database|employee.fdb|All Files|*.*' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofShareAware, ofEnableSizing] Left = 104 Top = 32 end object OpenDialog2: TOpenDialog DefaultExt = '*.txt' Filter = 'Text Files|*.txt|All Files|*.*' Options = [ofHideReadOnly, ofShareAware, ofEnableSizing] Left = 144 Top = 32 end end --- NEW FILE: IB_DB_SHARE.dpr --- program IB_DB_SHARE; uses Forms, uMain in 'uMain.pas' {Form1}, HostShared in '..\HostShared.pas', uOpenedFile in 'uOpenedFile.pas' {Form2}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.CreateForm(TForm2, Form2); Application.Run; end. --- NEW FILE: IB_DB_SHARE.res --- (This appears to be a binary file; contents omitted.) --- NEW FILE: IB_DB_SHARE.ini --- [Database] DB Location=D:\Program Files\Common Files\Borland Shared\Data\employee.gdb --- NEW FILE: IB_DB_SHARE.cfg --- -$A8 -$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 -E"..\Prog" -LE"c:\program files\borland\delphi7\Projects\Bpl" -LN"c:\program files\borland\delphi7\Projects\Bpl" -w-UNSAFE_TYPE -w-UNSAFE_CODE -w-UNSAFE_CAST --- NEW FILE: uMain.pas --- unit uMain; interface {$Include OrckaDV.inc} uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, IBDatabase, DB, OrckaPluginManager, HostShared, OrckaPluginManagerShared, ExtCtrls, ImgList, Menus, IBSQL, StdCtrls, OrckaButton; type THostSharedMain = class(THostShared) procedure SetTitle(NewTitle: TSmallString); override; function OpenFile: Boolean; override; end; TPluginSettingsDB = class(TPluginSettings) private FQuery: TIBSQL; FTran: TIBTransaction; protected function BoolToStr(Value: Boolean): string; function StrToBool(Value: string): Boolean; public constructor Create(APluginManager: TOrckaCustomPluginManager); override; destructor Destroy; override; procedure WriteString(Section, Ident: string; Value: string); override; procedure WriteInteger(Section, Ident: string; Value: Integer); override; procedure WriteBool(Section, Ident: string; Value: Boolean); override; function ReadString(Section, Ident: string; Default: string): string; override; function ReadInteger(Section, Ident: string; Default: Integer): Integer; override; function ReadBool(Section, Ident: string; Default: Boolean): Boolean; override; end; TForm1 = class(TForm) MainMenu1: TMainMenu; File1: TMenuItem; Close1: TMenuItem; Help1: TMenuItem; About1: TMenuItem; ImageList1: TImageList; ControlBar1: TControlBar; OrckaPluginManager1: TOrckaPluginManager; IBDatabase1: TIBDatabase; IBTransaction1: TIBTransaction; StatusBar1: TStatusBar; OpenDialog1: TOpenDialog; OpenDialog2: TOpenDialog; procedure OrckaPluginManager1GetDatabaseHandle(Sender: TObject; var DatabaseHandle: Pointer); procedure OrckaPluginManager1GetHandle(Sender: TObject; var Hwnd: Integer); procedure OrckaPluginManager1GetAddinParams(Sender: TObject; AddinManagerParams: TOrckaAddinManagerParams); procedure Close1Click(Sender: TObject); procedure OrckaPluginManager1InsertButton(Sender: TObject; Button: TOrckaButton; var ToolbarName: String); private FHostShared: THostSharedMain; procedure OpenDatabase; procedure OpenFile(FileName: string); procedure HintHandler(Sender: TObject); public constructor Create(AOwner: TComponent); override; destructor Destroy; override; end; var Form1: TForm1; implementation uses IniFiles {$ifdef DelphiVer6Up}, DBLogDlg{$ENDIF}, IB, uOpenedFile, Buttons; {$R *.dfm} procedure THostSharedMain. SetTitle(NewTitle: TSmallString); begin (* Sets the title of the main form *) Form1.Caption := 'Database Handle Share - Interbase ' + NewTitle end; function THostSharedMain. OpenFile: Boolean; begin (* Calls the hosts opendialog, if successful force the host to open the file. *) Result := Form1.OpenDialog1.Execute; If Result then Form1.OpenFile(Form1.OpenDialog1.FileName); end; procedure TForm1.OrckaPluginManager1GetDatabaseHandle(Sender: TObject; var DatabaseHandle: Pointer); begin DatabaseHandle := IBDatabase1.Handle; end; procedure TForm1.OrckaPluginManager1GetHandle(Sender: TObject; var Hwnd: Integer); begin Hwnd := Handle; end; constructor TForm1.Create(AOwner: TComponent); begin inherited Create(AOwner); (* Install the hint handler *) Application.OnHint := HintHandler; (* Create an instance of the Host Shared object that, can be passed to all plugins *) FHostShared := THostSharedMain.Create; (* Open the database *) OpenDatabase; (* Install custom plugin settings *) OrckaPluginManager1.SetPluginSettings(TPluginSettingsDB); (* Load all plugins that are in the same directory as the exe *) OrckaPluginManager1.LoadFromPath(ExtractFilePath(ParamStr(0))); end; procedure TForm1.OpenDatabase; var Ini: TIniFile; dbName: string; dbPassword: string; begin Ini := TIniFile.Create(ChangeFileExt(ParamStr(0), '.ini')); try (* Get the database location and password *) dbName := Ini.ReadString('Database', 'DB Location', ''); dbPassword := Ini.ReadString('Database', 'Password', ''); (* If the file doesn't exist then blank the name and select it from fresh (presumes local interbase) *) if not FileExists(dbName) then dbName := ''; if dbName = '' then begin if OpenDialog1.Execute then begin dbName := OpenDialog1.FileName; Ini.WriteString('Database', 'DB Location', dbName); end else begin ShowMessage('Database not selected, this application will now close'); Application.Terminate; end; end; IBDatabase1.DatabaseName := '127.0.0.1/64000:' + dbName; IBDatabase1.Params.Text := 'user_name=sysdba'; if dbPassword <> '' then IBDatabase1.Params.Text := IBDatabase1.Params.Text + #13'password=' + dbPassword; IBDatabase1.LoginPrompt := dbPassword = ''; IBDatabase1.Connected := True; dbPassword := IBDatabase1.Params.Values['password']; Ini.WriteString('Database', 'Password', dbPassword); finally Ini.Free; end; end; { TPluginSettingsDB } function TPluginSettingsDB.BoolToStr(Value: Boolean): string; begin if Value then Result := 'T' else Result := 'F'; end; constructor TPluginSettingsDB.Create( APluginManager: TOrckaCustomPluginManager); begin inherited Create(APluginManager); (* Create a transaction object *) FTran := TIBTransaction.Create(nil); FTran.DefaultDatabase := Form1.IBDatabase1; (* Create an IBSQL object *) FQuery := TIBSQL.Create(nil); FQuery.Database := Form1.IBDatabase1; FQuery.Transaction := FTran; end; destructor TPluginSettingsDB.Destroy; begin if FTran.InTransaction then FTran.Commit; FTran.Free; FQuery.Free; inherited Destroy; end; function TPluginSettingsDB.ReadBool(Section, Ident: string; Default: Boolean): Boolean; begin try Result := StrToBool(ReadString(Section, Ident, BoolToStr(Default))); except Result := Default; end; end; function TPluginSettingsDB.ReadInteger(Section, Ident: string; Default: Integer): Integer; begin try Result := StrToInt(ReadString(Section, Ident, IntToStr(Default))); except Result := Default; end; end; function TPluginSettingsDB.ReadString(Section, Ident, Default: string): string; begin FTran.StartTransaction; try FQuery.SQL.Text := Format('SELECT PSVALUE FROM PLUGINSETTINGS ' + 'WHERE PSSECTION = ''%s'' AND PSKEY = ''%s'';', [Section, Ident]); FQuery.ExecQuery; if FQuery.Bof and FQuery.Eof then Result := Default else Result := FQuery.Fields[0].AsString; finally FTran.Rollback; end; end; function TPluginSettingsDB.StrToBool(Value: string): Boolean; begin if Value = 'T' then Result := True else Result := False; end; procedure TPluginSettingsDB.WriteBool(Section, Ident: string; Value: Boolean); begin WriteString(Section, Ident, BoolToStr(Value)); end; procedure TPluginSettingsDB.WriteInteger(Section, Ident: string; Value: Integer); begin WriteString(Section, Ident, IntToStr(Value)); end; procedure TPluginSettingsDB.WriteString(Section, Ident, Value: string); begin FTran.StartTransaction; try try FQuery.SQL.Text := Format('INSERT INTO PLUGINSETTINGS(PSSECTION, ' + 'PSKEY, PSVALUE) VALUES (''%s'', ''%s'', ''%s'');', [Section, Ident, Value]); FQuery.ExecQuery; except on E: EIBInterbaseError do begin (* Ignore exceptions here, it probably means its already in the database, to be diligent we could check the actual error string *) end; on E: Exception do raise; end; FQuery.SQL.Text := Format('UPDATE PLUGINSETTINGS SET PSVALUE = ''%s'' ' + 'WHERE PSSECTION = ''%s'' AND PSKEY = ''%s'';', [Value, Section, Ident]); FQuery.ExecQuery; finally FTran.Commit; end; end; procedure TForm1.OrckaPluginManager1GetAddinParams(Sender: TObject; AddinManagerParams: TOrckaAddinManagerParams); begin AddinManagerParams.AppHandle := Application.Handle; AddinManagerParams.User := FHostShared; end; destructor TForm1.Destroy; begin FreeAndNil(FHostShared); inherited Destroy; end; procedure TForm1.OpenFile(FileName: string); var FileOpenForm: TForm2; begin FileOpenForm := TForm2.CreateOpen(FileName); try FileOpenForm.ShowModal; finally FreeAndNil(FileOpenForm); end; end; procedure TForm1.HintHandler(Sender: TObject); begin StatusBar1.SimpleText := GetLongHint(Application.Hint); StatusBar1.SimplePanel := StatusBar1.SimpleText <> ''; end; procedure TForm1.Close1Click(Sender: TObject); begin Close; end; procedure TForm1.OrckaPluginManager1InsertButton(Sender: TObject; Button: TOrckaButton; var ToolbarName: String); begin Button.Layout := blGlyphTop; Button.Width := 60; Button.Height := 40; end; end. --- NEW FILE: uOpenedFile.dfm --- object Form2: TForm2 Left = 230 Top = 107 Width = 381 Height = 337 Caption = 'Form2' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False DesignSize = ( 373 310) PixelsPerInch = 96 TextHeight = 13 object Memo1: TMemo Left = 0 Top = 0 Width = 373 Height = 274 Align = alTop Anchors = [akLeft, akTop, akRight, akBottom] Lines.Strings = ( 'Memo1') ReadOnly = True TabOrder = 0 end object Button1: TButton Left = 294 Top = 281 Width = 75 Height = 25 Anchors = [akRight, akBottom] Caption = '&Close' Default = True TabOrder = 1 OnClick = Button1Click end end --- NEW FILE: IB_DB_SHARE.dof --- [FileVersion] Version=7.0 [Compiler] A=8 B=0 C=1 D=1 E=0 F=0 G=1 H=1 I=1 J=0 K=0 L=1 M=0 N=1 O=1 P=1 Q=0 R=0 S=0 T=0 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; NamespacePrefix= SymbolDeprecated=1 SymbolLibrary=1 SymbolPlatform=1 UnitLibrary=1 UnitPlatform=1 UnitDeprecated=1 HResultCompat=1 HidingMember=1 HiddenVirtual=1 Garbage=1 BoundsError=1 ZeroNilCompat=1 StringConstTruncated=1 ForLoopVarVarPar=1 TypedConstVarPar=1 AsgToTypedConst=1 CaseLabelRange=1 ForVariable=1 ConstructingAbstract=1 ComparisonFalse=1 ComparisonTrue=1 ComparingSignedUnsigned=1 CombiningSignedUnsigned=1 UnsupportedConstruct=1 FileOpen=1 FileOpenUnitSrc=1 BadGlobalSymbol=1 DuplicateConstructorDestructor=1 InvalidDirective=1 PackageNoLink=1 PackageThreadVar=1 ImplicitImport=1 HPPEMITIgnored=1 NoRetVal=1 UseBeforeDef=1 ForLoopVarUndef=1 UnitNameMismatch=1 NoCFGFileFound=1 MessageDirective=1 ImplicitVariants=1 UnicodeToLocale=1 LocaleToUnicode=1 ImagebaseMultiple=1 SuspiciousTypecast=1 PrivatePropAccessor=1 UnsafeType=0 UnsafeCode=0 UnsafeCast=0 [Linker] MapFile=0 OutputObjs=0 ConsoleApp=1 DebugInfo=0 RemoteSymbols=0 MinStackSize=16384 MaxStackSize=1048576 ImageBase=4194304 ExeDescription= [Directories] OutputDir=..\Prog UnitOutputDir= PackageDLLOutputDir= PackageDCPOutputDir= SearchPath= Packages=vcl;rtl;dbrtl;adortl;vcldb;vclx;bdertl;vcldbx;ibxpress;dsnap;cds;bdecds;qrpt;teeui;teedb;tee;dss;teeqr;visualclx;visualdbclx;dsnapcrba;dsnapcon;VclSmp;vclshlctrls;vclie;xmlrtl;inet;inetdbbde;inetdbxpress;inetdb;nmfast;webdsnap;websnap;soaprtl;dbexpress;dbxcds;indy;dclOffice2k Conditionals= DebugSourceDirs= UsePackages=0 [Parameters] RunParams= HostApplication= Launcher= UseLauncher=0 DebugCWD= [Language] ActiveLang= ProjectLang= RootDir=D:\Program Files\Borland\Delphi6\Bin\ [Version Info] IncludeVerInfo=0 AutoIncBuild=0 MajorVer=1 MinorVer=0 Release=0 Build=0 Debug=0 PreRelease=0 Special=0 Private=0 DLL=0 Locale=2057 CodePage=1252 [Version Info Keys] CompanyName= FileDescription= FileVersion=1.0.0.0 InternalName= LegalCopyright= LegalTrademarks= OriginalFilename= ProductName= ProductVersion=1.0.0.0 Comments= [Excluded Packages] c:\program files\borland\delphi7\Projects\Bpl\PLGMDO.bpl=(untitled) --- NEW FILE: uOpenedFile.pas --- unit uOpenedFile; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm2 = class(TForm) Memo1: TMemo; Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public constructor CreateOpen(const FileName: string); virtual; end; var Form2: TForm2; implementation {$R *.dfm} procedure TForm2.Button1Click(Sender: TObject); begin Close; end; constructor TForm2.CreateOpen(const FileName: string); begin inherited; if FileExists(FileName) then Memo1.Lines.LoadFromFile(FileName) else Memo1.Text := Format('Could not open %s', [FileName]); end; end. --- NEW FILE: IB_DB_SHARE.dsk --- [Closed Files] File_0=SourceModule,'d:\program files\borland\delphi6\source\vcl\DBLogDlg.pas',0,1,22,40,30,1,0 File_1=SourceModule,'D:\Program Files\Borland\Delphi6\Projects\IBBackup\Unit1.pas',0,1,5,22,34,0,0 File_2=SourceModule,'d:\program files\borland\delphi6\source\rtl\Sys\Variants.pas',0,1,4964,1,1,0,0 File_3=SourceModule,'d:\program files\borland\delphi6\source\vcl\DB.pas',0,1,25,78,29,0,0 File_4=SourceModule,'D:\Program Files\Borland\Delphi6\Source\Vcl\DBCtrls.pas',0,1,1421,16,1428,0,0 File_5=SourceModule,'D:\Program Files\Borland\Delphi6\Source\Vcl\DBPWDlg.pas',0,1,91,19,94,0,0 File_6=SourceModule,'C:\TEMP\DB.pas',0,1,2275,14,2284,0,0 File_7=SourceModule,'D:\Program Files\Borland\Delphi6\Source\Vcl\DbPWDlg.dfm',0,1,1,39,8,0,0 File_8=SourceModule,'d:\program files\borland\delphi6\source\vcl\DBConsts.pas',0,1,93,1,1,0,0 [Modules] Module0=D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Host\uMain.pas Module1=D:\Program Files\Orcka\Component Suite\Source\OrckaPluginManager.pas Module2=D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Host\IB_DB_SHARE.dpr Module3=D:\Program Files\Orcka\Component Suite\Source\OrckaPluginManagerShared.pas Count=4 EditWindowCount=1 [D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Host\uMain.pas] ModuleType=SourceModule FormState=0 FormOnTop=0 [D:\Program Files\Orcka\Component Suite\Source\OrckaPluginManager.pas] ModuleType=SourceModule FormState=0 FormOnTop=0 [D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Host\IB_DB_SHARE.dpr] ModuleType=SourceModule FormState=0 FormOnTop=0 [D:\Program Files\Orcka\Component Suite\Source\OrckaPluginManagerShared.pas] ModuleType=SourceModule FormState=0 FormOnTop=0 [D:\Program Files\Borland\Delphi6\Bin\ProjectGroup1.bpg] FormState=0 FormOnTop=0 [EditWindow0] ViewCount=4 CurrentView=0 View0=0 View1=1 View2=2 View3=3 CodeExplorer=CodeExplorer@EditWindow0 MessageView=MessageView@EditWindow0 Create=1 Visible=1 State=0 Left=197 Top=128 Width=801 Height=690 MaxLeft=-1 MaxTop=-1 ClientWidth=793 ClientHeight=663 LeftPanelSize=0 RightPanelSize=0 BottomPanelSize=74 BottomPanelClients=MessageView@EditWindow0 BottomPanelData=00000400000000001903000000000000024A0000000000000001000000000000000000000000010000000019030000000000000100000000190300000B0000004D65737361676556696577FFFFFFFF [View0] Module=D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Host\uMain.pas CursorX=1 CursorY=95 TopLine=74 LeftCol=1 [View1] Module=D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Host\IB_DB_SHARE.dpr CursorX=1 CursorY=12 TopLine=1 LeftCol=1 [View2] Module=D:\Program Files\Orcka\Component Suite\Source\OrckaPluginManager.pas CursorX=1 CursorY=3531 TopLine=3518 LeftCol=1 [View3] Module=D:\Program Files\Orcka\Component Suite\Source\OrckaPluginManagerShared.pas CursorX=3 CursorY=279 TopLine=279 LeftCol=1 [Watches] Count=4 Watch0='Ident',256,0,18,1,0 Watch1='Section',256,0,18,1,0 Watch2='Default',256,0,18,1,0 Watch3='Value',256,0,18,1,0 [Breakpoints] Count=3 Breakpoint0='D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Host\uMain.pas',173,'',0,1,'',1,0,0,'',1,'','','' Breakpoint1='D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Host\uMain.pas',160,'',0,1,'',1,0,0,'',1,'','','' Breakpoint2='D:\Program Files\Orcka\Component Suite\Samples\VCL\PluginManager\DBShare\Interbase\Host\uMain.pas',217,'',0,1,'',1,0,0,'',1,'','','' [AddressBreakpoints] Count=0 [Main Window] Create=1 Visible=1 State=0 Left=0 Top=0 Width=1024 Height=105 MaxLeft=-1 MaxTop=-1 ClientWidth=1016 ClientHeight=78 [ProjectManager] Create=1 Visible=1 State=0 Left=0 Top=0 Width=193 Height=483 MaxLeft=-1 MaxTop=-1 ClientWidth=193 ClientHeight=483 TBDockHeight=303 LRDockWidth=438 Dockable=1 [AlignmentPalette] Create=1 Visible=0 State=0 Left=200 Top=107 Width=156 Height=82 MaxLeft=-1 MaxTop=-1 ClientWidth=150 ClientHeight=60 [PropertyInspector] Create=1 Visible=1 State=0 Left=0 Top=0 Width=193 Height=483 MaxLeft=-1 MaxTop=-1 ClientWidth=193 ClientHeight=483 TBDockHeight=381 LRDockWidth=190 Dockable=1 SplitPos=85 ArrangeBy=Name SelectedItem=Caption ExpandedItems=Options HiddenCategories= [WatchWindow] Create=1 Visible=0 State=0 Left=8 Top=525 Width=449 Height=191 MaxLeft=-1 MaxTop=-1 ClientWidth=441 ClientHeight=167 TBDockHeight=149 LRDockWidth=421 Dockable=1 [BreakpointWindow] Create=1 Visible=0 State=0 Left=8 Top=525 Width=449 Height=191 MaxLeft=-1 MaxTop=-1 ClientWidth=441 ClientHeight=167 TBDockHeight=197 LRDockWidth=737 Dockable=1 Column0Width=100 Column1Width=75 Column2Width=200 Column3Width=200 Column4Width=75 Column5Width=75 [CallStackWindow] Create=1 Visible=0 State=0 Left=8 Top=525 Width=449 Height=191 MaxLeft=-1 MaxTop=-1 ClientWidth=441 ClientHeight=167 TBDockHeight=161 LRDockWidth=294 Dockable=1 [ObjectTree] Create=1 Visible=1 State=0 Left=0 Top=0 Width=193 Height=483 MaxLeft=-1 MaxTop=-1 ClientWidth=193 ClientHeight=483 TBDockHeight=252 LRDockWidth=190 Dockable=1 [CodeExplorer@EditWindow0] Create=1 Visible=1 State=0 Left=0 Top=0 Width=193 Height=483 MaxLeft=-1 MaxTop=-1 ClientWidth=193 ClientHeight=483 TBDockHeight=305 LRDockWidth=140 Dockable=1 [MessageView@EditWindow0] Create=1 Visible=1 State=0 Left=12 Top=0 Width=781 Height=74 MaxLeft=-1 MaxTop=-1 ClientWidth=781 ClientHeight=74 TBDockHeight=74 LRDockWidth=443 Dockable=1 [DockHosts] DockHostCount=1 [DockSite0] DockSiteType=1 Create=1 Visible=1 State=0 Left=0 Top=108 Width=228 Height=515 MaxLeft=-1 MaxTop=-1 ClientWidth=220 ClientHeight=491 TBDockHeight=381 LRDockWidth=190 Dockable=1 TabPosition=2 ActiveTab=Object Inspector TabDockClients=PropertyInspector,ObjectTree,ProjectManager,CodeExplorer@EditWindow0 |
|
From: Si C. <tec...@us...> - 2005-11-21 10:33:44
|
Update of /cvsroot/ocs-comps/OCS2/Samples/XP/qikdic In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10593/Samples/XP/qikdic Added Files: qikdic.cfg qikdic.conf qikdic.dat qikdic.desk qikdic.dof qikdic.dpr qikdic.dsk qikdic.kof qikdic.res Unit1.dfm Unit1.pas Log Message: Initially added to source control --- NEW FILE: qikdic.dof --- [FileVersion] Version=6.0 [Compiler] A=8 B=0 C=1 D=1 E=0 F=0 G=1 H=1 I=1 J=0 K=0 L=1 M=0 N=1 O=1 P=1 Q=0 R=0 S=0 T=0 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= Packages=vcl;rtl;dbrtl;adortl;vcldb;vclx;bdertl;vcldbx;ibxpress;dsnap;cds;bdecds;qrpt;teeui;teedb;tee;dss;teeqr;visualclx;visualdbclx;dsnapcrba;dsnapcon;VclSmp;vclshlctrls;vclie;xmlrtl;inet;inetdbbde;inetdbxpress;inetdb;nmfast;webdsnap;websnap;dbexpress;dbxcds;indy;dclaxserver;OrckaD6 Conditionals= DebugSourceDirs= UsePackages=0 [Parameters] RunParams= HostApplication= Launcher= UseLauncher=0 DebugCWD= [Language] ActiveLang= ProjectLang= RootDir=C:\Program Files\Borland\Delphi6\Bin\ [Version Info] IncludeVerInfo=0 AutoIncBuild=0 MajorVer=1 MinorVer=0 Release=0 Build=0 Debug=0 PreRelease=0 Special=0 Private=0 DLL=0 Locale=2057 CodePage=1252 [Version Info Keys] CompanyName= FileDescription= FileVersion=1.0.0.0 InternalName= LegalCopyright= 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=5 Item0=D:\Program Files\Borland\Delphi6\Source\ToolsAPI Item1=D:\Orcka\Source;D:\Program Files\Borland\Delphi6\Source\Rtl Item2=D:\Orcka\Source Item3=D:\packages\CDGen\Source;D:\packages\CDMail\Source;D:\packages\CDSubCls\Source Item4=D:\packages\CDGen\Source;D:\packages\CDMail\Source;D:\packages\CDSubCls\Source;d:\orcka\source [HistoryLists\hlUnitOutputDirectory] Count=2 Item0=D:\Orcka\D5 Item1=D:\Orcka\D6 [HistoryLists\hlOutputDirectorry] Count=2 Item0=C:\Inetpub\wwwroot\cgi-bin Item1=E:\Orcka [HistoryLists\hlBPLOutput] Count=2 Item0=D:\Orcka\D5 Item1=D:\Orcka\D6 --- NEW FILE: qikdic.res --- (This appears to be a binary file; contents omitted.) --- NEW FILE: qikdic.desk --- [Closed Files] File_0=SourceModule,'/home/simon/orcka/source/OrckaAddinManagerShared.pas',0,1,163,58,177,0,0 File_1=SourceModule,'/home/simon/orcka/source/OrckaAddinManager.pas',0,1,1353,4,1416,0,0 File_2=SourceModule,'/home/simon/orcka/source/OrckaStringGrid.pas',0,1,183,35,192,0,0 File_3=SourceModule,'/home/simon/orcka/source/OrckaRegister.pas',0,1,73,17,80,0,0 File_4=SourceModule,'/home/simon/orcka/source/CSVProcs.pas',0,1,35,13,40,0,0 File_5=SourceModule,'/home/simon/orcka/source/OrckaLibraryLoader.pas',0,1,33,58,43,0,0 File_6=SourceModule,'/home/simon/orcka/source/OrckaTimer.pas',0,1,35,3,42,0,0 File_7=SourceModule,'/home/simon/orcka/source/OrckaSpellChecker.pas',0,1,525,5,532,0,0 File_8=SourceModule,'/home/simon/orcka/source/OrckaWebLabel.pas',0,1,55,1,65,0,0 File_9=SourceModule,'/home/simon/kylix/source/clx/QComCtrls.pas',0,1,1,1,1,0,0 [Modules] Module0=/home/simon/orcka/qikdic/Unit1.pas Module1=/home/simon/kylix/source/clx/IniFiles.pas Count=2 EditWindowCount=1 [/home/simon/orcka/qikdic/Unit1.pas] ModuleType=SourceModule FormState=1 FormOnTop=1 [/home/simon/kylix/source/clx/IniFiles.pas] ModuleType=SourceModule FormState=0 FormOnTop=0 [/home/simon/ProjectGroup1.bpg] FormState=0 FormOnTop=0 [/home/simon/orcka/qikdic/qikdic.dpr] FormState=0 FormOnTop=0 [EditWindow0] ViewCount=2 CurrentView=1 View0=0 View1=1 CodeExplorer=CodeExplorer@EditWindow0 MessageView=MessageView@EditWindow0 Create=1 Visible=1 State=0 Left=302 Top=208 Width=696 Height=482 MaxLeft=-1 MaxTop=-1 ClientWidth=696 ClientHeight=482 LeftPanelSize=140 LeftPanelClients=CodeExplorer@EditWindow0 LeftPanelData=000004000000000000000000000000000000000000000000000100000000000000000C000000436F64654578706C6F726572FFFFFFFF RightPanelSize=0 BottomPanelSize=0 BottomPanelClients=MessageView@EditWindow0 BottomPanelData=00000400010000000B0000004D657373616765566965770000000000000000000000000000000000FFFFFFFF [View0] Module=/home/simon/orcka/qikdic/Unit1.pas CursorX=1 CursorY=153 TopLine=148 LeftCol=1 [View1] Module=/home/simon/kylix/source/clx/IniFiles.pas CursorX=1 CursorY=760 TopLine=744 LeftCol=1 [Watches] Count=0 [Breakpoints] Count=1 Breakpoint0='/home/simon/orcka/qikdic/Unit1.pas',153,'',0,1,'',1,0,0,'',1,'','','' [AddressBreakpoints] Count=0 [Main Window] Create=1 Visible=1 State=0 Left=3 Top=19 Width=1024 Height=87 MaxLeft=-1 MaxTop=-1 ClientWidth=1024 ClientHeight=87 [ProjectManager] Create=1 Visible=0 State=0 Left=369 Top=372 Width=535 Height=368 MaxLeft=-1 MaxTop=-1 ClientWidth=529 ClientHeight=343 TBDockHeight=368 LRDockWidth=535 Dockable=1 [AlignmentPalette] Create=1 Visible=0 State=0 Left=203 Top=117 Width=156 Height=85 MaxLeft=-1 MaxTop=-1 ClientWidth=150 ClientHeight=60 [PropertyInspector] Create=1 Visible=0 State=0 Left=3 Top=117 Width=190 Height=494 MaxLeft=-1 MaxTop=-1 ClientWidth=182 ClientHeight=467 TBDockHeight=494 LRDockWidth=190 Dockable=1 SplitPos=85 ArrangeBy=Name SelectedItem=Caption ExpandedItems= HiddenCategories= ShowStatusBar=1 [WatchWindow] Create=1 Visible=1 State=0 Left=0 Top=0 Width=407 Height=96 MaxLeft=-1 MaxTop=-1 ClientWidth=407 ClientHeight=96 TBDockHeight=149 LRDockWidth=421 Dockable=1 [BreakpointWindow] Create=1 Visible=1 State=0 Left=0 Top=0 Width=407 Height=96 MaxLeft=-1 MaxTop=-1 ClientWidth=407 ClientHeight=96 TBDockHeight=119 LRDockWidth=293 Dockable=1 Column0Width=123 Column1Width=92 Column2Width=246 Column3Width=246 Column4Width=92 Column5Width=92 [CallStackWindow] Create=1 Visible=1 State=0 Left=0 Top=0 Width=407 Height=96 MaxLeft=-1 MaxTop=-1 ClientWidth=407 ClientHeight=96 TBDockHeight=161 LRDockWidth=294 Dockable=1 [CodeExplorer@EditWindow0] Create=1 Visible=1 State=0 Left=0 Top=12 Width=140 Height=449 MaxLeft=-1 MaxTop=-1 ClientWidth=140 ClientHeight=449 TBDockHeight=305 LRDockWidth=140 Dockable=1 [MessageView@EditWindow0] Create=1 Visible=0 State=0 Left=12 Top=0 Width=684 Height=52 MaxLeft=-1 MaxTop=-1 ClientWidth=684 ClientHeight=52 TBDockHeight=52 LRDockWidth=443 Dockable=1 [DockHosts] DockHostCount=1 [DockSite0] DockSiteType=1 Create=1 Visible=1 State=0 Left=-3 Top=548 Width=421 Height=149 MaxLeft=-1 MaxTop=-1 ClientWidth=415 ClientHeight=124 TBDockHeight=149 LRDockWidth=421 Dockable=1 TabPosition=0 ActiveTab=Watch List TabDockClients=WatchWindow,BreakpointWindow,CallStackWindow --- NEW FILE: qikdic.dsk --- [Closed Files] File_0=SourceModule,'d:\orcka\source\OrckaTrayIcon.pas',0,1,108,26,124,0,0 File_1=SourceModule,'d:\orcka\source\OrckaWebLabel.pas',0,1,1,1,34,0,0 File_2=SourceModule,'D:\Orcka\Source\OrckaRegister.pas',0,1,70,62,142,0,0 File_3=SourceModule,'d:\orcka\Source\OrckaNotify.pas',0,1,387,27,399,0,0 File_4=SourceModule,'d:\orcka\Source\OrckaButton.pas',0,1,43,3,19,0,0 File_5=SourceModule,'d:\orcka\Source\OrckaMap.pas',0,1,55,36,56,0,0 File_6=SourceModule,'D:\Orcka\Source\OrckaRuler.pas',0,1,431,14,454,0,0 File_7=SourceModule,'G:\Develop\CD\CDGen\Source\CDLabelEdit.pas',0,1,331,26,341,0,0 File_8=SourceModule,'D:\Orcka\Source\OrckaDV.inc',0,1,3,29,35,0,0 [Modules] Module0=D:\Orcka\source\OrckaSpellChecker.pas Module1=E:\Orcka\qikdic\Unit1.pas Module2=d:\orcka\source\OrckaSpellCheckForm.pas Module3=E:\Orcka\qikdic\qikdic.dpr Count=4 EditWindowCount=1 [D:\Orcka\source\OrckaSpellChecker.pas] ModuleType=SourceModule FormState=0 FormOnTop=0 [E:\Orcka\qikdic\Unit1.pas] ModuleType=SourceModule FormState=1 FormOnTop=0 [d:\orcka\source\OrckaSpellCheckForm.pas] ModuleType=SourceModule FormState=1 FormOnTop=0 [E:\Orcka\qikdic\qikdic.dpr] ModuleType=SourceModule FormState=0 FormOnTop=0 [D:\Program Files\Borland\Delphi5\Bin\ProjectGroup1.bpg] FormState=0 FormOnTop=0 [EditWindow0] ViewCount=4 CurrentView=2 View0=0 View1=1 View2=2 View3=3 CodeExplorer=CodeExplorer@EditWindow0 MessageView=MessageView@EditWindow0 Create=1 Visible=1 State=2 Left=279 Top=200 Width=743 Height=508 MaxLeft=-1 MaxTop=101 MaxWidth=1032 MaxHeight=643 ClientWidth=1024 ClientHeight=616 LeftPanelSize=179 LeftPanelClients=CodeExplorer@EditWindow0 LeftPanelData=000004000000000000000000000000000000000000000000000100000000000000000C000000436F64654578706C6F726572FFFFFFFF RightPanelSize=0 BottomPanelSize=0 BottomPanelClients=MessageView@EditWindow0 BottomPanelData=00000400010000000B0000004D657373616765566965770000000000000000000000000000000000FFFFFFFF [View0] Module=E:\Orcka\qikdic\qikdic.dpr CursorX=37 CursorY=11 TopLine=1 LeftCol=1 [View1] Module=E:\Orcka\qikdic\Unit1.pas CursorX=25 CursorY=75 TopLine=42 LeftCol=1 [View2] Module=D:\Orcka\source\OrckaSpellChecker.pas CursorX=1 CursorY=179 TopLine=176 LeftCol=1 [View3] Module=d:\orcka\source\OrckaSpellCheckForm.pas CursorX=1 CursorY=324 TopLine=36 LeftCol=1 [Watches] Count=2 Watch0='Result',256,0,18,1,1 Watch1='sTmp',256,0,18,1,1 [Breakpoints] Count=0 [AddressBreakpoints] Count=0 [Main Window] Create=1 Visible=1 State=0 Left=0 Top=0 Width=1024 Height=105 MaxLeft=-1 MaxTop=-1 ClientWidth=1016 ClientHeight=78 [ProjectManager] Create=1 Visible=1 State=0 Left=6 Top=504 Width=438 Height=196 MaxLeft=-1 MaxTop=-1 ClientWidth=430 ClientHeight=172 TBDockHeight=303 LRDockWidth=438 Dockable=1 [CPUWindow] Create=1 Visible=0 State=0 Left=245 Top=207 Width=533 Height=353 MaxLeft=-1 MaxTop=-1 ClientWidth=525 ClientHeight=326 DumpPane=79 DisassemblyPane=187 RegisterPane=231 FlagPane=64 [AlignmentPalette] Create=1 Visible=0 State=0 Left=200 Top=107 Width=156 Height=82 MaxLeft=-1 MaxTop=-1 ClientWidth=150 ClientHeight=60 [PropertyInspector] Create=1 Visible=1 State=0 Left=0 Top=107 Width=246 Height=465 MaxLeft=-1 MaxTop=-1 ClientWidth=236 ClientHeight=439 TBDockHeight=494 LRDockWidth=190 Dockable=1 SplitPos=109 ArrangeBy=Name SelectedItem=OnButtonClick ExpandedItems= HiddenCategories=Legacy ShowStatusBar=1 [WatchWindow] Create=1 Visible=0 State=0 Left=7 Top=538 Width=509 Height=208 MaxLeft=-1 MaxTop=-1 ClientWidth=501 ClientHeight=184 TBDockHeight=149 LRDockWidth=421 Dockable=1 [BreakpointWindow] Create=1 Visible=0 State=0 Left=9 Top=583 Width=509 Height=149 MaxLeft=-1 MaxTop=-1 ClientWidth=501 ClientHeight=125 TBDockHeight=170 LRDockWidth=323 Dockable=1 Column0Width=100 Column1Width=75 Column2Width=200 Column3Width=200 Column4Width=75 Column5Width=75 [CallStackWindow] Create=1 Visible=0 State=0 Left=7 Top=538 Width=509 Height=208 MaxLeft=-1 MaxTop=-1 ClientWidth=501 ClientHeight=184 TBDockHeight=161 LRDockWidth=294 Dockable=1 [ThreadStatusWindow] Create=1 Visible=0 State=0 Left=7 Top=538 Width=509 Height=208 MaxLeft=-1 MaxTop=-1 ClientWidth=501 ClientHeight=184 TBDockHeight=152 LRDockWidth=624 Dockable=1 Column0Width=145 Column1Width=100 Column2Width=115 Column3Width=250 [ModuleWindow] Create=1 Visible=0 State=0 Left=7 Top=538 Width=509 Height=208 MaxLeft=-1 MaxTop=-1 ClientWidth=501 ClientHeight=184 TBDockHeight=355 LRDockWidth=638 Dockable=1 Column0Width=125 Column1Width=100 Column2Width=155 EntryPointPane=225 CompUnitPane=104 [DebugLogView] Create=1 Visible=0 State=0 Left=7 Top=538 Width=509 Height=208 MaxLeft=-1 MaxTop=-1 ClientWidth=501 ClientHeight=184 TBDockHeight=291 LRDockWidth=417 Dockable=1 [LocalVarsWindow] Create=1 Visible=0 State=0 Left=7 Top=538 Width=509 Height=208 MaxLeft=-1 MaxTop=-1 ClientWidth=501 ClientHeight=184 TBDockHeight=192 LRDockWidth=421 Dockable=1 [CodeExplorer@EditWindow0] Create=1 Visible=1 State=0 Left=0 Top=12 Width=179 Height=586 MaxLeft=-1 MaxTop=-1 ClientWidth=179 ClientHeight=586 TBDockHeight=305 LRDockWidth=179 Dockable=1 [MessageView@EditWindow0] Create=1 Visible=0 State=0 Left=12 Top=0 Width=1012 Height=52 MaxLeft=-1 MaxTop=-1 ClientWidth=1012 ClientHeight=52 TBDockHeight=52 LRDockWidth=443 Dockable=1 [DockHosts] DockHostCount=0 --- NEW FILE: qikdic.kof --- [Compiler] A=8 B=0 C=1 D=1 E=0 F=0 G=1 H=1 I=1 J=0 K=0 L=1 M=0 N=1 O=1 P=1 Q=0 R=0 S=0 T=0 U=0 V=1 W=0 X=1 Y=1 Z=1 ShowHints=1 ShowWarnings=1 UnitAliases= [Linker] MapFile=0 OutputObjs=0 ConsoleApp=1 DebugInfo=0 RemoteSymbols=0 MinStackSize=16384 MaxStackSize=1048576 ImageBase=4194304 ExeDescription= DynamicLoader=/lib/ld-linux.so.2 [Directories] OutputDir= UnitOutputDir= PackageDLLOutputDir= PackageDCPOutputDir= SearchPath=/home/simon/kylix/lib/debug Packages=baseclx:visualclx:visualdbclx:dataclx:indy:orckak1 Conditionals= DebugSourceDirs= UsePackages=0 [Parameters] RunParams= HostApplication= Launcher=/usr/X11R6/bin/xterm -T KylixDebuggerOutput -e bash -i -c %debuggee% UseLauncher=0 DebugCWD= --- NEW FILE: qikdic.dat --- [Settings] Top=122 Left=342 Width=270 Height=210 [Dictionary] Dictionary=/home/simon/orcka/Dictionaries/american.dic Custom Dictionary=/home/simon/orcka/Dictionaries/custom.dic --- NEW FILE: Unit1.dfm --- object Form1: TForm1 Left = 342 Top = 122 Width = 270 Height = 210 HorzScrollBar.Range = 255 VertScrollBar.Range = 69 ActiveControl = ListBox2 Caption = 'Orcka Dictionary' Color = clButton Constraints.MinHeight = 210 Constraints.MinWidth = 270 Font.Color = clText Font.Height = 11 Font.Name = 'MS Sans Serif' Font.Pitch = fpVariable Font.Style = [] ParentFont = False OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 TextWidth = 5 object Bevel1: TBevel Left = 8 Top = 144 Width = 247 Height = 2 Anchors = [akLeft, akRight, akBottom] end object OrckaButton1: TOrckaButton Left = 232 Top = 32 Width = 23 Height = 22 Caption = '...' Flat = True OnClick = edtWordButtonClick AlignTopLeft = False ButtonStyle = obButton ImageIndex = -1 Position = -1 end object Label1: TLabel Left = 8 Top = 56 Width = 57 Height = 13 Caption = 'Suggestions' end object OrckaWebLabel1: TOrckaWebLabel Left = 8 Top = 158 Width = 57 Height = 13 Cursor = crHandPoint Anchors = [akLeft, akBottom] Caption = 'Orcka Home' WebFont.Color = clBlue WebFont.Height = 11 WebFont.Name = 'MS Sans Serif' WebFont.Pitch = fpVariable WebFont.Style = [fsUnderline] URL = 'http://www.orcka.com' end object Label2: TLabel Left = 8 Top = 8 Width = 95 Height = 13 Caption = 'Word to Spell Check' end object ListBox2: TListBox Left = 8 Top = 72 Width = 247 Height = 65 Anchors = [akLeft, akTop, akRight, akBottom] Font.Color = clText Font.Height = 11 Font.Name = 'MS Sans Serif' Font.Pitch = fpVariable Font.Style = [] ItemHeight = 13 ParentFont = False Sorted = True TabOrder = 1 end object btnClose: TButton Left = 182 Top = 152 Width = 75 Height = 25 Anchors = [akRight, akBottom] Caption = '&Close' TabOrder = 3 OnClick = btnCloseClick end object Button1: TButton Left = 86 Top = 152 Width = 91 Height = 25 Anchors = [akRight, akBottom] Caption = 'Add to Dictionary' TabOrder = 2 OnClick = Button1Click end object edtWord: TEdit Left = 8 Top = 32 Width = 222 Height = 21 TabOrder = 6 Text = 'edtWord' OnKeyPress = edtWordKeyPress end object PopupMenu1: TPopupMenu Left = 88 Top = 88 object CheckWord1: TMenuItem Caption = '&Check Word' OnClick = CheckWord1Click end object N1: TMenuItem Caption = '-' end object Close1: TMenuItem Caption = '&Close' OnClick = Close1Click end end object OpenDialog: TOpenDialog DefaultExt = '*.dic' Filter = 'Dictionary File|*.dic' Title = 'Select Dictionary File' Left = 120 Top = 88 end object OrckaSpellChecker: TOrckaSpellChecker Dictionary = '/home/simon/orcka/Dictionaries/american.dic' CustomDictionary = '/home/simon/orcka/Dictionaries/custom.dic' IgnoreList = [ilWithNumbers, ilNumbers, ilUppercase] OnWordNotFound = OrckaSpellCheckerWordNotFound OnSoundLikeFound = OrckaSpellCheckerSoundLikeFound OnWordFound = OrckaSpellCheckerWordFound Left = 24 Top = 88 end end --- NEW FILE: Unit1.pas --- unit Unit1; interface uses SysUtils, Classes, QGraphics, QMenus, QForms, OrckaSpellChecker, QStdCtrls, QControls, OrckaWebLabel, QExtCtrls, QDialogs, QButtons, OrckaButton, QTypes; type TForm1 = class(TForm) ListBox2: TListBox; Label1: TLabel; Bevel1: TBevel; btnClose: TButton; Button1: TButton; PopupMenu1: TPopupMenu; CheckWord1: TMenuItem; N1: TMenuItem; Close1: TMenuItem; OrckaWebLabel1: TOrckaWebLabel; OpenDialog: TOpenDialog; Label2: TLabel; OrckaSpellChecker: TOrckaSpellChecker; edtWord: TEdit; OrckaButton1: TOrckaButton; procedure OrckaSpellCheckerSoundLikeFound(Sender: TObject; Word: String); procedure edtWordButtonClick(Sender: TObject); procedure OrckaSpellCheckerWordFound(Sender: TObject; const Word: String); procedure Button1Click(Sender: TObject); procedure btnCloseClick(Sender: TObject); procedure CheckWord1Click(Sender: TObject); procedure Close1Click(Sender: TObject); procedure FormCreate(Sender: TObject); procedure OrckaTrayIconDblClick(Sender: TObject); procedure FormClose(Sender: TObject; var Action: TCloseAction); procedure OrckaSpellCheckerWordNotFound(Sender: TObject; var Word: String; const StartPos, Length: Integer); procedure edtWordKeyPress(Sender: TObject; var Key: Char); private procedure SaveSettings; procedure LoadSettings; public end; var Form1: TForm1; implementation uses IniFiles; {$R *.dfm} procedure TForm1.OrckaSpellCheckerSoundLikeFound(Sender: TObject; Word: String); begin ListBox2.Items.Add(Word); end; procedure TForm1.edtWordButtonClick(Sender: TObject); begin ListBox2.Items.Clear; OrckaSpellChecker.Execute(edtWord.Text); end; procedure TForm1.OrckaSpellCheckerWordFound(Sender: TObject; const Word: String); begin Application.MessageBox(Format('%s is spelt correctly', [Word])); end; procedure TForm1.Button1Click(Sender: TObject); var S: string; begin s := InputBox(Caption, 'Enter word to add to custom dictionary', edtWord.Text); if s = '' then Exit; OrckaSpellChecker.AddWord(s); end; procedure TForm1.btnCloseClick(Sender: TObject); begin Visible := False; end; procedure TForm1.CheckWord1Click(Sender: TObject); begin Visible := True; end; procedure TForm1.Close1Click(Sender: TObject); begin Close; end; procedure TForm1.FormCreate(Sender: TObject); begin LoadSettings; end; procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin SaveSettings; end; procedure TForm1.OrckaTrayIconDblClick(Sender: TObject); begin Visible := True; end; procedure TForm1.LoadSettings; var Ini: TIniFile; begin Ini := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'qikdic.dat'); try Top := Ini.ReadInteger('Settings', 'Top', Top); Left := Ini.ReadInteger('Settings', 'Left', Left); Width := Ini.ReadInteger('Settings', 'Width', Width); Height := Ini.ReadInteger('Settings', 'Height', Height); OrckaSpellChecker.Dictionary := Ini.ReadString('Dictionary', 'Dictionary', OrckaSpellChecker.Dictionary); if not FileExists(OrckaSpellChecker.Dictionary) then if OpenDialog.Execute then OrckaSpellChecker.Dictionary := OpenDialog.FileName; OrckaSpellChecker.CustomDictionary := Ini.ReadString('Dictionary', 'Custom Dictionary', OrckaSpellChecker.CustomDictionary); finally Ini.Free; end; end; procedure TForm1.SaveSettings; var Ini: TIniFile; begin Ini := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'qikdic.dat'); try Ini.WriteInteger('Settings', 'Top', Top); Ini.WriteInteger('Settings', 'Left', Left); Ini.WriteInteger('Settings', 'Width', Width); Ini.WriteInteger('Settings', 'Height', Height); Ini.WriteString('Dictionary', 'Dictionary', OrckaSpellChecker.Dictionary); Ini.WriteString('Dictionary', 'Custom Dictionary', OrckaSpellChecker.CustomDictionary); {$IFDEF Linux} Ini.UpdateFile; {$ENDIF} finally Ini.Free; end; end; procedure TForm1.OrckaSpellCheckerWordNotFound(Sender: TObject; var Word: String; const StartPos, Length: Integer); begin Application.MessageBox(Format('%s was not be found in the dictionary', [Word])); end; procedure TForm1.edtWordKeyPress(Sender: TObject; var Key: Char); begin if Key = #13 then edtWordButtonClick(nil); end; end. --- NEW FILE: qikdic.dpr --- program qikdic; uses QForms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end. --- NEW FILE: qikdic.cfg --- -$A8 -$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\delphi6\Projects\Bpl" -LN"d:\program files\borland\delphi6\Projects\Bpl" --- NEW FILE: qikdic.conf --- -$A8 -$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 -H+ -W+ -M -$M16384,1048576 -K$00400000 -U"/home/simon/kylix/lib/debug" -O"/home/simon/kylix/lib/debug" -I"/home/simon/kylix/lib/debug" -R"/home/simon/kylix/lib/debug" |
Update of /cvsroot/ocs-comps/OCS2/Samples/BCB/SpellCheck/Visual In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10593/Samples/BCB/SpellCheck/Visual Added Files: SpellCheckDemo.bpr SpellCheckDemo.cpp SpellCheckDemo.obj SpellCheckDemo.res Unit1.cpp Unit1.dfm Unit1.h Log Message: Initially added to source control --- NEW FILE: Unit1.cpp --- //--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "OrckaEdit" #pragma link "OrckaGroupBox" #pragma link "OrckaSpellCheckForm" #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { if (OpenDialog1->Execute()) { switch (OpenDialog1->FilterIndex) { case 1: Memo1->Lines->LoadFromFile(OpenDialog1->FileName); PageControl1->ActivePage = TabSheet1; break; case 2: RichEdit1->Lines->LoadFromFile(OpenDialog1->FileName); PageControl1->ActivePage = TabSheet2; } } } //--------------------------------------------------------------------------- void __fastcall TForm1::Button2Click(TObject *Sender) { if (PageControl1->ActivePage == TabSheet3) { if (OrckaRadioGroupBox1->Checked) { OrckaVisualSpellChecker1->EditControl = Edit1; } else { OrckaVisualSpellChecker1->EditControl = OrckaButtonEdit1; } } else { if (PageControl1->ActivePage == TabSheet1) { OrckaVisualSpellChecker1->EditControl = Memo1; } else { OrckaVisualSpellChecker1->EditControl = RichEdit1; } } if (OrckaVisualSpellChecker1->Execute()) { ShowMessage(AnsiString("Spell Check Complete")); } else { ShowMessage(AnsiString("Spell Check Cancelled")); } } //--------------------------------------------------------------------------- --- NEW FILE: SpellCheckDemo.obj --- (This appears to be a binary file; contents omitted.) --- NEW FILE: SpellCheckDemo.cpp --- //--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop //--------------------------------------------------------------------------- USEFORM("Unit1.cpp", Form1); //--------------------------------------------------------------------------- WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) { try { Application->Initialize(); Application->CreateForm(__classid(TForm1), &Form1); Application->Run(); } catch (Exception &exception) { Application->ShowException(&exception); } return 0; } //--------------------------------------------------------------------------- --- NEW FILE: SpellCheckDemo.bpr --- <?xml version='1.0' encoding='utf-8' ?> <!-- C++Builder XML Project --> <PROJECT> <MACROS> <VERSION value="BCB.06.00"/> <PROJECT value="SpellCheckDemo.exe"/> <OBJFILES value="Unit1.obj SpellCheckDemo.obj"/> <RESFILES value="SpellCheckDemo.res"/> <IDLFILES value=""/> <IDLGENFILES value=""/> <DEFFILE value=""/> <RESDEPEN value="$(RESFILES) "..\..\..\Orcka\Component Suite\Samples\BCB\Spell Check\Visual\Unit1.dfm""/> <LIBFILES value=""/> <LIBRARIES value=""/> <SPARELIBS value="vcl.lib rtl.lib OrckaBCB6.lib vcldb.lib dbrtl.lib"/> <PACKAGES value="vcl.bpi rtl.bpi dbrtl.bpi adortl.bpi vcldb.bpi vclx.bpi bdertl.bpi vcldbx.bpi ibxpress.bpi dsnap.bpi cds.bpi bdecds.bpi qrpt.bpi teeui.bpi teedb.bpi tee.bpi dss.bpi teeqr.bpi visualclx.bpi visualdbclx.bpi dsnapcrba.bpi dsnapcon.bpi bcbsmp60.bpi vclie.bpi xmlrtl.bpi inet.bpi inetdbbde.bpi inetdbxpress.bpi inetdb.bpi nmfast.bpi webdsnap.bpi bcbie60.bpi websnap.bpi soaprtl.bpi dclocx.bpi dbexpress.bpi dbxcds.bpi indy.bpi bcb2kaxserver60.bpi OrckaBCB6.bpi"/> <PATHCPP value=".;"/> <PATHPAS value=".;"/> <PATHRC value=".;"/> <PATHASM value=".;"/> <DEBUGLIBPATH value="$(BCB)\lib\debug"/> <RELEASELIBPATH value="$(BCB)\lib\release"/> <LINKER value="ilink32"/> <USERDEFINES value="_DEBUG"/> <SYSDEFINES value="_RTLDLL;NO_STRICT;USEPACKAGES"/> <MAINSOURCE value="SpellCheckDemo.cpp"/> <INCLUDEPATH value="..\..\..\..\..\..\Borland\CBuilder6\Projects;"..\..\..\Orcka\Component Suite\Samples\BCB\Spell Check\Visual";"..\..\..\orcka\component suite\source";$(BCB)\include;$(BCB)\include\vcl"/> <LIBPATH value="..\..\..\..\..\..\Borland\CBuilder6\Projects;"..\..\..\Orcka\Component Suite\Samples\BCB\Spell Check\Visual";$(BCB)\Projects\Lib;"..\..\..\orcka\component suite\source";$(BCB)\lib\obj;$(BCB)\lib"/> <WARNINGS value="-w-par"/> </MACROS> <OPTIONS> <IDLCFLAGS value="-I..\..\..\..\..\..\Borland\CBuilder6\Projects -I"..\..\..\Orcka\Component Suite\Samples\BCB\Spell Check\Visual" -I"..\..\..\orcka\component suite\source" -I$(BCB)\include -I$(BCB)\include\vcl -src_suffix cpp -D_DEBUG -boa"/> <CFLAG1 value="-Od -H=$(BCB)\lib\vcl60.csm -Hc -Vx -Ve -X- -r- -a8 -b- -k -y -v -vi- -c -tW -tWM"/> <PFLAGS value="-$YD -$W -$O- -v -JPHNE -M"/> <RFLAGS value=""/> <AFLAGS value="/mx /w2 /zd"/> <LFLAGS value="-D"" -aa -Tpe -x -Gn -v"/> </OPTIONS> <LINKER> <ALLOBJ value="c0w32.obj $(PACKAGES) Memmgr.Lib sysinit.obj $(OBJFILES)"/> <ALLRES value="$(RESFILES)"/> <ALLLIB value="$(LIBFILES) $(LIBRARIES) import32.lib cp32mti.lib"/> </LINKER> <FILELIST> <FILE FILENAME="SpellCheckDemo.res" FORMNAME="" UNITNAME="SpellCheckDemo.res" CONTAINERID="ResTool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="SpellCheckDemo.cpp" FORMNAME="" UNITNAME="SpellCheckDemo" CONTAINERID="CCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="Unit1.cpp" FORMNAME="Form1" UNITNAME="Unit1" CONTAINERID="CCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> </FILELIST> <IDEOPTIONS> [Version Info] IncludeVerInfo=0 AutoIncBuild=0 MajorVer=1 MinorVer=0 Release=0 Build=0 Debug=0 PreRelease=0 Special=0 Private=0 DLL=0 Locale=2057 CodePage=1252 [Version Info Keys] CompanyName= FileDescription= FileVersion=1.0.0.0 InternalName= LegalCopyright= LegalTrademarks= OriginalFilename= ProductName= ProductVersion=1.0.0.0 Comments= [Debugging] DebugSourceDirs=$(BCB)\source\vcl [Parameters] RunParams= Launcher= UseLauncher=0 DebugCWD= HostApplication= RemoteHost= RemotePath= RemoteLauncher= RemoteCWD= RemoteDebug=0 [Compiler] ShowInfoMsgs=0 LinkDebugVcl=0 LinkCGLIB=0 [CORBA] AddServerUnit=1 AddClientUnit=1 PrecompiledHeaders=1 [Language] ActiveLang= ProjectLang= RootDir= </IDEOPTIONS> </PROJECT> --- NEW FILE: Unit1.h --- //--------------------------------------------------------------------------- #ifndef Unit1H #define Unit1H //--------------------------------------------------------------------------- #include <Classes.hpp> #include <Controls.hpp> #include <StdCtrls.hpp> #include <Forms.hpp> #include "OrckaEdit.hpp" #include "OrckaGroupBox.hpp" #include <ComCtrls.hpp> #include "OrckaSpellCheckForm.hpp" #include <Dialogs.hpp> //--------------------------------------------------------------------------- class TForm1 : public TForm { __published: // IDE-managed Components TButton *Button1; TButton *Button2; TPageControl *PageControl1; TTabSheet *TabSheet1; TMemo *Memo1; TTabSheet *TabSheet2; TRichEdit *RichEdit1; TTabSheet *TabSheet3; TOrckaRadioGroupBox *OrckaRadioGroupBox1; TEdit *Edit1; TOrckaRadioGroupBox *OrckaRadioGroupBox2; TOrckaButtonEdit *OrckaButtonEdit1; TOpenDialog *OpenDialog1; TOrckaVisualSpellChecker *OrckaVisualSpellChecker1; void __fastcall Button1Click(TObject *Sender); void __fastcall Button2Click(TObject *Sender); private: // User declarations public: // User declarations __fastcall TForm1(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif --- NEW FILE: Unit1.dfm --- (This appears to be a binary file; contents omitted.) --- NEW FILE: SpellCheckDemo.res --- (This appears to be a binary file; contents omitted.) |
|
From: Si C. <tec...@us...> - 2005-11-21 10:33:43
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/AddinManager/Debug/DebugPlugin In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10593/Samples/VCL/AddinManager/Debug/DebugPlugin Added Files: Debug.dpr Debug.res DebugSample.pas DebugWindows.dfm DebugWindows.pas Log Message: Initially added to source control --- NEW FILE: DebugSample.pas --- unit DebugSample; interface uses Windows, DebugShared, OrckaAddinManagerShared; type TDebugClient = class(TClient) private FService: TOToolServices; FServer: TServer; public constructor Create(Service: TOToolServices; Server: TServer); destructor Destroy; override; function GetName: TShortString; override; procedure AddString(Value: TLongString); override; procedure AddInteger(Value: Integer); override; procedure OnMessage(Msg: TMsg); override; end; function Plugin (InParams: TOrckaAddinManagerParams; var ExitProc: Pointer): Boolean; stdcall; exports Plugin name OrckaAddinManagerExportProc; var DebugClient: TDebugClient; implementation uses DebugWindows, Forms, Messages; procedure PluginExit; stdcall; begin DebugClient.Free; end; function Plugin (InParams: TOrckaAddinManagerParams; var ExitProc: Pointer): Boolean; stdcall; begin DebugClient := TDebugClient.Create(InParams.Service, TServer(InParams.User)); ExitProc := @PluginExit; Result := True; end; exports Plugin name OrckaAddinManagerExportProc; { TDebugClient } procedure TDebugClient.AddInteger(Value: Integer); begin Form2.AddInteger(Value); end; procedure TDebugClient.AddString(Value: TLongString); begin Form2.AddString(Value); end; constructor TDebugClient.Create(Service: TOToolServices; Server: TServer); begin FServer := Server; FService := Service; FServer.AddClient(Self); Form2 := TForm2.Create(nil); Form2.Show; end; destructor TDebugClient.Destroy; begin FServer.RemoveClient(Self); Form2.Free; inherited; end; function TDebugClient.GetName: TShortString; begin Result := 'DebugSample' end; procedure TDebugClient.OnMessage(Msg: TMsg); begin if Msg.message <> WM_MOUSEMOVE then Form2.AddMessage(Msg); end; end. --- NEW FILE: Debug.res --- (This appears to be a binary file; contents omitted.) --- NEW FILE: DebugWindows.pas --- unit DebugWindows; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, ComCtrls; type TForm2 = class(TForm) Panel1: TPanel; Panel2: TPanel; Panel3: TPanel; Splitter1: TSplitter; Splitter2: TSplitter; ListBox1: TListBox; ListBox2: TListBox; Label1: TLabel; Label2: TLabel; Label3: TLabel; ListView1: TListView; private { Private declarations } public procedure AddString(Value: string); procedure AddInteger(Value: Integer); procedure AddMessage(Value: TMsg); end; var Form2: TForm2; implementation {$R *.DFM} uses WinMsg; { TForm2 } procedure TForm2.AddInteger(Value: Integer); begin ListBox2.Items.Add(IntToStr(Value)); ListBox2.ItemIndex := ListBox2.Items.Count -1; end; procedure TForm2.AddMessage(Value: TMsg); function GetControlName: string; var CtlName: PChar; Len: Integer; begin Len := 100; CtlName := StrAlloc(Len + 1); try Len := GetClassName(Value.hwnd, CtlName, Len); Result := Copy(CtlName, 1, Len); finally StrDispose(CtlName); end; end; var ListItem: TListItem; s: string; begin GetMessageText(Value.message, 0, s); ListItem := ListView1.Items.Add; ListItem.Caption := GetControlName; ListItem.SubItems.Add(s); ListItem.SubItems.Add(IntToStr(Value.wParam)); ListItem.SubItems.Add(IntToStr(Value.lParam)); ListView1.Selected := ListItem; end; procedure TForm2.AddString(Value: string); begin ListBox1.Items.Add(Value); ListBox1.ItemIndex := ListBox1.Items.Count -1; end; end. --- NEW FILE: Debug.dpr --- library Debug; uses DebugShared in '..\DebugShared.pas', DebugSample in 'DebugSample.pas', DebugWindows in 'DebugWindows.pas' {Form2}; {$R *.RES} begin end. --- NEW FILE: DebugWindows.dfm --- object Form2: TForm2 Left = 404 Top = 134 Width = 581 Height = 397 Caption = 'Debug Windows' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop OldCreateOrder = False PixelsPerInch = 96 TextHeight = 13 object Splitter1: TSplitter Left = 0 Top = 214 Width = 573 Height = 3 Cursor = crVSplit Align = alBottom end object Splitter2: TSplitter Left = 305 Top = 0 Width = 3 Height = 214 Cursor = crHSplit end object Panel1: TPanel Left = 0 Top = 0 Width = 305 Height = 214 Align = alLeft TabOrder = 0 object Label1: TLabel Left = 1 Top = 1 Width = 303 Height = 28 Align = alTop Caption = 'Strings' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = 'Comic Sans MS' Font.Style = [] ParentFont = False end object ListBox1: TListBox Left = 1 Top = 29 Width = 303 Height = 184 Align = alClient ItemHeight = 13 TabOrder = 0 end end object Panel2: TPanel Left = 308 Top = 0 Width = 265 Height = 214 Align = alClient TabOrder = 1 object Label2: TLabel Left = 1 Top = 1 Width = 263 Height = 28 Align = alTop Caption = 'Integers' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = 'Comic Sans MS' Font.Style = [] ParentFont = False end object ListBox2: TListBox Left = 1 Top = 29 Width = 263 Height = 184 Align = alClient ItemHeight = 13 TabOrder = 0 end end object Panel3: TPanel Left = 0 Top = 217 Width = 573 Height = 153 Align = alBottom TabOrder = 2 object Label3: TLabel Left = 1 Top = 1 Width = 571 Height = 28 Align = alTop Caption = 'Messages' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = 'Comic Sans MS' Font.Style = [] ParentFont = False end object ListView1: TListView Left = 1 Top = 29 Width = 571 Height = 123 Align = alClient Columns = < item Caption = 'Control' Width = 150 end item Caption = 'Message' Width = 100 end item Caption = 'wParam' Width = 100 end item Caption = 'lParam' Width = 100 end> TabOrder = 0 ViewStyle = vsReport end end end |
|
From: Si C. <tec...@us...> - 2005-11-21 10:33:43
|
Update of /cvsroot/ocs-comps/OCS2 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10593 Added Files: Orcka Component Suite Group.url Orcka Development.url OrckaD9.bdsproj OrckaD9.bdsproj.local OrckaD9.cfg OrckaD9.dpk OrckaD9.dsk OrckaD9.identcache OrckaD9.res OrckaLicense.txt Plugin Manager Group.url ReadMe.txt Log Message: Initially added to source control --- NEW FILE: Plugin Manager Group.url --- [DEFAULT] BASEURL=http://groups.yahoo.com/group/Orcka-AddinManager/?yguid=9264255 [InternetShortcut] URL=http://groups.yahoo.com/group/Orcka-AddinManager/?yguid=9264255 Modified=D0418F26ABECC1011F --- NEW FILE: OrckaD9.bdsproj.local --- (This appears to be a binary file; contents omitted.) --- NEW FILE: OrckaD9.res --- (This appears to be a binary file; contents omitted.) --- NEW FILE: OrckaD9.dpk --- package OrckaD9; {$R *.res} {$R 'Source\OrckaRegister.dcr'} {$ALIGN 1} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA OFF} {$IOCHECKS OFF} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION OFF} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST ON} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'Orcka Component Suite v2.0 (Simon Carter)'} {$DESIGNONLY} {$IMPLICITBUILD ON} requires vcl, VclSmp, Vcldb, designide; contains OrckaScreenSaver in 'Source\OrckaScreenSaver.pas', OrckaTimer in 'Source\OrckaTimer.pas', OrckaVersionInfo in 'Source\OrckaVersionInfo.pas', OrckaTrayIcon in 'Source\OrckaTrayIcon.pas', OrckaSubClass in 'Source\OrckaSubClass.pas', OrckaGroupBox in 'Source\OrckaGroupBox.pas', OrckaRegister in 'Source\OrckaRegister.pas', OrckaFontControls in 'Source\OrckaFontControls.pas', OrckaInterceptor in 'Source\OrckaInterceptor.pas', OrckaButton in 'Source\OrckaButton.pas', OrckaEdit in 'Source\OrckaEdit.pas', OrckaLibraryLoader in 'Source\OrckaLibraryLoader.pas', OrckaMap in 'Source\OrckaMap.pas', OrckaWebLabel in 'Source\OrckaWebLabel.pas', OrckaLabelEdit in 'source\OrckaLabelEdit.pas', OrckaDBLabelEdit in 'Source\OrckaDBLabelEdit.pas', OrckaRuler in 'Source\OrckaRuler.pas', OrckaMemo in 'Source\OrckaMemo.pas', OrckaNotify in 'Source\OrckaNotify.pas', OrckaMapEditor in 'Source\OrckaMapEditor.pas', OrckaDBCtls in 'Source\OrckaDBCtls.pas', CSVProcs in 'Source\CSVProcs.pas', OrckaStringGrid in 'source\OrckaStringGrid.pas', OrckaDBGrid in 'Source\OrckaDBGrid.pas'; end. --- NEW FILE: OrckaD9.identcache --- (This appears to be a binary file; contents omitted.) --- NEW FILE: Orcka Component Suite Group.url --- [DEFAULT] BASEURL=http://groups.yahoo.com/group/orckacomponentsuite/?yguid=9264255 [InternetShortcut] URL=http://groups.yahoo.com/group/orckacomponentsuite/?yguid=9264255 Modified=B0CAEE67ABECC10128 --- NEW FILE: OrckaLicense.txt --- ORCKA COMPONENT SUITE Permission is granted to anyone to use this software for any purpose, including use in commercial applications, and to redistribute it freely, subject to the following restrictions: 1. You are allowed to modify any of this software, but not to distribute the modified source code. Modifications are to be distributed as patches to the released version. 2. Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer. 3. All source code remains Simon Carter's exclusive property. Software distributed under this License is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for the specific language governing rights and limitations under the License. --- NEW FILE: OrckaD9.cfg --- -$A1 -$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 -E"C:\Inetpub\wwwroot\cgi-bin" -LE"C:\Documents and Settings\scar7qs\My Documents\Borland Studio Projects\Bpl" -LN"C:\Documents and Settings\scar7qs\My Documents\Borland Studio Projects\Bpl" -U"..\Source;C:\Program Files\Orcka\Component Suite\Source" -O"..\Source;C:\Program Files\Orcka\Component Suite\Source" -I"..\Source;C:\Program Files\Orcka\Component Suite\Source" -R"..\Source;C:\Program Files\Orcka\Component Suite\Source" --- NEW FILE: OrckaD9.bdsproj --- (This appears to be a binary file; contents omitted.) --- NEW FILE: OrckaD9.dsk --- [Closed Files] File_0=TSourceModule,'C:\Program Files\Orcka\Component Suite\Source\OrckaPluginManager.pas',0,1,1,1,1,0,0,, File_1=TSourceModule,'C:\Program Files\Orcka\Component Suite\Source\OrckaDV.inc',0,1,1,1,103,0,0,, File_2=TSourceModule,'C:\Program Files\Orcka\Component Suite\Source\OrckaRegister.pas',0,1,79,25,92,0,0,, [Modules] Count=0 EditWindowCount=1 [EditWindow0] ViewCount=0 CurrentView=-1 PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=9912 Height=8848 MaxLeft=-1 MaxTop=-1 ClientWidth=9912 ClientHeight=8848 DockedToMainForm=1 MessageView=MessageView@EditWindow0 BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=2480 LeftPanelClients=DockSite1 LeftPanelData=00000800010100000000E91800000000000001B00900000000000001000000003721000009000000446F636B5369746531FFFFFFFF RightPanelSize=0 BottomPanelSize=0 BottomPanelClients=ToDo List,MessageView@EditWindow0,DockSite2 BottomPanelData=000008000102030000000E000000546F446F4C69737457696E646F770B0000004D6573736167655669657709000000446F636B5369746532A0330000000000000276060000000000000100000000A03300000B0000004D65737361676556696577FFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0 BottomMiddelPanelData=0000080001000100000009000000446F636B53697465300000000000000000000000000000000000FFFFFFFF [Watches] Count=0 [WatchWindow] WatchColumnWidth=120 WatchShowColumnHeaders=1 PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=3750 Height=4580 MaxLeft=-1 MaxTop=-1 ClientWidth=3750 ClientHeight=4580 TBDockHeight=203 LRDockWidth=13604 Dockable=1 StayOnTop=0 [Breakpoints] Count=0 [AddressBreakpoints] Count=0 [Main Window] PercentageSizes=1 Create=1 Visible=1 Docked=0 State=0 Left=10 Top=-14 Width=9990 Height=10014 MaxLeft=-10 MaxTop=-14 ClientWidth=9912 ClientHeight=9553 BottomPanelSize=8503 BottomPanelClients=EditWindow0 BottomPanelData=0000080000000000000000000000000000000000000000000000000100000000000000000C0000004564697457696E646F775F30FFFFFFFF [ProjectManager] PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=2158 Height=8401 MaxLeft=-1 MaxTop=-1 ClientWidth=2158 ClientHeight=8401 TBDockHeight=5908 LRDockWidth=3154 Dockable=1 StayOnTop=0 [ToolForm] PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=2158 Height=8401 MaxLeft=-1 MaxTop=-1 ClientWidth=2158 ClientHeight=8401 TBDockHeight=6518 LRDockWidth=2256 Dockable=1 StayOnTop=0 [PropertyInspector] PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=2158 Height=8401 MaxLeft=-1 MaxTop=-1 ClientWidth=2158 ClientHeight=8401 TBDockHeight=407 LRDockWidth=1904 Dockable=1 StayOnTop=0 SplitPos=125 [RMAddinTool] PercentageSizes=1 Create=1 Visible=0 Docked=1 State=0 Left=-5 Top=-104 Width=5303 Height=5136 MaxLeft=-1 MaxTop=-1 ClientWidth=5303 ClientHeight=5136 TBDockHeight=5136 LRDockWidth=5303 Dockable=1 StayOnTop=0 [CallStackWindow] PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=3750 Height=4580 MaxLeft=-1 MaxTop=-1 ClientWidth=3750 ClientHeight=4580 TBDockHeight=2073 LRDockWidth=3486 Dockable=1 StayOnTop=0 [DataExplorer] PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=2158 Height=8401 MaxLeft=-1 MaxTop=-1 ClientWidth=2158 ClientHeight=8401 TBDockHeight=4878 LRDockWidth=7148 Dockable=1 StayOnTop=0 [ToDo List] PercentageSizes=1 Create=1 Visible=0 Docked=1 State=0 Left=-205 Top=-694 Width=3672 Height=1152 MaxLeft=-1 MaxTop=-1 ClientWidth=3672 ClientHeight=1152 TBDockHeight=1152 LRDockWidth=3672 Dockable=1 StayOnTop=0 Column0Width=200 Column1Width=30 Column2Width=100 Column3Width=70 Column4Width=70 SortOrder=4 ShowHints=1 ShowChecked=1 [FindReferencsForm] PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=2266 Height=1843 MaxLeft=-1 MaxTop=-1 ClientWidth=2266 ClientHeight=1843 TBDockHeight=2317 LRDockWidth=2832 Dockable=1 StayOnTop=0 [RefactoringForm] PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=2266 Height=1843 MaxLeft=-1 MaxTop=-1 ClientWidth=2266 ClientHeight=1843 TBDockHeight=3211 LRDockWidth=2832 Dockable=1 StayOnTop=0 [DebugLogView] PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=3750 Height=4580 MaxLeft=-1 MaxTop=-1 ClientWidth=3750 ClientHeight=4580 TBDockHeight=407 LRDockWidth=4951 Dockable=1 StayOnTop=0 [ThreadStatusWindow] PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=3750 Height=4580 MaxLeft=-1 MaxTop=-1 ClientWidth=3750 ClientHeight=4580 TBDockHeight=203 LRDockWidth=7412 Dockable=1 StayOnTop=0 Column0Width=145 Column1Width=100 Column2Width=115 Column3Width=250 [LocalVarsWindow] PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=3750 Height=4580 MaxLeft=-1 MaxTop=-1 ClientWidth=3750 ClientHeight=4580 TBDockHeight=257 LRDockWidth=3486 Dockable=1 StayOnTop=0 [ModelViewTool] PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=2158 Height=8401 MaxLeft=-1 MaxTop=-1 ClientWidth=2158 ClientHeight=8401 TBDockHeight=4878 LRDockWidth=5303 Dockable=1 StayOnTop=0 [BreakpointWindow] PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=3750 Height=4580 MaxLeft=-1 MaxTop=-1 ClientWidth=3750 ClientHeight=4580 TBDockHeight=1545 LRDockWidth=8740 Dockable=1 StayOnTop=0 Column0Width=100 Column1Width=75 Column2Width=200 Column3Width=200 Column4Width=75 Column5Width=75 [StructureView] PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=0 Width=2158 Height=8401 MaxLeft=-1 MaxTop=-1 ClientWidth=2158 ClientHeight=8401 TBDockHeight=4051 LRDockWidth=1904 Dockable=1 StayOnTop=0 [MessageView@EditWindow0] PercentageSizes=1 Create=1 Visible=0 Docked=1 State=0 Left=0 Top=23 Width=9912 Height=1409 MaxLeft=-1 MaxTop=-1 ClientWidth=9912 ClientHeight=1409 TBDockHeight=1409 LRDockWidth=4326 Dockable=1 StayOnTop=0 [BorlandEditorCodeExplorer@EditWindow0] PercentageSizes=1 Create=1 Visible=0 Docked=0 State=0 Left=0 Top=0 Width=1826 Height=6179 MaxLeft=-10 MaxTop=-14 ClientWidth=1748 ClientHeight=5827 TBDockHeight=6179 LRDockWidth=1826 Dockable=1 StayOnTop=0 [DockHosts] DockHostCount=3 [DockSite0] DockSiteType=1 PercentageSizes=1 Create=1 Visible=0 Docked=1 State=0 Left=-257 Top=-552 Width=2344 Height=2317 MaxLeft=-1 MaxTop=-1 ClientWidth=2344 ClientHeight=2317 TBDockHeight=2317 LRDockWidth=2344 Dockable=1 StayOnTop=0 TabPosition=1 ActiveTabID=FindReferencsForm TabDockClients=RefactoringForm,FindReferencsForm [DockSite1] DockSiteType=1 PercentageSizes=1 Create=1 Visible=1 Docked=1 State=0 Left=0 Top=23 Width=2480 Height=8537 MaxLeft=-1 MaxTop=-1 ClientWidth=2480 ClientHeight=8537 TBDockHeight=2507 LRDockWidth=2480 Dockable=1 StayOnTop=0 TabPosition=2 ActiveTabID=ModelViewTool TabDockClients=StructureView,RMAddinTool,ToolForm,DataExplorer,ModelViewTool,ProjectManager,PropertyInspector [DockSite2] DockSiteType=1 PercentageSizes=1 Create=1 Visible=0 Docked=1 State=0 Left=0 Top=-3 Width=3828 Height=5054 MaxLeft=-1 MaxTop=-1 ClientWidth=3828 ClientHeight=5054 TBDockHeight=5054 LRDockWidth=3828 Dockable=1 StayOnTop=0 TabPosition=1 ActiveTabID=LocalVarsWindow TabDockClients=BreakpointWindow,ThreadStatusWindow,DebugLogView,CallStackWindow,WatchWindow,LocalVarsWindow --- NEW FILE: ReadMe.txt --- This file contains information about Orcka Component Suite. 1. Support Details 2. Directories 3. Installing Orcka Component Suite 4. Installing Dictionaries 1. Support Details. -------------------- Support is available at our new support forrum ~ http://support.tectsoft.com 2. Directories --------------- After extracting the contents of the zip file to a directory of your choice the following directories will be created. D5 - Contains Delphi 5 Package (OrckaD5.dpk) D6 - Contains Delphi 6 Package (OrckaD6.dpk) K1 - Contains Kylix 1 Package (OrckaK1.dpk) K2 - Contains Kylix 2 Package (OrckaK2.dpk) BCB6 - Contains Borlnd CBuilder 6 Package (OrckaBCB6.dpk) Help - Contains Help files. Other - Contains English and American Dictionaries. Plugin Wizard - Wizard for creating plugins for use with TOrckaAddinManager Samples\CLX - Contains all CLX sample programs broken down by type. Samples\VCL - Contains all VCL sample programs broken down by type. Samples\XP - Contains all Cross platform sample programs broken down by type. Samples\BCB - Contains all CBuilder Samples. Source - Contains all source code, pre defined forms and resource files. 3. Installing Orcka Component Suite ------------------------------------ To install Orcka Component Suite into Delphi 5 or 6 follow these steps 1. Open Delphi (any supported version). 2. Open the package that supports that version of Delphi. 3. Click Install button on the package. 4. Add the Full Path to the Source directory to the Library path in Environment Options. To install Orcka Component Suite into Kylix 1 & 2 follow these steps 1. Copy all files to the target machine. 2. Open the package that supports that version of Kylix 3. Click Install button on the package. 4. Add the full path to the source directory to the Library path in Environment Options. 4. Installing Dictionaries --------------------------- The following dictionaries are automatically installed to \(Program Files)\Common Files\Orcka\Dictionary\ english.dic custom.dic american.dic These are held in the above path to enable them to be used as a shared resource. --- NEW FILE: Orcka Development.url --- [InternetShortcut] URL=http://www.orcka.com Modified=70CE891F39A4C00184 |
|
From: Si C. <tec...@us...> - 2005-11-21 10:20:52
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/DBShare/Interbase In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7893/Samples/VCL/PluginManager/DBShare/Interbase Log Message: Directory /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/DBShare/Interbase added to the repository |
|
From: Si C. <tec...@us...> - 2005-11-21 10:20:52
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/DBShare In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7893/Samples/VCL/PluginManager/DBShare Log Message: Directory /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/DBShare added to the repository |
|
From: Si C. <tec...@us...> - 2005-11-21 10:20:52
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/Thread In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7893/Samples/VCL/PluginManager/Thread Log Message: Directory /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/Thread added to the repository |
|
From: Si C. <tec...@us...> - 2005-11-21 10:20:52
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/TB2000 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7893/Samples/VCL/PluginManager/TB2000 Log Message: Directory /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/TB2000 added to the repository |
|
From: Si C. <tec...@us...> - 2005-11-21 10:20:52
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/DBShare/Interbase/Clients/Parts In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7893/Samples/VCL/PluginManager/DBShare/Interbase/Clients/Parts Log Message: Directory /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/DBShare/Interbase/Clients/Parts added to the repository |
|
From: Si C. <tec...@us...> - 2005-11-21 10:20:52
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/TBX In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7893/Samples/VCL/PluginManager/TBX Log Message: Directory /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/TBX added to the repository |
|
From: Si C. <tec...@us...> - 2005-11-21 10:20:52
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/Tip of The Day In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7893/Samples/VCL/PluginManager/Tip of The Day Log Message: Directory /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/Tip of The Day added to the repository |
|
From: Si C. <tec...@us...> - 2005-11-21 10:20:52
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/DBShare/Interbase/Prog In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7893/Samples/VCL/PluginManager/DBShare/Interbase/Prog Log Message: Directory /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/DBShare/Interbase/Prog added to the repository |
|
From: Si C. <tec...@us...> - 2005-11-21 10:20:52
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/ETools In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7893/Samples/VCL/PluginManager/ETools Log Message: Directory /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/ETools added to the repository |
|
From: Si C. <tec...@us...> - 2005-11-21 10:20:52
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/ScreenSaver In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7893/Samples/VCL/ScreenSaver Log Message: Directory /cvsroot/ocs-comps/OCS2/Samples/VCL/ScreenSaver added to the repository |
|
From: Si C. <tec...@us...> - 2005-11-21 10:20:52
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/DBShare/Interbase/Clients/Customer In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7893/Samples/VCL/PluginManager/DBShare/Interbase/Clients/Customer Log Message: Directory /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/DBShare/Interbase/Clients/Customer added to the repository |
|
From: Si C. <tec...@us...> - 2005-11-21 10:20:52
|
Update of /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/DBShare/Interbase/Host In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7893/Samples/VCL/PluginManager/DBShare/Interbase/Host Log Message: Directory /cvsroot/ocs-comps/OCS2/Samples/VCL/PluginManager/DBShare/Interbase/Host added to the repository |
