Вниз
Скачать: CL | DM;

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

← →
alexdn ©   (2012-09-07 13:50) [0]

Вот есть в php совершенно замечательная функция -
imagettftext($image,10,90,$dl+70,($h+50)/2+25,0x000000,"stat/univers.ttf", $text);
есть ли в делфи что то подобное?


← →
Дмитрий С ©   (2012-09-07 14:01) [1]

Есть. Глупый вопрос.


← →
antonn ©   (2012-09-07 14:06) [2]

Нормальный вопрос, рисование текста под углом и в дельфи не двумя строками делается


← →
alexdn ©   (2012-09-07 14:10) [3]

> antonn ©   (07.09.12 14:06) [2]
да, вот особенно на 90 градусов нужно..


← →
alexdn ©   (2012-09-07 14:19) [4]

Это Textout рыть?..


← →
antonn ©   (2012-09-07 14:26) [5]

ну почти, глянь тут http://desksoft.ru/index.php?drkb=70&id=535&str_path=0|55|69|70&drkb_search=%F2%E5%EA%F1%F2%20%EF%EE%E4%20%F3%E3%EB%EE%EC


← →
alexdn ©   (2012-09-07 14:44) [6]

сделал просто
procedure TForm4.CanvasSetAngle(C: TCanvas; A: Single);
var
LogRec: TLOGFONT;     {Font informationen}
begin
GetObject(C.Font.Handle,SizeOf(LogRec),Addr(LogRec));
LogRec.lfEscapement := Trunc(A*10);
C.Font.Handle := CreateFontIndirect(LogRec);
end;

Image1.Canvas.Font.Name := "Times New Roman";
Image1.Canvas.Font.Size := 10;
CanvasSetAngle(Image1.Canvas,0);
Image1.Canvas.TextOut(round((dl+50)/2-5),10,str);


← →
Dimka Maslov ©   (2012-09-07 15:29) [7]


> alexdn ©   (07.09.12 14:44) [6]

Всё правильно сделал


← →
Дмитрий С ©   (2012-09-07 15:59) [8]


> antonn ©   (07.09.12 14:06) [2]
>
> Нормальный вопрос, рисование текста под углом и в дельфи
> не двумя строками делается


> есть ли в делфи что то подобное?

TFont.Orientation


← →
antonn ©   (2012-09-07 21:26) [9]


> Дмитрий С ©   (07.09.12 15:59) [8]

зачем так много информации, достаточно было ответить "TFont"


← →
alexdn ©   (2012-09-08 06:25) [10]

> antonn ©   (07.09.12 21:26) [9]
>
> > Дмитрий С ©   (07.09.12 15:59) [8]
>
> зачем так много информации, достаточно было ответить "TFont"
Object->TFont



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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.046 c
15-1345822753
brother
2012-08-24 19:39
2013.03.22
Сис админ - диагноз?


15-1342013393
kki
2012-07-11 17:29
2013.03.22
как будет по англ.


2-1339183336
простофан
2012-06-08 23:22
2013.03.22
rewrite


15-1345928148
Дмитрий С
2012-08-26 00:55
2013.03.22
Умер Нил Армстронг – первый человек, побывавший на Луне


2-1345708838
Molchanov
2012-08-23 12:00
2013.03.22
Высокоскоростной обмен с аппаратурой




   Наверх