Для вставки на создаваемую страницу готового изображения используется процедура procedure Image(const FileName: WideString; X: Double; Y: Double; Width: Double; Height: Double)
Параметры:
- const FileName - имя файла изображения и путь к нему на жестком диске. Задается в кавычках.
- X - координата левой верхней точки изображения по отношению к верхнему левому углу страницы по горизонтали в миллиметрах
- Y - координата левой верхней точки изображения по отношению к верхнему левому углу страницы по вертикали в миллиметрах
- Width - ширина изображения в миллиметрах
- Height - высота изображения в миллиметрах.
Пример | 1set page = CreatePage(Null)
2page.drawgrid
page.Image "c:\mill.bmp", 10,10, 30, 30 Результат:
|
Вне зависимости от размера исходного изображения, при вставке изображения на создаваемую страницу оно будет растянуто по размерам, прописанным в процедуре.