paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-14 16:42:06 +02:00
Code Issues Packages Projects Releases Wiki Activity

ide: fix error with showing window caption

Browse Source 
git-svn-id: trunk@19417 -
This commit is contained in:
paul 2009-04-13 23:08:32 +00:00
parent 726bd7ccc8
commit 9efd00c0b8
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
ide/frames/window_options.pas
View File

@ -129,8 +129,7 @@ begin
WindowPositionsBox.Layout := FLayouts.ItemByEnum(TNonModalIDEWindow(Index + 1)) WindowPositionsBox.Layout := FLayouts.ItemByEnum(TNonModalIDEWindow(Index + 1))
else else
begin begin
Index := Index - Ord(High(TNonModalIDEWindow)); case Index - Ord(High(TNonModalIDEWindow)) of
case Index of
0: WindowPositionsBox.Layout := FLayouts.ItemByFormID(DefaultObjectInspectorName); 0: WindowPositionsBox.Layout := FLayouts.ItemByFormID(DefaultObjectInspectorName);
end; end;
end; end;