Главная страница
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.012 c
4-1176882413
igornov
2007-04-18 11:46
2007.10.28
Как сделать сервис скрытым?


2-1191237092
абв
2007-10-01 15:11
2007.10.28
blob и jpg


2-1191351217
Pacific
2007-10-02 22:53
2007.10.28
нажатие


15-1191480540
MBo
2007-10-04 10:49
2007.10.28
50 лет первому ИСЗ


2-1191743251
мфтнф_й
2007-10-07 11:47
2007.10.28
TCustomListBox -- OnDblClick