0002941: MergePolygonsProgress: Cannot focus a disabled or invisible window

Notes

(0016977)
zed (manager)
10-01-2016 13:13

Помню копипастил этот кусок кода из какой-то формы и видно лишнего захватил:



procedure TfrmMergePolygonsProgress.FormClose(

  Sender: TObject;

  var Action: TCloseAction

);

begin

  CancelOperation;

  Action := caHide;

  Application.MainForm.SetFocus; // <-- сюда ругается

end;

Users who viewed this issue
User List	Anonymous (2511x), vdemidov (1x), zed (9x), bk99 (1x), Garl (3x)
Total Views	2525
Last View	22-11-2024 04:15

Issue History
Date Modified	Username	Field	Change
10-01-2016 12:45	Garl	New Issue
10-01-2016 12:45	Garl	File Added: SASPlanet.Debug.elf
10-01-2016 13:08	zed	Summary	EInvalidOperation => MergePolygonsProgress: Cannot focus a disabled or invisible window
10-01-2016 13:08	zed	Status	new => confirmed
10-01-2016 13:13	zed	Note Added: 0016977
10-01-2016 13:14	zed	Target Version	=> 160606
11-01-2016 18:18	zed	Status	confirmed => resolved
11-01-2016 18:18	zed	Fixed in Version	=> 160606
11-01-2016 18:18	zed	Resolution	open => fixed
11-01-2016 18:18	zed	Assigned To	=> zed

Relationships

SASGIS