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

Вниз

как узнать "ширину" строки   Найти похожие ветки 

 
nickola   (2004-12-20 11:25) [0]

Здраствуйте, All!
Хочу в MainMenu добавить список последних открывавшихся
файлов в виде: "C:\...\MyVeryLongFileNam...", т.е. только
часть пути, не "шире" определенного значения.
"Ширину" строки вычисляю так:
var
 ...
 Size: TSize;
 TextLen: Integer;
begin
 ...
 Size.cx := 0;
 GetTextExtentPoint32(GetDC(MainMenu.Handle), PChar(Edit1.Text),
   Length(Edit1.Text), Size);
 TextLen := Size.cx;
end;

TextLen всегда = 0. Видимо ошибка здесь: GetDC(MainMenu.Handle), но что конкретно неправильно не пойму


 
TUser ©   (2004-12-20 11:31) [1]

См. Canvas.TextWidth или на апи - GetTextMetrics


 
MBo ©   (2004-12-20 12:27) [2]

>Видимо ошибка здесь: GetDC(MainMenu.Handle),
Да, здесь нужно дескриптор окна, а не меню.

В большинстве случаев можно использовать Canvas.Handle главного окна.



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

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

Наверх




Память: 0.47 MB
Время: 0.029 c
1-1103223407
KiLLeR_AleX
2004-12-16 21:56
2005.01.02
Курсор


3-1102086866
Санёк
2004-12-03 18:14
2005.01.02
ADO [eoAsyncExecute] при выполнении хранимых процедур


14-1102609934
Piter
2004-12-09 19:32
2005.01.02
МЭИ заминировали


1-1103283641
V l a d i m i r
2004-12-17 14:40
2005.01.02
Обработка клавиш YESNOCANCEL в MessageBox


1-1103523038
Mishenka
2004-12-20 09:10
2005.01.02
Как в DBGridEh (из EhLib) сделать структуру как в TreeView?