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

FIX: Tab context menu under GTK2

Browse source 
FIX: Help under Linux
This commit is contained in:
Alexander Koblov 2008-10-18 16:49:26 +00:00
commit 63f93435e8
3 changed files with 2891 additions and 2887 deletions
Download patch file Download diff file Expand all files Collapse all files

2
dmhelpmanager.pas
View file

@ -55,7 +55,7 @@ uses
procedure TdmHelpManager.DataModuleCreate(Sender: TObject);
begin
HTMLHelpDatabase.BaseURL:= gpExePath + 'doc'
HTMLHelpDatabase.BaseURL:= 'file://' + gpExePath + 'doc';
end;
initialization

6
fmain.pas
View file

@ -993,7 +993,11 @@ procedure TfrmMain.nbPageMouseUp(Sender: TObject; Button: TMouseButton;
var
PopUpPoint: TPoint;
begin
{$IFDEF LCLGTK2}
if Button = mbMiddle then
{$ELSE}
if Button = mbRight then
{$ENDIF}
begin
PopUpPoint:= (Sender as TNoteBook).ClientToScreen(Point(X, Y));
pmTabMenu.PopUp(PopUpPoint.x, PopUpPoint.y);
@ -1002,7 +1006,7 @@ end;
procedure TfrmMain.NoteBookCloseTabClicked(Sender: TObject);
begin
With (Sender As TPage) do
with (Sender As TPage) do
begin
RemovePage(Parent as TNoteBook, PageIndex);
end;

5770
language/doublecmd.ru.po
View file

File diff suppressed because it is too large Load diff