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

Вниз

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

← →
clampo ©   (2004-10-12 11:30) [0]

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

---

← →
Семен Сорокин ©   (2004-10-12 11:33) [1]

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

Лаба?

---

← →
Гаврила ©   (2004-10-12 11:35) [2]

а DrawTextEx не пойдет ?

---

← →
clampo ©   (2004-10-12 12:33) [3]

Поподробнее

---

← →
BDenis ©   (2004-10-12 12:43) [4]


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;


---

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

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

Наверх

Память: 0.47 MB
Время: 0.028 c