Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как узнать ширину (width) строки, отображаемой в TMemo? [D5, Win95/98]


Loxly ©   (2002-02-09 18:36:00) 

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


Loxly   (2002-02-09 20:32:00) [1]

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

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


wicked   (2002-02-09 20:03:00) [2]

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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо