mirror of
https://github.com/doublecmd/doublecmd.git
synced 2026-06-21 09:58:13 +00:00
UPD: improve FileDialog selection in Plugins Options
This commit is contained in:
parent
550867896d
commit
b753e8b668
1 changed files with 3 additions and 1 deletions
|
|
@ -71,7 +71,7 @@ implementation
|
|||
|
||||
uses
|
||||
//Lazarus, Free-Pascal, etc.
|
||||
Controls, Forms,
|
||||
Controls, Forms, Dialogs,
|
||||
|
||||
//DC
|
||||
uShowMsg, fOptionsPluginsBase, uDebug, lua, uWDXModule,
|
||||
|
|
@ -85,6 +85,7 @@ uses
|
|||
procedure TfrmOptionsPluginsGroup.Init;
|
||||
begin
|
||||
fneLuaLibraryFilename.DialogTitle := rsOptPluginsSelectLuaLibrary;
|
||||
fneLuaLibraryFilename.DialogOptionsEx := [ofAllowsFilePackagesContents];
|
||||
ParseLineToList(rsPluginFilenameStyleList, cbPluginFilenameStyle.Items);
|
||||
{$IF DEFINED(MSWINDOWS)}
|
||||
fneLuaLibraryFilename.Filter := ParseLineToFileFilter([rsFilterLibraries, '*.dll', rsFilterAnyFiles, AllFilesMask]);
|
||||
|
|
@ -105,6 +106,7 @@ begin
|
|||
cbPluginFilenameStyle.ItemIndex := integer(gPluginFilenameStyle);
|
||||
cbPluginFilenameStyleChange(cbPluginFilenameStyle);
|
||||
dePathToBeRelativeTo.Text := gPluginPathToBeRelativeTo;
|
||||
dePathToBeRelativeTo.DialogOptionsEx := [ofAllowsFilePackagesContents];
|
||||
fneLuaLibraryFilename.FileName := gLuaLib;
|
||||
gSpecialDirList.PopulateMenuWithSpecialDir(pmPathToBeRelativeToHelper, mp_PATHHELPER, nil);
|
||||
end;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue