mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

UPD: Use TKASButton control

Browse source 
(cherry picked from commit f9108d3e0c)
This commit is contained in:
Alexander Koblov 2026-05-05 20:38:56 +03:00
commit 99bd56afda
2 changed files with 3 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/filesources/filesystem/ffilesystemcopymoveoperationoptions.lfm
View file

@ -265,7 +265,7 @@ object FileSystemCopyMoveOperationOptionsUI: TFileSystemCopyMoveOperationOptions
ClientHeight = 56
ClientWidth = 261
TabOrder = 2
object btnSearchTemplate: TBitBtn
object btnSearchTemplate: TKASButton
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = gbFileTemplate
AnchorSideRight.Control = gbFileTemplate
@ -277,7 +277,6 @@ object FileSystemCopyMoveOperationOptionsUI: TFileSystemCopyMoveOperationOptions
Width = 32
Anchors = [akTop, akRight]
BorderSpacing.Right = 5
GlyphShowMode = gsmAlways
Images = dmComData.ilButtons
ImageIndex = 3
OnClick = btnSearchTemplateClick

4
src/filesources/filesystem/ffilesystemcopymoveoperationoptions.pas
View file

@ -9,14 +9,14 @@ uses
uFileSourceOperationOptionsUI,
uFileSystemCopyOperation,
uFileSystemMoveOperation,
uSearchTemplate, KASComboBox;
uSearchTemplate, KASComboBox, KASButton;
type
{ TFileSystemCopyMoveOperationOptionsUI }
TFileSystemCopyMoveOperationOptionsUI = class(TFileSourceOperationOptionsUI)
btnSearchTemplate: TBitBtn;
btnSearchTemplate: TKASButton;
cbCheckFreeSpace: TCheckBox;
cbCorrectLinks: TCheckBox;
cbDropReadOnlyFlag: TCheckBox;