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

Вниз

Label по центру   Найти похожие ветки 

 
syte_ser78 ©   (2005-06-25 12:27) [0]

Делаю
Label2.caption:="Тут разный меняющийся текст"
label2.Left:=Round(frm_logo.Width/2)-Round(label2.Width/2);
label2.refresh;

В итоге лабел стоит на одном месте а хотелось бы чтобы он постоянно центрировался. В чем ошибка?


 
Anatoly Podgoretsky ©   (2005-06-25 12:36) [1]

Ты хочешь оспорить математику.


 
jack128 ©   (2005-06-25 12:48) [2]

with Label1 do
   Alignment := taCenter;
   Anchors := [akLeft, akRight];
 end


 
syte_ser78 ©   (2005-06-25 14:10) [3]

Anatoly Podgoretsky ©   (25.06.05 12:36) [1]
Извините, но я не понял. Разве нельзя так отцентрировать текст Х_ТЕКСТА=Х_ОКНА/2-ДЛИНА_ТЕКСТА/2
???

jack128 ©   (25.06.05 12:48) [2]
При включении данного сегмента в код не происходит ничего, а в параметре Aligment свойство tacenter jncencndetn


 
Гаврила ©   (2005-06-25 14:28) [4]


>  [3] syte_ser78 ©  


> а в параметре Aligment свойство tacenter jncencndetn


И вовсе не jncencndetn, смотри внимательнее
и все работает
проверь еще свойство "AutoSize" у метки

кинть на форму label
поставь Align :=alTop;
поставь Alignment := taCenter;
Убедись
%-))


 
syte_ser78 ©   (2005-06-25 14:47) [5]

Туплю. Спасибо!


 
Anatoly Podgoretsky ©   (2005-06-25 14:49) [6]

syte_ser78 ©   (25.06.05 14:10) [3]
Можно, но если шрифт моноширинный, но мое возражение касается математики, если у тебя изменяется label2.Width, то согласно законам математики должно изменяться и label2.Left, ты же утверждаешь обратное. Итак выходит, что или у тебя ошибка в программе или математика неверная наука.
Правда делать твоим методом, это чесать левое ухо правой рукой.



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

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

Наверх




Память: 0.45 MB
Время: 0.04 c
14-1119618538
VMcL
2005-06-24 17:08
2005.07.18
Ну вот, учёба закончилась


10-1096498814
Ivan K
2004-09-30 03:00
2005.07.18
Тупой вопрос. Как вытащить данные из xml?


6-1113119643
DimDim
2005-04-10 11:54
2005.07.18
Системный каталог на соседнем компьютере?


1-1120132378
electric
2005-06-30 15:52
2005.07.18
Изменение TControl.Width


4-1116836805
cautur
2005-05-23 12:26
2005.07.18
Имя компьютера





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский