Repair position of tab close buttons when tabs reveal or change their caption length.

This commit is contained in:
Ansgar Becker
2009-08-03 23:22:31 +00:00
parent 7e9fcc6586
commit 36e9dabd15

View File

@ -6891,6 +6891,7 @@ begin
end;
if newDb <> '' then
LoadDatabaseProperties(newDb);
FixQueryTabCloseButtons;
// Set window caption and taskbar text
Cap := winName;
if newDb <> '' then
@ -8946,6 +8947,7 @@ begin
else
Cap := sstr(Cap + ObjName, 30);
tabEditor.Caption := Cap;
FixQueryTabCloseButtons;
end;