mirror of
https://github.com/HeidiSQL/HeidiSQL.git
synced 2025-08-14 10:02:10 +08:00
adfac67b1a
- Change table engine via popupmenu in ListTables - Edit comment via same popupmenu + an own dialog Not keeping the same feature in different corners of the application looks more straight forward. Users will have exactly one point where they can modify all table related properties. Should simplify it in the end, although some users will have to get used to it.
72 lines
2.6 KiB
ObjectPascal
72 lines
2.6 KiB
ObjectPascal
program heidisql;
|
|
|
|
|
|
|
|
uses
|
|
Forms,
|
|
SysUtils,
|
|
Dialogs,
|
|
main in '..\..\source\main.pas' {MainForm},
|
|
childwin in '..\..\source\childwin.pas' {MDIChild},
|
|
about in '..\..\source\about.pas' {AboutBox},
|
|
connections in '..\..\source\connections.pas' {connform},
|
|
createtable in '..\..\source\createtable.pas' {CreateTableForm},
|
|
fieldeditor in '..\..\source\fieldeditor.pas' {FieldEditForm},
|
|
exportsql in '..\..\source\exportsql.pas' {ExportSQLForm},
|
|
tbl_properties in '..\..\source\tbl_properties.pas' {tbl_properties_form},
|
|
loaddata in '..\..\source\loaddata.pas' {loaddataform},
|
|
usermanager in '..\..\source\usermanager.pas' {UserManagerForm},
|
|
options in '..\..\source\options.pas' {optionsform},
|
|
optimizetables in '..\..\source\optimizetables.pas' {optimize},
|
|
printlist in '..\..\source\printlist.pas' {printlistForm},
|
|
copytable in '..\..\source\copytable.pas' {CopyTableForm},
|
|
edituser in '..\..\source\edituser.pas' {FormEditUser},
|
|
insertfiles in '..\..\source\insertfiles.pas' {frmInsertFiles},
|
|
insertfiles_progress in '..\..\source\insertfiles_progress.pas' {frmInsertFilesProgress},
|
|
helpers in '..\..\source\helpers.pas',
|
|
synchronization in '..\..\source\synchronization.pas',
|
|
communication in '..\..\source\communication.pas',
|
|
threading in '..\..\source\threading.pas',
|
|
sqlhelp in '..\..\source\sqlhelp.pas' {frmSQLhelp},
|
|
queryprogress in '..\..\source\queryprogress.pas' {frmQueryProgress},
|
|
mysqlquery in '..\..\source\mysqlquery.pas',
|
|
mysqlquerythread in '..\..\source\mysqlquerythread.pas',
|
|
mysqlconn in '..\..\source\mysqlconn.pas',
|
|
mysql in '..\..\source\mysql.pas',
|
|
column_selection in '..\..\source\column_selection.pas' {ColumnSelectionForm},
|
|
data_sorting in '..\..\source\data_sorting.pas' {DataSortingForm},
|
|
runsqlfile in '..\..\source\runsqlfile.pas' {RunSQLFileForm},
|
|
createdatabase in '..\..\source\createdatabase.pas' {CreateDatabaseForm};
|
|
|
|
{$R *.RES}
|
|
|
|
begin
|
|
debug('perf: All modules loaded.');
|
|
Application.Initialize;
|
|
Application.Title := APPNAME;
|
|
Application.CreateForm(TMainForm, MainForm);
|
|
debug('perf: Main created.');
|
|
|
|
|
|
try
|
|
try
|
|
InitializeSync(MainForm.Handle);
|
|
SetWindowName(main.discname);
|
|
InitializeThreading(MainForm.Handle);
|
|
InitializeComm(
|
|
MainForm.Handle,
|
|
MainForm.ExecuteRemoteNonQuery,
|
|
MainForm.ExecuteRemoteQuery
|
|
);
|
|
debug('perf: Running.');
|
|
Application.Run;
|
|
finally
|
|
DeInitializeSync;
|
|
end;
|
|
except
|
|
on e: Exception do begin
|
|
ShowMessage(e.ClassName + ': ' + e.Message);
|
|
end;
|
|
end;
|
|
end.
|