Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.10.28;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.039 c
11-1174493166
Vladimir Kladov
2007-03-21 19:06
2007.10.28
Версия 2.55


15-1190620175
Галинка
2007-09-24 11:49
2007.10.28
Редактировать под Windows, компилировать под Линуксом


2-1191840185
Term
2007-10-08 14:43
2007.10.28
Как узнать в событии OnClick имя компонента по которому кликнул


8-1168460554
andr1962
2007-01-10 23:22
2007.10.28
DirectDraw


2-1191751244
foreverDelphi
2007-10-07 14:00
2007.10.28
как изменить курсор





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский