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: Editor toolbar

Browse source
This commit is contained in:
Alexander Koblov 2025-03-27 20:54:25 +03:00
commit 1049fd9722
2 changed files with 18 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

19
src/feditor.lfm
View file

@ -738,15 +738,26 @@ object frmEditor: TfrmEditor
Top = 2
Style = tbsSeparator
end
object tbConfig: TToolButton
object tbEditFind: TToolButton
Left = 209
Top = 2
Action = actConfHigh
Action = actEditFind
end
object tbHelp: TToolButton
object tbEditRplc: TToolButton
Left = 232
Top = 2
Action = actAbout
Action = actEditRplc
end
object tbSeparator4: TToolButton
Left = 255
Height = 22
Top = 2
Style = tbsSeparator
end
object tbConfig: TToolButton
Left = 263
Top = 2
Action = actConfHigh
end
end
object MainMenu1: TMainMenu

4
src/feditor.pas
View file

@ -134,8 +134,10 @@ type
tbUndo: TToolButton;
tbRedo: TToolButton;
tbSeparator3: TToolButton;
tbEditFind: TToolButton;
tbEditRplc: TToolButton;
tbSeparator4: TToolButton;
tbConfig: TToolButton;
tbHelp: TToolButton;
procedure actExecute(Sender: TObject);
procedure EditorMouseWheelDown(Sender: TObject; Shift: TShiftState;
{%H-}MousePos: TPoint; var Handled: Boolean);