Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.06.10;
Скачать: CL | DM;

Вниз

Печать bmp переменной   Найти похожие ветки 

 
Lera   (2007-05-22 15:02) [0]

Доброго дня уважаемые! Скажите плиз как можно печатать bmp переменную без использования PrintDialog, а то эта компонента глючит - печатает через раз или ваще не печатает. Заранее спасибо.


 
Правильный Вася   (2007-05-22 15:05) [1]

> PrintDialog, а то эта компонента глючит - печатает через
> раз или ваще не печатает
эта компонента ваще не печатает ничего, это не ее функция


 
Lera   (2007-05-22 15:12) [2]

без ее помощи можно какнить напечатать?


 
Darvin ©   (2007-05-22 15:12) [3]

Можно с помощью TPrinter


 
Lera   (2007-05-22 15:25) [4]

Есть код:
-----------------------------
Bmp_p:=TBitmap.Create;
bmp_for_print;//готовит переменную bmp_p

 if Fm_main.PrintDialog1.Execute then
  with Printer do
   begin
   Orientation := poLandscape;
   ImageRect.Top:=0;
   ImageRect.Left:=0;
   ImageRect.Right:=PageWidth;
   ImageRect.Bottom:=PageHeight ;
   begindoc;
   Canvas.stretchdraw(ImageRect,bmp_p);
   enddoc;
   end;

bmp_p.SaveToFile(MainDir+"Map.bmp");//сохранение в файл

Bmp_p.free;

После выполнения кода по кнопке на форме принтре выдает пустой лист, в файле есть картинка....чудеса!!!


 
Darvin ©   (2007-05-22 15:30) [5]

попробуй
Printer.Canvas.stretchdraw(ImageRect,bmp_p);
канва еще есть у формы


 
Правильный Вася   (2007-05-22 15:33) [6]

а масштаб?


 
Lera   (2007-05-22 15:41) [7]

ни фурычит:(


 
Правильный Вася   (2007-05-22 15:44) [8]

CLX canvases use device-dependent bitmaps to implement the Draw, StretchDraw, or CopyRect methods. Because of this, you can’t use these methods with most printers. Instead, to create graphic images on the printer’s canvas, create a device-independent bitmap and draw it directly to the canvas’s Handle property.


 
Lera   (2007-05-22 15:45) [9]

главное то печатает, то нет....сеня ваще никак...загадка


 
Правильный Вася   (2007-05-22 15:50) [10]


>  то печатает, то нет.

то BMP в формате привычном, то в формате DIB


 
Lera   (2007-05-22 15:52) [11]

а вы не могли бы хотя приблизительной код написать....плиз


 
Lera   (2007-05-22 16:02) [12]

как же быть то теперь:(


 
Однокамушкин   (2007-05-22 16:41) [13]

Соседняя ветка на эту же тему...
http://delphimaster.net/view/1-1179734532/



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

Текущий архив: 2007.06.10;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.035 c
2-1179588723
Xamil
2007-05-19 19:32
2007.06.10
Плз, подскажите по opengl


2-1179386388
Alex7
2007-05-17 11:19
2007.06.10
Запрос с использованием имен других dataset (виртуальных таблиц)


2-1179578772
AnSky
2007-05-19 16:46
2007.06.10
Сортировка в StringGrid


15-1179219626
Rule
2007-05-15 13:00
2007.06.10
Открыл для себя новую альтернативу жабы


2-1179798888
delphino
2007-05-22 05:54
2007.06.10
Копирование набора Query в Table