Ru-Board.club
← Вернуться в раздел «Прикладное программирование»

» графика в TPanel

Автор: Zrjd
Дата сообщения: 13.02.2003 14:26
Скачал с сайта компонент ExprMake. Он умеет делать математические формулы на канве формы. Как эту штуку сделать на панели?
Так это было на форме:
Expr.Font.Size:=12;
// Теперь размер шрифта установлен

Expr.Canvas:=Form1.Canvas;
Expr.Draw(5,5,ehLeft,evTop);
// Для отображения выражения на форме нужно установить его канву и вызвать Draw

Printer.BeginDoc;
Expr.Canvas:=Printer.Canvas;
Expr.Draw(50,50,ehLeft,evTop);
Printer.EndDoc;
// Можно поменять канву и отобразить это же выражение на другом устройстве

Expr.Canvas:=Form1.Canvas;
Expr.Font.Height:=24;
Expr.Draw(Form1.ClientWidth-5,Form1.ClientHeight-5,ehRight,evBottom);
// Можно поменять шрифт и снова вернуться к канве формы (или перейти к любой другой канве
Автор: mmi
Дата сообщения: 18.02.2003 08:08
Нужно объявить в этом модуле новый класс:

type
TMyPanel = class(TCustomPanel);


Далее в коде:

...


// Теперь размер шрифта установлен

Expr.Canvas:=TMyPanel(Panel1).Canvas;
Expr.Draw(5,5,ehLeft,evTop);
// Для отображения выражения на форме нужно установить его канву и вызвать Draw


...


Еще можно попробовать использовать вместо панели TImage.

Желаю успехов!

Страницы: 1

Предыдущая тема: MSDN


Форум Ru-Board.club — поднят 15-09-2016 числа. Цель - сохранить наследие старого Ru-Board, истории становления российского интернета. Сделано для людей.