Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.18;
Скачать: CL | DM;

Вниз

Как на канву вывести текст вертикально?   Найти похожие ветки 

 
Mkrivun ©   (2003-12-28 17:20) [0]

Как на канву вывести слово вертикально?
В методе канвы textout параметра типа расположение текста нет.
Что посоветуете?


 
Otez   (2003-12-28 17:44) [1]

...var
 lf: TLogFont;
begin
 FillChar(lf, SizeOf(lf), 0);
 lf.lfEscapement := 100;   // Угол наклона в десятых градуса(поэксперементируй с этим числом!)
 Form1.Canvas.Font.Handle := CreateFontIndirect(lf);
 Form1.Canvas.TextOut(0, 100, "TEXT");
 end;...


 
miek ©   (2003-12-28 23:27) [2]

Короче, проще всего напрямую через WinAPI


 
tchn ©   (2003-12-29 12:38) [3]


> miek ©   (28.12.03 23:27) [2]
> Короче, проще всего напрямую через WinAPI

а примерчик можно?


 
miek ©   (2003-12-29 19:28) [4]

В общих черта так:

DC:= form.canvas.handle;

hf:= CreateFont( ... );
или
hf:= GetStockObject( ANSI_VAR_FONT);

SelectObject( DC, hf);
DrawText( DC, ...)
DeleteObject( hf);

За подробностями в хелпы



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

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

Наверх




Память: 0.47 MB
Время: 0.047 c
3-1079596280
qwe
2004-03-18 10:51
2004.04.18
помогите начинающему программисту


9-1065887416
CoderZ
2003-10-11 19:50
2004.04.18
И ещё про PowerDraw...


3-1080025357
Лысый
2004-03-23 10:02
2004.04.18
Разработка ИС


1-1080434014
Dimedroll
2004-03-28 04:33
2004.04.18
-= Можно ли все Error ловить своей проги посредством WinAPI =-


8-1072856792
ИЛЕЙ
2003-12-31 10:46
2004.04.18
Ребят, помогайте с BASS.DLL