opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2026-03-13 09:24:25 +08:00
Code Issues Packages Projects Releases Wiki Activity

SQL export dialog: cut long file list down to 20 latest items

Browse Source
This commit is contained in:
Ansgar Becker
2024-02-04 11:14:48 +01:00
parent 17f4cb2949
commit b8d587647b
1 changed files with 6 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
source/tabletools.pas
View File

@@ -1345,8 +1345,13 @@ begin
comboExportOutputTarget.Items.Text := AppSettings.ReadString(asExportSQLFilenames, '')
else
comboExportOutputTarget.Items.Text := AppSettings.ReadString(asExportZIPFilenames, '');
if comboExportOutputTarget.Items.Count > 0 then
if comboExportOutputTarget.Items.Count > 0 then begin
comboExportOutputTarget.ItemIndex := 0;
// Cut long file list down to 20 latest items
for i:=comboExportOutputTarget.Items.Count-1 downto 20 do begin
comboExportOutputTarget.Items.Delete(i);
end;
end;
lblExportOutputTarget.Caption := _('Filename')+':';
btnExportOutputTargetSelect.Enabled := True;
btnExportOutputTargetSelect.ImageIndex := 51;