Вниз
Скачать: CL | DM;

Как узнать ширину (width) строки, отображаемой в TMemo?   Найти похожие ветки 

← →
Loxly ©   (2002-02-09 18:36) [0]

Приветствую всех Мастеров! Помогите с проблемкой.
Хочу в run-tim"е устанавливать размер поля TMemо шириной, равной ширине самой длинной строки, но могу получить эту самую ширину.
Свойства Canvas у TMemo нет, я не могу воспользоваться методом TCanvas.TextWidth(). Просто так временно создать объект TCanvas нельзя. Создавать компонент, у которого есть свойство Canvas? Нерационально.
Что можете посоветовать, уважамые Мастера?


← →
wicked ©   (2002-02-09 20:03) [1]

во-первых, можно использовать canvas формы, на которой расположен memo, и пользоваться его методами....
во-вторых, создать временный объект TCanvas можно... например так:
var c: TCanvas;
begin
...
c := TCanvas.Create;
...
{<делаем чего-нибудь>}
...
c.Free;
...
end;

хотя, по-моему, первый способ лучше.....


← →
Loxly ©   (2002-02-09 20:32) [2]

2 wicked ©
Во-первых, спасибо за совет использовать канву формы. Очень простое и эффективное решение!
Во-вторых, объект класса TCanvas просто так создать все-таки нельзя. По крайней мере, одним TCanvas.Create отделаться не получается. При попытке вызвать какой-либо метод, например тот же TextWidth(), вылетает исключение EInvalidOperation c сообщением "Canvas does not allow drawing".

Еще раз спасибо за совет :-)



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.006 c
1-79331
Gayrus
2002-02-07 16:45
2002.02.25
Components


7-79490
jolly
2001-11-18 02:26
2002.02.25
восстановление дискеты 1.44Мв (FAT)


14-79445
Nest
2002-01-08 09:29
2002.02.25
Как себя вучствуем полсе праздников ?... %()


1-79322
Mistery
2002-02-07 18:15
2002.02.25
П - а - м - а - г - а - и - г - и - т - е .


3-79251
AndrewK
2002-01-30 14:26
2002.02.25
Как заставить MS SQL Server 7.0 сообщать подсоединенным клиентам о необходимости обновить свои DataSet`ы




   Наверх