[Ocs-comps-commits] OCS2/Samples/BCB/SpellCheck/Visual SpellCheckDemo.bpr,NONE,1.1 SpellCheckDemo.cp
Brought to you by:
tectsoft
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.) |