Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Клуб программистов > Обсуждение статей
Регистрация

Восстановить пароль
Повторная активизация e-mail


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 15 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 27.05.2007, 03:17   #1
Pblog
Бот
Администратор
 
Регистрация: 27.05.2007
Адрес: Филадельфия
Сообщений: 182
Репутация: 156
Стрелка обновление в блоге - Стандартная печать содержимого компонента

Стандартная печать содержимого компонента

pblog.ruнапример, Grid / DbGrid (далее Matrix) нужно заполнить значениями из Table..
затем :

with Printer do
begin
if Printing then exit;
PrinterIndex:= -1;
BeginDoc;
Onprint:= true;
Matrix.Color:= clWhite; // экономим чернила
Matrix.Repaint;
zoom:= PageWidth / (2*Matrix.Width);
zoom2:= PageHeight / (2*Matrix.Height);
if zoom2 на полстраницы
with canvas do
begin
Font.Size:= 14;
Font.Name:= ‘Courier New’;
TextOut((PageWidth-Textwidth(str)) div 2, 12, str);
StretchBlt(Handle, (PageWidth - wdt) div 2, 25+TextHeight(str), Wdt, Hgt,
Matrix.Canvas.handle, 0, 0, Matrix.Width, Matrix.Height-5, SrcCopy);
end;
EndDoc;
Onprint:= false;
Matrix.Color:= $00AABBCC;
Matrix.Repaint;
if aborted then MessageDlg(’Печать была прервана!’, mtInformation, [mbOK],0);
end;
Pblog вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Печать содержимого DB Grid Prisian БД в Delphi 4 06.09.2007 23:02
обновление в блоге - Windows Pblog Обсуждение статей 0 27.05.2007 03:17
обновление в блоге - О ярлыках Pblog Обсуждение статей 0 27.05.2007 03:17
обновление в блоге - Шифрование Pblog Обсуждение статей 0 27.05.2007 03:17


05:57.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.

Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru