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

CSV import: set default folder and filename in open-file-dialog to the one of the selected file

Browse Source
This commit is contained in:
Ansgar Becker
2024-07-23 19:18:38 +02:00
parent 1443a6ce99
commit 322b78b8b4
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
source/loaddata.pas
View File

@ -10,7 +10,7 @@ interface
uses uses
Winapi.Windows, System.SysUtils, System.Classes, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ComCtrls, Vcl.CheckLst, Winapi.Windows, System.SysUtils, System.Classes, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ComCtrls, Vcl.CheckLst,
SynRegExpr, Vcl.Buttons, Vcl.ExtCtrls, Vcl.ToolWin, Vcl.ExtDlgs, System.Math, extra_controls, SynRegExpr, Vcl.Buttons, Vcl.ExtCtrls, Vcl.ToolWin, Vcl.ExtDlgs, System.Math, System.IOUtils, extra_controls,
dbconnection, dbstructures, gnugettext; dbconnection, dbstructures, gnugettext;
type type
@ -656,6 +656,8 @@ var
begin begin
AppSettings.ResetPath; AppSettings.ResetPath;
Dialog := TExtFileOpenDialog.Create(Self); Dialog := TExtFileOpenDialog.Create(Self);
Dialog.DefaultFolder := ExtractFilePath(editFilename.Text);
Dialog.FileName := ExtractFileName(editFilename.Text);
Dialog.AddFileType('*.csv', _('CSV files')); Dialog.AddFileType('*.csv', _('CSV files'));
Dialog.AddFileType('*.txt', _('Text files')); Dialog.AddFileType('*.txt', _('Text files'));
Dialog.AddFileType('*.*', _('All files')); Dialog.AddFileType('*.*', _('All files'));