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

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

Текст по центру [D7, WinME]

clampo ©   (2004-10-12 11:30:00) 

Привет всем!!! Подскажите как сделать рисованый на ПаинтБоксе
текст сделать по середине. (прим.: Паинт бокс у меня в одну сторку, так что середину надо только по "X")

---

BDenis   (2004-10-12 12:43:00) [1]


var
 TmpString: string;
 XCenter, Y: Integer;
begin
 TmpString := 'sssssss';
 with PaintBox1, Canvas do
 begin
   XCenter := (Width - TextWidth (TmpString)) div 2;
   TextOut (XCenter, Y, TmpString);
 end;
end;


---

clampo   (2004-10-12 12:33:00) [2]

Поподробнее

---

Гаврила   (2004-10-12 11:35:00) [3]

а DrawTextEx не пойдет ?

---

Семен Сорокин   (2004-10-12 11:33:00) [4]

подскажу: надо использовать операцию div
и еще метод TextWidth у канвы

Лаба?

---

Наверх