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

Вниз

GetTextExtentPoint   Найти похожие ветки 

 
Alex_Y   (2007-10-03 07:56) [0]

привет всем.

делаю так:

Panel1.Caption := msg;
GetTextExtentPoint32(Panel1.Handle,PChar(msg),Length(msg),Size);
Panel1.Width := Size.cX;

выдает в cX и xY какие то заоблачные значения.
Вопрос, чего где указать забыл, или что в примере не так?

заранее благодарен.


 
MBo ©   (2007-10-03 08:06) [1]

>Panel1.Handle
здесь должен быть дескриптор графического контекста (DC, Canvas.Handle), для Panel его можно получить с помощью GetDC


 
Slym ©   (2007-10-03 08:07) [2]

BOOL GetTextExtentPoint32(HDC hdc
hdc - это не Panel1.Handle
hdc есть у Canvas, но в TPanel она protected
поэтому Panel1.Canvas.Handle не получится


 
Slym ©   (2007-10-03 08:08) [3]

но получится [1]


 
Alex_Y   (2007-10-03 08:39) [4]

ага, спасибо, все получилось :)



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

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

Наверх




Память: 0.47 MB
Время: 0.013 c
2-1191864483
bagos
2007-10-08 21:28
2007.10.28
цветной текст в stringgrid


15-1191268018
Суслик
2007-10-01 23:46
2007.10.28
Реклама продукта


15-1191565499
Sergey Masloff
2007-10-05 10:24
2007.10.28
Кто-нибудь пробовал RemObjects Hydra и Data Abstract?


15-1190701158
alshtam
2007-09-25 10:19
2007.10.28
3.5 дисковод


4-1177871978
Плиз_не_пинайте
2007-04-29 22:39
2007.10.28
Нужен файл TLHelp32.dcu