opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-17 04:40:18 +08:00
Code Issues Packages Projects Releases Wiki Activity

Add option to save grid data to SQL file. rfe #790

Browse Source
This commit is contained in:
Ansgar Becker
2008-12-26 19:21:40 +00:00
parent f0459f9671
commit 561c5ad697
4 changed files with 5 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
source/childwin.dfm
View File

@ -1797,7 +1797,7 @@ object MDIChild: TMDIChild
DefaultExt = 'csv' DefaultExt = 'csv'
Filter = Filter =
'CSV-Files (*.csv)|*.csv|Hypertext-Files (*.html)|*.html|XML-File' + 'CSV-Files (*.csv)|*.csv|Hypertext-Files (*.html)|*.html|XML-File' +
's (*.xml)|*.xml' 's (*.xml)|*.xml|SQL script (*.sql)|*.sql'
Options = [ofOverwritePrompt, ofEnableSizing] Options = [ofOverwritePrompt, ofEnableSizing]
OnTypeChange = SaveDialogExportDataTypeChange OnTypeChange = SaveDialogExportDataTypeChange
Left = 72 Left = 72

1
source/childwin.pas
View File

@ -3420,6 +3420,7 @@ begin
1: DefaultExt := 'csv'; 1: DefaultExt := 'csv';
2: DefaultExt := 'html'; 2: DefaultExt := 'html';
3: DefaultExt := 'xml'; 3: DefaultExt := 'xml';
4: DefaultExt := 'sql';
end; end;
end; end;
end; end;

4
source/main.dfm
View File

@ -688,9 +688,9 @@ object MainForm: TMainForm
end end
object actExportData: TAction object actExportData: TAction
Category = 'Export/Import' Category = 'Export/Import'
Caption = 'Export grid data as CSV/HTML/XML...' Caption = 'Export grid data as CSV, HTML, XML or SQL ...'
Enabled = False Enabled = False
Hint = 'Save grid data to file' Hint = 'Save grid data to text file'
ImageIndex = 20 ImageIndex = 20
OnExecute = actExportDataExecute OnExecute = actExportDataExecute
end end

1
source/main.pas
View File

@ -1249,6 +1249,7 @@ begin
1: GridToCsv(Grid, GridData, ChildWin.prefCSVSeparator, ChildWin.prefCSVEncloser, ChildWin.prefCSVTerminator, FS); 1: GridToCsv(Grid, GridData, ChildWin.prefCSVSeparator, ChildWin.prefCSVEncloser, ChildWin.prefCSVTerminator, FS);
2: GridToHtml(Grid, GridData, Title, FS); 2: GridToHtml(Grid, GridData, Title, FS);
3: GridToXml(Grid, GridData, Title, FS); 3: GridToXml(Grid, GridData, Title, FS);
4: GridToSql(Grid, GridData, Title, FS);
end; end;
ShowStatus('Freeing data...'); ShowStatus('Freeing data...');
FS.Free; FS.Free;