Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.05.09;
Скачать: [xml.tar.bz2];

Вниз

Декоративная щель   Найти похожие ветки 

 
Georg   (2002-04-25 11:49) [0]

Доброго времени суток! Есть проблемулька с изображением Label внутри Bevel - Bevel в формате bsRightLine, Label должен показывать текст по правой границе Bevel. Сделал так:
Label.Left := Bevel.Width - Label.Width
тогда Label "залезает" на декоративную щель справа. Как можно узнать ширину этой "щели"?
Благодарствую заранее, люди добрыя.


 
Anatoly Podgoretsky   (2002-04-25 12:01) [1]

А зачем узнавать, просто Label.Left := Bevel.Width - Label.Width - смещение справа, сколько нужно
Может просто сделать выравнивание по правой границе, зачем мучаться то.


 
Georg   (2002-04-25 12:09) [2]

Так я так и делал. У лейбла стоит AutoSize = True, но он немного наезжает на эту "вдавленную линию". Я так понимаю, что ширина этой линии входит в общую ширину Бевеля.


 
Dy-Ty   (2002-04-25 12:40) [3]

если хочешь всё сделать по нормальному , то сделай следующим образом:


Label.Left := Bevel.Width - Label.Width - GetSystemMetrics(SM_CXEDGE);

а вообще - изучай API, если хочешь действительно грамотно писать под Windows



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

Форум: "Основная";
Текущий архив: 2002.05.09;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.005 c
14-26236
lipskiy
2002-03-14 13:50
2002.05.09
Правда ли то, что XP, если она нелецензионная, может грохнуть винт на физическом уровне?


1-26163
Lord BDV
2002-04-24 19:51
2002.05.09
Разработчики Delphi схалтурили


6-26212
RainMan
2002-02-20 07:17
2002.05.09
Локальный WEB site


1-26097
IDL
2002-04-26 16:42
2002.05.09
Как передать функцию класса как callback функцию или


6-26208
HEugene
2002-02-26 10:33
2002.05.09
Sniffer





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский