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

Вниз

Количество символов в Memo   Найти похожие ветки 

 
saNat ©   (2004-10-10 00:28) [0]

Доброго времени суток.
Подскажите пожалуйста, как определить максимальное количество символов, которое "влезет" в строку Memo для данного шрифта. Нужно сделать выравнивание по ширине. В DOS все решается просто - есть ширина экрана, вычисляем количество символов и вставляем пробелы. Сдесь же нужно учесть различную ширину символов шрифта можно конечно задатть моноширный, но это частный случай), а так же узнатьт сколько занимает данный символ...

Спасибо за внимание.

С уважением...


 
Юрий Зотов ©   (2004-10-10 00:59) [1]

> а так же узнатьт сколько занимает данный символ...

Например, GetCharWidth32 (API).

Еще есть TextWidth (VCL) или DrawText с DT_CALCRECT (API) - можно сразу вычислить ширину заданного текста, а не символа.


 
saNat ©   (2004-10-10 01:35) [2]

Судя по F1 TextWidth есть свойство TCustomMemo, который является предком TMemo. А как обратитьтся к этому свойству?


 
Германн ©   (2004-10-10 03:30) [3]

TextWidth - есть свойство TCanvas. Кто вам сказал, что это свойство TCustomMemo?


 
saNat ©   (2004-10-10 11:16) [4]

to Германн © (10.10.04 03:30) [3]:
По справке смотрел. Или я не так понял?
TCustomMemo.TextWidth

Returns the width, in pixels, of a given line.

property TextWidth[LineNum: Integer]: Integer;

Description

Use TextWidth to return the width, in pixels, of the line specified by the LineNum parameter.


Тем неменее, как к нему обратиться?



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

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

Наверх




Память: 0.47 MB
Время: 0.022 c
4-1095875840
hgd
2004-09-22 21:57
2004.10.24
Как работать с WDM драйвером в delphi?


3-1096023258
Term
2004-09-24 14:54
2004.10.24
ADO использование TRDSConnection


1-1097164516
AlexXn
2004-10-07 19:55
2004.10.24
RecreateWnd


1-1097061914
Russel
2004-10-06 15:25
2004.10.24
Установка старого компонента


1-1097584518
Dixi
2004-10-12 16:35
2004.10.24
TProvider.ApplyUpdates