Вот так это смотрится в 167
А вот так в 157
------------ Дoбавленo:
У всех компонентов выставлен один и тот же фонт.
------------ Дoбавленo:
procedure THIPanel.Init;
begin
...
begin
Caption := _prop_Caption;
Font.FontHeight := -11;
...
end;
end;
Если удалить красную строку, то размер шрифта на панелях соответствует заданному.begin
...
begin
Caption := _prop_Caption;
Font.FontHeight := -11;
...
end;
end;
Поиск
Друзья
Администрация