Сборник лабораторных работ по дисциплине "Прикладное программное обеспечение". Самохвалов К.М. - 54 стр.

UptoLike

Составители:

Рубрика:

54

TextOut

Рисует данную строку на Canvas, начиная

с координат (x,y) – фон текста заполняет-

ся текущим цветом кисти.

Canvas.TextOut(10, 10,

'Some text');

Функция позволяет рисовать текст, не заполняя его фон. Если Вам не-

обходимо изменить шрифт, используемый в TextOut, то необходимо изме-

нить свойство Font (это свойство имеет тип TFont) – например

«Canvas.Font.Name:='Verdana';», «Canvas.Font.Size:=24;» или «Canvas.Font.

Color:=clRed;».

Перерисовка окна

Рисунок сохраняется до тех пор, пока окно (форма) не было обновлено.

Перерисовка несколько отличается от понятия "рисование". Когда окну

необходимо перерисоваться, то Windows посылает определённое сообщение.

Это сообщение поступает в обработчик события "OnPaint". Любой код, кото-

рый поместить в обработчик OnPaint будет вызван каждый раз, когда форме

необходимо обновиться.

Что такое Bitmap?

Bitmap – это графический объект, который содержит заголовок, необ-

ходимую информацию о картинке (такую как высота, ширина, цвета и т.д.) и,

собственно, само изображение (большой массив, содержащий цвет каждой

точки). В Turbo Explorer для этой цели уже предусмотрен класс TBitmap.

Bitmap можно рисовать не только на форме, но и по всему экрану. Мо-

жет это и может показаться немного странным, но иногда это бывает полез-

но, особенно при создании скринсейвера. Однако сначала нам необходимо

разобраться с тем, как работать с bitmap. Вот небольшой пример:

procedure Form1.DrawBitmap(const Filename: string; const x, y:

Integer);