Update of /cvsroot/jvcl/dev/JVCL3/examples/JvZoom/BCB In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23517/dev/JVCL3/examples/JvZoom/BCB Added Files: JvZoomExample.bpr JvZoomExample.cpp JvZoomExample.res MainForm.cpp MainForm.dfm MainForm.h Log Message: New example from Korecek --- NEW FILE: MainForm.h --- //--------------------------------------------------------------------------- #ifndef JvZoomMainFormUB6H #define JvZoomMainFormUB6H //--------------------------------------------------------------------------- #include <Classes.hpp> #include <Controls.hpp> #include <StdCtrls.hpp> #include <Forms.hpp> #include "JvComponent.hpp" #include "JvExControls.hpp" #include "JvZoom.hpp" //--------------------------------------------------------------------------- class TfrmMain : public TForm { __published: // IDE-managed Components TLabel *Label1; TJvZoom *JvZoom1; TCheckBox *CheckBox1; TButton *Button1; TButton *Button2; void __fastcall CheckBox1Click(TObject *Sender); void __fastcall Button1Click(TObject *Sender); void __fastcall Button2Click(TObject *Sender); private: // User declarations public: // User declarations __fastcall TfrmMain(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TfrmMain *frmMain; //--------------------------------------------------------------------------- #endif --- NEW FILE: JvZoomExample.cpp --- //--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop //--------------------------------------------------------------------------- USEFORM("MainForm.cpp", frmMain); //--------------------------------------------------------------------------- WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) { try { Application->Initialize(); Application->CreateForm(__classid(TfrmMain), &frmMain); Application->Run(); } catch (Exception &exception) { Application->ShowException(&exception); } catch (...) { try { throw Exception(""); } catch (Exception &exception) { Application->ShowException(&exception); } } return 0; } //--------------------------------------------------------------------------- --- NEW FILE: MainForm.dfm --- object frmMain: TfrmMain Left = 240 Top = 190 Width = 427 Height = 257 Caption = 'Demo for the JvZoom component' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 288 Top = 72 Width = 103 Height = 13 Caption = 'Adjust the zoom level:' end object JvZoom1: TJvZoom Left = 18 Top = 18 Width = 233 Height = 189 Active = False end object CheckBox1: TCheckBox Left = 280 Top = 20 Width = 97 Height = 17 Caption = 'Active' Checked = True State = cbChecked TabOrder = 1 OnClick = CheckBox1Click end object Button1: TButton Left = 322 Top = 98 Width = 75 Height = 25 Caption = '+' TabOrder = 2 OnClick = Button1Click end object Button2: TButton Left = 321 Top = 130 Width = 75 Height = 25 Caption = '-' TabOrder = 3 OnClick = Button2Click end end --- NEW FILE: JvZoomExample.res --- (This appears to be a binary file; contents omitted.) --- NEW FILE: MainForm.cpp --- //--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include "MainForm.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "JvComponent" #pragma link "JvExControls" #pragma link "JvZoom" #pragma resource "*.dfm" TfrmMain *frmMain; //--------------------------------------------------------------------------- __fastcall TfrmMain::TfrmMain(TComponent* Owner) : TForm(Owner) { JvZoom1->Active = true; } //--------------------------------------------------------------------------- void __fastcall TfrmMain::CheckBox1Click(TObject *Sender) { JvZoom1->Active = CheckBox1->Checked; } //--------------------------------------------------------------------------- void __fastcall TfrmMain::Button1Click(TObject *Sender) { JvZoom1->ZoomLevel = JvZoom1->ZoomLevel/2; } //--------------------------------------------------------------------------- void __fastcall TfrmMain::Button2Click(TObject *Sender) { JvZoom1->ZoomLevel = JvZoom1->ZoomLevel*2; } //--------------------------------------------------------------------------- --- NEW FILE: JvZoomExample.bpr --- <?xml version='1.0' encoding='utf-8' ?> <!-- C++Builder XML Project --> <PROJECT> <MACROS> <VERSION value="BCB.06.00"/> <PROJECT value="..\..\..\bin\JvZoomExample.exe"/> <OBJFILES value="..\..\..\dcu\JvZoomExample.obj ..\..\..\dcu\MainForm.obj"/> <RESFILES value="JvZoomExample.res"/> <IDLFILES value=""/> <IDLGENFILES value=""/> <DEFFILE value=""/> <RESDEPEN value="$(RESFILES) MainForm.dfm"/> <LIBFILES value=""/> <LIBRARIES value=""/> <SPARELIBS value=""/> <PACKAGES value=""/> <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="NO_STRICT"/> <MAINSOURCE value="JvZoomExample.cpp"/> <INCLUDEPATH value="$(BCB)\include;$(BCB)\include\vcl;$(INCLUDEPATH)"/> <LIBPATH value="$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;$(RESPATH)"/> <WARNINGS value="-w-par"/> <OTHERFILES value=""/> </MACROS> <OPTIONS> <IDLCFLAGS value="-I$(BCB)\include -I$(BCB)\include\vcl -I$(INCLUDEPATH) -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="-N2..\..\..\dcu -N0..\..\..\dcu -$YD -$W -$O- -$A8 -v -JPHNE -M"/> <RFLAGS value=""/> <AFLAGS value="/mx /w2 /zd"/> <LFLAGS value="-I..\..\..\dcu -D"" -aa -Tpe -x -Gn -v"/> <OTHERFILES value=""/> </OPTIONS> <LINKER> <ALLOBJ value="c0w32.obj sysinit.obj $(OBJFILES)"/> <ALLRES value="$(RESFILES)"/> <ALLLIB value="$(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib"/> <OTHERFILES value=""/> </LINKER> <FILELIST> <FILE FILENAME="JvZoomExample.res" FORMNAME="" UNITNAME="JvZoomExample.res" CONTAINERID="ResTool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="JvZoomExample.cpp" FORMNAME="" UNITNAME="JvZoomExample" CONTAINERID="CCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="MainForm.cpp" FORMNAME="frmMain" UNITNAME="MainForm" CONTAINERID="CCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> </FILELIST> <BUILDTOOLS> </BUILDTOOLS> <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=1036 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:\prog\cbuilder6\Projects\Bpl\JvCryptC6D.bpl=JVCL Encryption and Compression Components c:\prog\cbuilder6\Projects\Bpl\JvBandsC6D.bpl=JVCL Band Objects c:\prog\cbuilder6\Projects\Bpl\JvPluginC6D.bpl=JVCL Plugin Components c:\prog\cbuilder6\Projects\Bpl\JvJansC6D.bpl=JVCL Jans Components c:\prog\cbuilder6\Projects\Bpl\JvValidatorsC6D.bpl=JVCL Validators and Error Provider Components [HistoryLists\hlIncludePath] Count=3 Item0=$(BCB)\include;$(BCB)\include\vcl;$(INCLUDEPATH) Item1=C:\Prog\CBuilder6\Projects;C:\Perso\Prog\JVCL from CVS\dev\JVCL3\examples\JvZoom\BCB;$(BCB)\include;$(BCB)\include\vcl;$(INCLUDEPATH) Item2=$(BCB)\include;$(BCB)\include\vcl [HistoryLists\hlLibraryPath] Count=4 Item0=$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;$(RESPATH) Item1=C:\Prog\CBuilder6\Projects;$(BCB)\Projects\Lib;C:\Perso\Prog\JVCL from CVS\dev\JVCL3\examples\JvZoom\BCB;$(BCB)\lib\obj;$(BCB)\lib;$(RESPATH) Item2=$(BCB)\lib\obj;$(BCB)\lib;$(RESPATH) Item3=$(BCB)\lib\obj;$(BCB)\lib [HistoryLists\hlDebugSourcePath] Count=1 Item0=$(BCB)\source\vcl [HistoryLists\hlConditionals] Count=1 Item0=_DEBUG [HistoryLists\hlIntOutputDir] Count=1 Item0=..\..\..\dcu [HistoryLists\hlFinalOutputDir] Count=1 Item0=..\..\..\bin [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> |