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: Restore window state under GTK2

Browse source
This commit is contained in:
Alexander Koblov 2009-02-14 12:53:34 +00:00
commit cf51acba69
1 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

8
fmain.pas
View file

@ -315,6 +315,7 @@ type
procedure MainToolBarToolButtonClick(Sender: TObject; NumberOfButton : Integer);
procedure frmMainClose(Sender: TObject; var CloseAction: TCloseAction);
procedure frmMainKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
procedure frmMainAfterShow(Data: PtrInt);
procedure frmMainShow(Sender: TObject);
procedure mnuDropClick(Sender: TObject);
procedure mnuSplitterPercentClick(Sender: TObject);
@ -928,10 +929,15 @@ begin
//
end;
procedure TfrmMain.frmMainAfterShow(Data: PtrInt);
begin
SetActiveFrame(fpLeft);
end;
procedure TfrmMain.frmMainShow(Sender: TObject);
begin
DebugLn('frmMain.frmMainShow');
SetActiveFrame(fpLeft);
Application.QueueAsyncCall(@frmMainAfterShow, 0);
end;
procedure TfrmMain.mnuDropClick(Sender: TObject);