|
@@ -788,7 +788,9 @@ type
|
|
|
|
|
|
protected
|
|
protected
|
|
procedure CreateWnd; override;
|
|
procedure CreateWnd; override;
|
|
|
|
+ {$IFNDEF LCLCOCOA}
|
|
procedure DoFirstShow; override;
|
|
procedure DoFirstShow; override;
|
|
|
|
+ {$ENDIF}
|
|
procedure DoAutoAdjustLayout(const AMode: TLayoutAdjustmentPolicy;
|
|
procedure DoAutoAdjustLayout(const AMode: TLayoutAdjustmentPolicy;
|
|
const AXProportion, AYProportion: Double); override;
|
|
const AXProportion, AYProportion: Double); override;
|
|
|
|
|
|
@@ -3982,6 +3984,7 @@ begin
|
|
Application.MainForm.Tag:= Handle;
|
|
Application.MainForm.Tag:= Handle;
|
|
end;
|
|
end;
|
|
|
|
|
|
|
|
+{$IFNDEF LCLCOCOA}
|
|
procedure TfrmMain.DoFirstShow;
|
|
procedure TfrmMain.DoFirstShow;
|
|
var
|
|
var
|
|
ANode: TXmlNode;
|
|
ANode: TXmlNode;
|
|
@@ -3996,6 +3999,7 @@ begin
|
|
|
|
|
|
lastWindowState := WindowState;
|
|
lastWindowState := WindowState;
|
|
end;
|
|
end;
|
|
|
|
+{$ENDIF}
|
|
|
|
|
|
procedure TfrmMain.WMMove(var Message: TLMMove);
|
|
procedure TfrmMain.WMMove(var Message: TLMMove);
|
|
begin
|
|
begin
|
|
@@ -6178,6 +6182,10 @@ begin
|
|
FRestoredWidth := MulDiv(FRestoredWidth, Screen.PixelsPerInch, FPixelsPerInch);
|
|
FRestoredWidth := MulDiv(FRestoredWidth, Screen.PixelsPerInch, FPixelsPerInch);
|
|
FRestoredHeight := MulDiv(FRestoredHeight, Screen.PixelsPerInch, FPixelsPerInch);
|
|
FRestoredHeight := MulDiv(FRestoredHeight, Screen.PixelsPerInch, FPixelsPerInch);
|
|
end;
|
|
end;
|
|
|
|
+ if gConfig.GetValue(ANode, 'Maximized', True) then
|
|
|
|
+ lastWindowState:= TWindowState.wsMaximized
|
|
|
|
+ else
|
|
|
|
+ lastWindowState:= TWindowState.wsNormal;
|
|
SetBounds(FRestoredLeft, FRestoredTop, FRestoredWidth, FRestoredHeight);
|
|
SetBounds(FRestoredLeft, FRestoredTop, FRestoredWidth, FRestoredHeight);
|
|
end;
|
|
end;
|
|
end;
|
|
end;
|