mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-22 09:39:31 +02:00
ide: fix error with showing window caption
git-svn-id: trunk@19417 -
This commit is contained in:
parent
726bd7ccc8
commit
9efd00c0b8
@ -129,8 +129,7 @@ begin
|
||||
WindowPositionsBox.Layout := FLayouts.ItemByEnum(TNonModalIDEWindow(Index + 1))
|
||||
else
|
||||
begin
|
||||
Index := Index - Ord(High(TNonModalIDEWindow));
|
||||
case Index of
|
||||
case Index - Ord(High(TNonModalIDEWindow)) of
|
||||
0: WindowPositionsBox.Layout := FLayouts.ItemByFormID(DefaultObjectInspectorName);
|
||||
end;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user