|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
20.12.2007, 15:00 | #1 |
Пользователь
Регистрация: 31.10.2007
Сообщений: 62
|
Вывод на принтер содержимого формы
Вот код програмы
procedure TForm1.Button2Click(Sender: TObject); begin if PrintDialog1.Execute=true then begin Printer.BeginDoc; form1.PaintTo(Printer.Handle, 10,10); Printer.EndDoc; end else exit; end; Но у меня выводимое изображение очень маленькое. Как можно задать масштаб, чоп размерность была под А4 бумагу? Размер формы примерно 500*700. |
20.12.2007, 15:15 | #2 |
Реанимируюсь...
Участник клуба
Регистрация: 19.07.2007
Сообщений: 1,445
|
Пишите код так, как будто сопровождать его будет склонный к насилию психопат, который знает, где вы живёте.
Правила форума => Правила раздела => Для общего развития => Помощь студентам => Перед тем, как создавать тему, скачайте себе... P.S.: форум не песочница (с)
название статьи на сайте MS: "Отмена принудительного отключения автоматического запуска в реестре Windows" |
20.12.2007, 15:40 | #3 |
Пользователь
Регистрация: 31.10.2007
Сообщений: 62
|
Получилось. Пасиб!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
из DBGrid на принтер | micaell | БД в Delphi | 8 | 07.05.2010 17:29 |
Печать на принтер(USB) | kisser_san | Общие вопросы Delphi | 4 | 25.04.2008 16:18 |
Принтер | xakkkkker | Общие вопросы Delphi | 1 | 23.03.2008 15:05 |
вывод содержимого папки [delphi] | [Smarik] | Помощь студентам | 4 | 12.03.2008 14:30 |
Принтер | Gromsky | Общие вопросы Delphi | 4 | 05.03.2008 17:08 |