opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-26 03:01:07 +08:00
Code Issues Packages Projects Releases Wiki Activity

Add some more common CSV control characters to the drop down menu.

Browse Source
This commit is contained in:
Ansgar Becker
2011-05-01 05:36:07 +00:00
parent 03fe3bd0e7
commit e0f72be96f
2 changed files with 32 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

25
source/exportgrid.dfm
View File

@ -239,6 +239,28 @@ object frmExportGrid: TfrmExportGrid
Hint = '\t'
OnClick = menuCSVClick
end
object menuCSVcomma: TMenuItem
Caption = 'Comma'
Hint = ','
end
object menuCSVsemicolon: TMenuItem
Caption = 'Semicolon'
Hint = ';'
end
object N1: TMenuItem
Caption = '-'
end
object menuCSVsinglequote: TMenuItem
Caption = 'Single quote'
Hint = #39
end
object menuCSVdoublequote: TMenuItem
Caption = 'Double quote'
Hint = '"'
end
object N2: TMenuItem
Caption = '-'
end
object menuCSVwinlinebreak: TMenuItem
Caption = 'Windows linebreak'
Hint = '\r\n'
@ -252,6 +274,9 @@ object frmExportGrid: TfrmExportGrid
Caption = 'Mac OS linebreak'
Hint = '\r'
end
object N3: TMenuItem
Caption = '-'
end
object menuCSVnul: TMenuItem
Caption = 'NUL character'
Hint = '\0'

7
source/exportgrid.pas
View File

@ -37,6 +37,13 @@ type
comboEncoding: TComboBox;
lblEncoding: TLabel;
popupRecentFiles: TPopupMenu;
menuCSVsinglequote: TMenuItem;
menuCSVdoublequote: TMenuItem;
menuCSVcomma: TMenuItem;
menuCSVsemicolon: TMenuItem;
N1: TMenuItem;
N2: TMenuItem;
N3: TMenuItem;
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure FormShow(Sender: TObject);