FIX: Copy window size wrong on Linux (fixes #261)

(cherry picked from commit d1b749b2a7)
This commit is contained in:
Alexander Koblov 2021-12-09 21:47:56 +03:00
commit 3ce407b582

View file

@ -3,7 +3,7 @@
-------------------------------------------------------------------------
Window displaying progress for file source operations and queues.
Copyright (C) 2008-2018 Alexander Koblov (alexx2000@mail.ru)
Copyright (C) 2008-2021 Alexander Koblov (alexx2000@mail.ru)
Copyright (C) 2012 Przemysław Nagay (cobines@gmail.com)
This program is free software; you can redistribute it and/or modify
@ -137,6 +137,9 @@ type
property ProgressBarStyle: TProgressBarStyle read GetProgressBarStyle write SetProgressBarStyle;
protected
procedure DoAutoSize; override;
public
constructor Create(OperationHandle: TOperationHandle); reintroduce;
constructor Create(QueueIdentifier: TOperationsManagerQueueIdentifier); reintroduce;
@ -583,6 +586,14 @@ begin
AWindow.Show;
end;
procedure TfrmFileOp.DoAutoSize;
begin
inherited DoAutoSize;
{$IF DEFINED(LCLQT5)}
InvalidateBoundsRealized;
{$ENDIF}
end;
procedure TfrmFileOp.StopOperationOrQueue;
var
OpManItem: TOperationsManagerItem;