Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.12.26;
Скачать: CL | DM;

Вниз

Не влезает текст в StatusBar e :(   Найти похожие ветки 

 
Mishenka   (2004-12-09 10:36) [0]

Есть статусбар с парой панелек. У меня на компе всё работает норамльно, но при установке проги на другой комп, в котором в виндозе установлены крупные значки, то текст в панель не влезает. Что с этим делать?????


 
Anatoly Podgoretsky ©   (2004-12-09 12:36) [1]

Уменьшить текст


 
Mishenka   (2004-12-09 13:35) [2]

А как сделать, чтоб у панели Width автоматически масштабировался?


 
GanibalLector ©   (2004-12-09 13:37) [3]

А ты его вычисли ф-цией  GetTextExtentPoint,а потом,соответственно,принимай решения.
З.Ы.Хотя,это не самое легкое решение ;)


 
ЮЮ ©   (2004-12-10 05:42) [4]

Определи его ширину исходя мз самого "широкого" сообщения или меняй динамически посли установеи нового значения текста:

procedure TForm1.FormCreate(Sender: TObject);
begin
 StatusBar1.Panels[0].Width :=
   StatusBar1.Canvas.TextWidth("Этот текст должен войти полностью" + "Ю") +
   StatusBar1.BorderWidth * 2;
 StatusBar1.Panels[0].Text := "Этот текст должен войти полностью";
end;



Страницы: 1 вся ветка

Текущий архив: 2004.12.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.023 c
14-1102576195
Dmitriy O.
2004-12-09 10:09
2004.12.26
Вот как борются у нас с Русским национализмом.


1-1102942988
Dimich1978
2004-12-13 16:03
2004.12.26
Как отловить события создания или удаления файлов люб. прог.


3-1101887544
Guest_1
2004-12-01 10:52
2004.12.26
СУБД для малого проекта


11-1084444333
Stargazer
2004-05-13 14:32
2004.12.26
KOL + Ogg Vorbis


1-1102562115
SnapIn
2004-12-09 06:15
2004.12.26
Мой метод Create скрывает виртуальный метод базового класса...