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

Support filenames with accented chars in text file import dialog. Closes #1387

Browse Source
This commit is contained in:
Ansgar Becker
2021-06-15 07:46:58 +02:00
parent 4c959ded83
commit ac66de31bb
1 changed files with 11 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
source/loaddata.pas
View File

@ -388,11 +388,21 @@ procedure Tloaddataform.ServerParse(Sender: TObject);
var
SQL, SetColVars, SelectedCharset: String;
i: Integer;
Filename: String;
begin
SQL := 'LOAD DATA ';
if chkLowPriority.Checked and chkLowPriority.Enabled then
SQL := SQL + 'LOW_PRIORITY ';
SQL := SQL + 'LOCAL INFILE ' + FConnection.EscapeString(editFilename.Text) + ' ';
// Issue #1387: Use 8.3 filename, to prevent "file not found" error from MySQL library
// Todo: test on Wine
Filename := ExtractShortPathName(editFilename.Text);
if not Filename.IsEmpty then
MainForm.LogSQL('Converting filename to 8.3 format: '+editFilename.Text+' => '+Filename, lcInfo)
else
Filename := editFilename.Text;
SQL := SQL + 'LOCAL INFILE ' + FConnection.EscapeString(Filename) + ' ';
case grpDuplicates.ItemIndex of
1: SQL := SQL + 'IGNORE ';
2: SQL := SQL + 'REPLACE ';