Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Ширина символа [D7, XP]


Страницы:   1 2

Quattro ©   (2006-07-06 14:19:00) 

Добрый день! Подскажите, пожалуйста, как узнать ширину и высоту символа...я хочу сделать программу,  в которой реализовано действо разноцветной, бегающей буквы...с помощью TextOut научился рисовать...дело за малым осталось :)...Заранее спасибо!:)


Мефисто   (2006-07-06 23:56:00) [1]


> Подскажите, пожалуйста, как узнать ширину и высоту символа.
> ..


GetTextMetrics()
GetCharWidth()
GetCharABCWidths()


Quattro   (2006-07-06 23:37:00) [2]


> На www.Vr-Online.ru есть Label позволяющий форматировать
> выводимый текст. Возможно и цвет. Посмотри.

нееее...вся соль в том, чтобы самому это сделать...вот где настоящее удовольствие:)


PSPF2003   (2006-07-06 16:51:00) [3]

На www.Vr-Online.ru есть Label позволяющий форматировать выводимый текст. Возможно и цвет. Посмотри.


Quattro   (2006-07-06 16:46:00) [4]

всё...понял как :)...надо было изменять цвет канвы Label.Canvas.Font.Color...но всё равно спасибо:)


Desdechado   (2006-07-06 16:43:00) [5]

Label всегда одним цветом пишется. Если хочешь разноцветный, пиши буквы сам разными цветами.


Quattro   (2006-07-06 16:40:00) [6]

а как с помощью TextOut(хотя может быть и без её помощи) сделать буквы разного цвета?....Если менять цвет шрифта в лэйбле (это всё дело выводиться  в лэйбле), то меняется цвет всех букв....то есть, как выбирать цвет буквы, нарисовать которую ты хочешь?


Zeqfreed   (2006-07-06 15:41:00) [7]

> [17] Quattro ©   (06.07.06 15:38)

Относительно левого верхнего (по умолчанию) угла холста, на который осущствляется вывод.


Quattro   (2006-07-06 15:40:00) [8]

Zeqfreed вай вай вай! пропустил!!!спасибо большое!:)


PSPF2003   (2006-07-06 15:40:00) [9]

Формы


Quattro   (2006-07-06 15:38:00) [10]

прямоугольник должен задаваться в координатах относительно экрана или относительно формы??


Zeqfreed   (2006-07-06 15:35:00) [11]

> [14] Quattro ©   (06.07.06 15:24)

Для кого написал ClipRect? :)


Desdechado   (2006-07-06 15:31:00) [12]

Label1.Top +Label1.Height
?


Quattro   (2006-07-06 15:24:00) [13]

а почему ничего не стираеться при такой команде?
Label1.Canvas.Brush.Color:=clBtnFace;
 Label1.Canvas.FillRect(Rect(Label1.Left, Label1.Top,
   Label1.Left + Label1.Width, Label1.Top - Label1.Height));


Zeqfreed   (2006-07-06 15:06:00) [14]

> [11] Quattro ©   (06.07.06 15:04)

Canvas.Brush.Color := . . .;
Canvas.FillRect(Canvas.ClipRect);


PSPF2003   (2006-07-06 15:05:00) [15]

FillRect


Quattro   (2006-07-06 15:04:00) [16]

Zeqfreed спаибо!!..
Так как всё таки стирать с канваса каракули?


Zeqfreed   (2006-07-06 15:02:00) [17]

> [9] Quattro ©   (06.07.06 14:52)

for a := Low(array_variable) to High(array_variable) do begin


Quattro   (2006-07-06 14:52:00) [18]

Извините нуба, подскажите синтаксис выражения "for а:=от начала до конца массива" :)....забыл и не могу вспомнить:)...


antonn   (2006-07-06 14:45:00) [19]

antonn ©   (06.07.06 14:44) [7]
а, пардон, туплю:)
'AA'-'A'*2


antonn   (2006-07-06 14:44:00) [20]

Quattro ©   (06.07.06 14:38) [6]
разность м/у 'A A' и 'AA' :))


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо