Подскажите как вывести на печать форму

Форумы Помощь по средеПодскажите как вывести на печать форму ← Ctrl12Ctrl →

Этот топик читают: Гость

Ответов: 2

Рейтинг: 0

#1: 2008-06-08 17:18:04 ЛС | профиль | цитата

Здраствуйте. Я не владею языками програмирования и эта программа мне очень нравится.
Пока я несовсем разобрался и потому прошу помоч.

Мне надо создать форму, чтобы можно было ее сохранаять в файл, желательно 1 (чтобы каждый раз когда я хочу сохранить заполненную форму программа в файле создавала новую строку). Как запоминать формы в отдельный файл я понял, но мне это неудобно.

И второй вопрос. Строчки, в которые я ввожу данные в основной форме будут расположены рядом, чтобы не искать нужное поле по всей форме. А вот на печать мне надо вывести так, чтобы поля были раскиданы по листу в определеном порядке. Вот я и подумал, что надо создать дочернюю форму в которую автоматом будут попадать внесенные данные из основной. Но как распечатать ее я незнаю. Формат печатного листа А4.

Заранее спасибо за помощь.

П.с. Если можно не пишите код, просто скажите какими элементами и как это сделать.

карма: 1

Администрация

Ответов: 15295

Рейтинг: 1519

#2: 2008-06-08 17:25:07 ЛС | профиль | цитата

на печать возможно вывести только содержимое RichEdit...

карма: 27

https://hiasm.com

Ответов: 2

Рейтинг: 0

#3: 2008-06-08 17:58:18 ЛС | профиль | цитата

А может подскажеш как организовать мою задумку через RichEdit, или другим способом каким-то? Я Уже думал о принтскрине...но как сделать стобы он фоткал толоько форму я незнаю.

карма: 1

Ответов: 5227

Рейтинг: 587

#4: 2008-06-08 17:58:30 ЛС | профиль | цитата

Так, а nesco тогда что там колдовством занимался ?

карма: 4

Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...

Ответов: 1088

Рейтинг: 112

#5: 2008-06-08 18:01:21 ЛС | профиль | цитата

Zeppelin писал(а):

как распечатать ее

Я передавал на печать так: сделал скриншот


#sha
Add(ScreenShort,8739674,28,98)
{
}

перевернул его на 90 градусов


#sha
Add(Img_Rotate,9002057,126,105)
{
 Angle=90
}

сохранил его в файл


#sha
Add(PictureStream,13563562,231,105)
{
 FileName="x0462846.jpg"
 Quality=100
}

открыл в браузере HTML документ содержащий <img src="Имя сохраненного файла">


<html>
<body>
<img src="x0462846.jpg">
</body>
</html>

распечатал его


#sha
Add(WebBrowser,10115667,149,238)
{
 Left=145
 Top=235
 Point(doPrint)
}

------------ Дoбавленo:

Zeppelin писал(а):

ак сделать стобы он фоткал толоько форму я незнаю.


#sha
Add(MainForm,5594996,98,105)
{
 Left=20
 Top=105
 Point(Handle)
}
Add(ScreenShort,5525743,98,168)
{
 link(Handle,5594996:Handle,[])
 link(onCapture,15268827:doLoad,[])
}
Add(Button,15699832,42,168)
{
 Left=45
 Top=175
 Align=2
 link(onClick,5525743:doCapture,[])
}
Add(Image,15268827,161,168)
{
 Left=160
 Top=165
 Align=5
}

карма: 0

Время верстки: %cr_time% Текущее время: %time%

Ответов: 1397

Рейтинг: 50

#6: 2008-06-08 18:03:56 ЛС | профиль | цитата

А это тебе не подойдет http://www.hiasm.com/xf/topic.php?t=7509&start=0

карма: 0

Время верстки: %cr_time% Текущее время: %time%

Разработчик

Ответов: 26305

Рейтинг: 2146

#7: 2008-06-08 18:04:12 ЛС | профиль | цитата

Dilma писал(а):

на печать возможно вывести только содержимое RichEdit...

Благодаря tsdima и коду, который он предложил, многие графические компоненты могут выводить изображения на конекст печати. Все жто уже давно в дистрибутиве. И пример там же -- All_Img_Draw называется. Кстати, картинки тоже могут быть выведены на печать

карма: 22

Ответов: 16884

Рейтинг: 1239

#8: 2008-06-08 19:32:13 ЛС | профиль | цитата

Zeppelin писал(а):

Я Уже думал о принтскрине...но как сделать стобы он фоткал толоько форму

щелкаешь мышкой на нужной форме, а потом Alt+PrintScreen, но если у тебя A4 то...

nesco писал(а):

All_Img_Draw

если думаешь, что начинающий разберется в этом примере... сомневаюсь я однако. Не увидел ни одного коментария

Телефонный разговор:
-Че делаешь?
-Пресс качаю.
-А че это?
-Полезно для здоровья и для фигуры.
-Дай ссылку, я тоже скачаю.

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Администрация

Ответов: 15295

Рейтинг: 1519

#9: 2008-06-08 19:51:33 ЛС | профиль | цитата

Tad писал(а):

если думаешь, что начинающий разберется в этом примере... сомневаюсь я однако

надо там в окне о проекте подписать: "Пример шифрования схемы с использованием элемента LineBreakEx"

Понять там действительно ничего не возможно...

карма: 27

https://hiasm.com

Разработчик

Ответов: 26305

Рейтинг: 2146

#10: 2008-06-08 20:02:44 ЛС | профиль | цитата

Tad писал(а):

Не увидел ни одного коментария

Какие там еще нужны комментарии -- все по блокам разложено и подписано. Мне что, надо было километровые LineBreackEx писАть.
Проблема, похоже, совсем не в этом, а в том, что толком никто про печть-то и не знал, что она-то уже есть

карма: 22

Ответов: 16884

Рейтинг: 1239

#11: 2008-06-08 20:46:02 ЛС | профиль | цитата

nesco, честное слово не понял откуда принтер берет что печатать
------------ Дoбавленo:

вернее еле понял, но час потратил
------------ Дoбавленo:

nesco, ну и сделай пример попроще
загрузил картинку - отпечатал
загрузил текст - отпечатал
и не прятать пример, а добавить папку Printer

nesco писал(а):

Проблема, похоже, совсем не в этом, а в том, что толком никто про печть-то и не знал, что она-то уже есть

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Разработчик

Ответов: 26305

Рейтинг: 2146

#12: 2008-06-08 20:53:47 ЛС | профиль | цитата

Tad писал(а):

откуда принтер берет что печатать

Результат работы любого графическиого компонента можно одинаково вывести как на Bimap (Handle), так и на Context, что и есть принтер (а может быть и что-то похожее). Возьми любой графический пример и укажи не Bitmap (Handle), а Context, и будет вывод на печать.

Tad писал(а):

ну и сделай пример попроще

Может ты сделаешь, а то у меня нет сейчас принтера, и черт его знает, когда он будет

карма: 22

Ответов: 16884

Рейтинг: 1239

#13: 2008-06-09 01:35:23 ЛС | профиль | цитата

Nesco, глянь на "Печать картинок" и подкорректируй.

Add(MainForm,5760284,21,154)
{
 Left=20
 Top=105
 Width=370
 ParentFont=1
 Caption="Print Image"
}
Add(Button,10902724,21,28)
{
 @Hint=#27:Запуск диалога выбора файла|
 Width=362
 Height=30
 Align=2
 Font=[MS Sans Serif,10,1,0,1]
 ParentFont=1
 Caption="Browse image file"
 link(onClick,5049552:doExecute,[])
}
Add(Button,15415409,21,91)
{
 Top=236
 Width=362
 Height=30
 Align=4
 Font=[MS Sans Serif,10,1,0,1]
 ParentFont=1
 Caption="Print"
 link(onClick,14309344:doPrint,[])
}
Add(ImageLoader,4434340,168,28)
{
 DrawSource=2
 link(onLoad,4434340:doDraw,[(269,34)(269,82)(156,82)(156,41)])
 link(onDraw,71505:doLoad,[])
}
Add(ODialog,5049552,112,28)
{
 Filter="Файлы рисунков(bmp)|*.bmp|Файлы рисунков(jpg)|*.jpg|Файлы рисунков(gif)|*.gif|Файлы рисунков(png)|*.png|"
 FileName=""
 link(onExecute,4434340:doLoad,[])
}
Add(Image,71505,224,35)
{
 Top=30
 Width=362
 Height=206
 Align=5
 Color=16777215
}
Add(Printer,14309344,133,91)
{
 Point(doSettings)
 Point(CurDPIY)
 link(onPrint,4383238:doDraw,[(180,97)(180,196)(124,196)(124,160)])
}
Add(Img_Bmp,4383238,133,154)
{
 X=172
 Y=10
 DrawSource=2
 Point(doDrawSource)
 link(Bitmap,14309344:Context,[])
 link(SourceBitmap,71505:ImageBitmap,[(146,140)(230,140)])
}

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Ответов: 3655

Рейтинг: 69

#14: 2008-06-09 01:43:40 ЛС | профиль | цитата

nesco писал(а):

Может ты сделаешь, а то у меня нет сейчас принтера, и черт его знает, когда он будет

Всегда для примеров использую word в нём есть иммитатор принтера.
Типа надо только указать на чём печатать.

карма: 0

Разработчик

Ответов: 26305

Рейтинг: 2146

#15: 2008-06-09 02:15:44 ЛС | профиль | цитата

Вячеслав писал(а):

Типа надо только указать на чём печатать

Спасибо, жуйте сами. То что у меня печатало таким образом в ворде, категорически отказалось печатать на принтере

Если хочешь написать пример для начинающих, я мешать не буду, но специально тратить на это время, тоже простите меня... Пример прекрасно показывает, как все это работает.
Когда-то, я тоже был начинающим, и ковырялся в тех старых примерах, и тоже плевался, но потихоньку разбирался, как все это работает, а штатные примеры, я скажу -- тоже, далеко не подарок.

А в завершении, хочу сказать -- кто захочет, тот разберется, или спросит, в конце концов, что непонятно

карма: 22

Форумы Помощь по средеПодскажите как вывести на печать форму ← Ctrl12Ctrl →


Сообщение ...
Прикрепленные файлы (файлы не залиты)