From f2616c1564030fa34184f33c7e3a4fa215965a6a Mon Sep 17 00:00:00 2001 From: Ansgar Becker Date: Thu, 17 Oct 2013 04:39:23 +0000 Subject: [PATCH] Create XE5 main package --- packages/delphiXE5/heidisql.dpr | 78 ++++++++ packages/delphiXE5/heidisql.dproj | 270 ++++++++++++++++++++++++++ packages/delphiXE5/heidisql.groupproj | 84 ++++++++ 3 files changed, 432 insertions(+) create mode 100644 packages/delphiXE5/heidisql.dpr create mode 100644 packages/delphiXE5/heidisql.dproj create mode 100644 packages/delphiXE5/heidisql.groupproj diff --git a/packages/delphiXE5/heidisql.dpr b/packages/delphiXE5/heidisql.dpr new file mode 100644 index 00000000..a7396741 --- /dev/null +++ b/packages/delphiXE5/heidisql.dpr @@ -0,0 +1,78 @@ +program heidisql; + +uses +//madExcept, + Forms, + SysUtils, + Dialogs, + Windows, + main in '..\..\source\main.pas' {MainForm}, + about in '..\..\source\about.pas' {AboutBox}, + connections in '..\..\source\connections.pas' {connform}, + loaddata in '..\..\source\loaddata.pas' {loaddataform}, + usermanager in '..\..\source\usermanager.pas' {UserManagerForm}, + options in '..\..\source\options.pas' {optionsform}, + tabletools in '..\..\source\tabletools.pas' {frmTableTools}, + printlist in '..\..\source\printlist.pas' {printlistForm}, + copytable in '..\..\source\copytable.pas' {CopyTableForm}, + insertfiles in '..\..\source\insertfiles.pas' {frmInsertFiles}, + helpers in '..\..\source\helpers.pas', + sqlhelp in '..\..\source\sqlhelp.pas' {frmSQLhelp}, + mysql_structures in '..\..\source\mysql_structures.pas', + column_selection in '..\..\source\column_selection.pas' {ColumnSelectionForm}, + data_sorting in '..\..\source\data_sorting.pas' {DataSortingForm}, + createdatabase in '..\..\source\createdatabase.pas' {CreateDatabaseForm}, + updatecheck in '..\..\source\updatecheck.pas' {frmUpdateCheck}, + editvar in '..\..\source\editvar.pas' {frmEditVariable}, + view in '..\..\source\view.pas' {frmView}, + selectdbobject in '..\..\source\selectdbobject.pas' {frmSelectDBObject}, + texteditor in '..\..\source\texteditor.pas' {frmTextEditor}, + bineditor in '..\..\source\bineditor.pas' {frmBinEditor}, + grideditlinks in '..\..\source\grideditlinks.pas', + routine_editor in '..\..\source\routine_editor.pas' {frmRoutineEditor}, + table_editor in '..\..\source\table_editor.pas' {frmTableEditor}, + dbconnection in '..\..\source\dbconnection.pas', + trigger_editor in '..\..\source\trigger_editor.pas' {frmTriggerEditor: TFrame}, + searchreplace in '..\..\source\searchreplace.pas' {frmSearchReplace}, + event_editor in '..\..\source\event_editor.pas' {frmEventEditor: TFrame}, + loginform in '..\..\source\loginform.pas' {frmLogin}, + Cromis.DirectoryWatch in '..\..\source\Cromis.DirectoryWatch.pas', + exportgrid in '..\..\source\exportgrid.pas' {frmExportGrid}, + syncdb in '..\..\source\syncdb.pas' {frmSyncDB}, + gnugettext in '..\..\source\gnugettext.pas', + JumpList in '..\..\source\JumpList.pas'; + +{$R ..\..\res\icon.RES} +{$R ..\..\res\version.RES} +{$R ..\..\res\manifest.RES} +{$R ..\..\res\updater.RES} + +var + AppLanguage: String; +begin + // Use MySQL standard format for date/time variables: YYYY-MM-DD HH:MM:SS + // Be aware that Delphi internally converts the slashes in ShortDateFormat to the DateSeparator + FormatSettings.DateSeparator := '-'; + FormatSettings.TimeSeparator := ':'; + FormatSettings.ShortDateFormat := 'yyyy/mm/dd'; + FormatSettings.LongTimeFormat := 'hh:nn:ss'; + + AppSettings := TAppSettings.Create; + SecondInstMsgId := RegisterWindowMessage(APPNAME); + if (not AppSettings.ReadBool(asAllowMultipleInstances)) and CheckForSecondInstance then begin + AppSettings.Free; + Application.Terminate; + end else begin + AppLanguage := AppSettings.ReadString(asAppLanguage); + UseLanguage(AppLanguage); + Application.Initialize; + Application.Title := APPNAME; + Application.UpdateFormatSettings := False; + Application.CreateForm(TMainForm, MainForm); + Application.OnMessage := Mainform.OnMessageHandler; + MainForm.AfterFormCreate; + Application.OnDeactivate := MainForm.ApplicationDeActivate; + Application.MainFormOnTaskBar := True; + Application.Run; + end; + end. diff --git a/packages/delphiXE5/heidisql.dproj b/packages/delphiXE5/heidisql.dproj new file mode 100644 index 00000000..4c6c2b9a --- /dev/null +++ b/packages/delphiXE5/heidisql.dproj @@ -0,0 +1,270 @@ + + + {32493ED6-4F48-45D7-9D50-E4FA13F59063} + heidisql.dpr + True + Debug + 3 + Application + VCL + 15.1 + Win32 + + + true + + + true + Base + true + + + true + Base + true + + + true + Base + true + + + true + Base + true + + + true + Cfg_2 + true + true + + + false + false + ..\..\out\ + ..\..\build\$(Platform) + ..\..\components\graphicex;..\..\components\synapse;..\..\components\mORMot;..\..\components\synedit\build\$(Platform);..\..\components\virtualtreeview\build\$(Platform);..\..\components\synedit\source;..\..\components\virtualtreeview\source;$(DCC_UnitSearchPath) + $(BDS)\bin\default_app.manifest + false + false + Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;FMX.Canvas.GPU;System.Win;Data.Win;$(DCC_Namespace) + false + 00400000 + CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=;CFBundleName=;CFBundleDisplayName=;UIDeviceFamily=;CFBundleIdentifier=;CFBundleVersion=;CFBundlePackageType=;CFBundleSignature=;CFBundleAllowMixedLocalizations=;UISupportedInterfaceOrientations=;CFBundleExecutable=;CFBundleResourceSpecification=;LSRequiresIPhoneOS=;CFBundleInfoDictionaryVersion=;CFBundleDevelopmentRegion=;package=;label=;versionCode=;versionName=;persistent=;restoreAnyVersion=;installLocation=;largeHeap=;theme= + false + true + false + 1033 + + + Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) + $(BDS)\bin\default_app.manifest + true + CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments= + 1033 + + + Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace) + $(BDS)\bin\default_app.manifest + CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments= + true + + + RELEASE;$(DCC_Define) + false + 0 + 0 + + + $(BDS)\bin\default_app.manifest + true + DEBUG;$(DCC_Define) + false + + + true + CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments= + + + + MainSource + + +
MainForm
+
+ +
AboutBox
+
+ +
connform
+
+ +
loaddataform
+
+ +
UserManagerForm
+
+ +
optionsform
+
+ +
frmTableTools
+
+ +
printlistForm
+
+ +
CopyTableForm
+
+ +
frmInsertFiles
+
+ + +
frmSQLhelp
+
+ + +
ColumnSelectionForm
+
+ +
DataSortingForm
+
+ +
CreateDatabaseForm
+
+ +
frmUpdateCheck
+
+ +
frmEditVariable
+
+ +
frmView
+
+ +
frmSelectDBObject
+
+ +
frmTextEditor
+
+ +
frmBinEditor
+
+ + +
frmRoutineEditor
+
+ +
frmTableEditor
+
+ + +
frmTriggerEditor
+ TFrame +
+ +
frmSearchReplace
+
+ +
frmEventEditor
+ TFrame +
+ +
frmLogin
+
+ + +
frmExportGrid
+
+ +
frmSyncDB
+
+ + + + Cfg_2 + Base + + + Base + + + Cfg_1 + Base + +
+ + Delphi.Personality.12 + + + + + heidisql.dpr + + + False + False + 1 + 0 + 0 + 0 + False + False + False + False + False + 1033 + 1252 + + + + + 1.0.0.0 + + + + + + 1.0.0.0 + + + + + + + + + + + + + + + + + + + + + + + + + + + Microsoft Office 2000 Sample Automation Server Wrapper Components + Microsoft Office XP Sample Automation Server Wrapper Components + + + + True + True + + + 12 + + + +
diff --git a/packages/delphiXE5/heidisql.groupproj b/packages/delphiXE5/heidisql.groupproj new file mode 100644 index 00000000..0f5608e4 --- /dev/null +++ b/packages/delphiXE5/heidisql.groupproj @@ -0,0 +1,84 @@ + + + {C4296A31-CCFB-4D2F-8BEC-26CD630E9987} + + + + + + + + + + + + + + + + + + + + Default.Personality.12 + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +