VBNet - Форум - Есть ли OCX или что-нибудь ещё для вывода на пе...

Вопрос: Есть ли OCX или что-нибудь ещё для вывода на пе... Добавлено: 14.09.02 02:40

Автор вопроса: Comanche

ДАНО:

Программа ведёт некий журнал или просто выгружает что-то в ASCII-файл.

НЕОБХОДИМО:

Вывести этот файл на печать, хотя бы на дефолтовый принтер (без выбора).

ИЗВЕСТНЫЕ МНЕ ВАРИАНТЫ РЕШЕНИЯ, КОТОРЫЕ НЕ УСТРАИВАЮТ:

1. Создать в проекте DataReport и юзать его метод PrintReport.

Не устраивает, т.к. этот Report надо ещё "ваять", а у меня задача-то - тьфу, пустяк: вывалить TXT-шник на лист бумаги.

2. Открыть ASCII-файл в Блокноте.

Не устраивает, т.к. непонятно, как послать Блокноту ко[sensored]у печати (не через SendKeys же).

3. Через Automation выгрузить в Word (Excel) и распечатать оттуда.

Не устраивает, т.к. не факт, что эти приложения установлены на машине.

4. Через Shell вызвать DOS-сессию, в которой выполнить ко[sensored]у типа: copy ascii.txt PRN.

Не устраивает, т.к. есть вызов DOS-сессии (некрасиво), и т.к. на многих современных струйниках DOS-печать (особенно кириллицей) невозможна.

ЧЕГО ХОЧЕТСЯ:

Может, существует какой-нибудь OCX/DLL, у которого можно сделать что-то вроде этого:

ocxObject.Text = TextBox1.Text

' или из файла: ocxObject.TextSource = "C:\DOCS\ascii.txt"

ocxObject.PrintText StartPage:=1, EndPage:=3

Большего за глаза не надо!!!

Заранее спасибо за подсказки.

Ответить

Ответы Всего ответов: 4

Номер ответа: 1
Автор ответа:

CyRax

Разработчик Offline Client

ICQ: 204447456

Вопросов: 180
Ответов: 4229

Web-сайт: basicproduction.nm.ru
Профиль | | #1

Добавлено: 14.09.02 03:38

z=Shell("notepad /p list.lst",1)

или Printer.print (но нужно открывать файл в программе)

Ответить

Номер ответа: 2
Автор ответа:

Comanche

Вопросов: 87
Ответов: 459

Профиль | | #2

Добавлено: 14.09.02 11:53

Спасибо, но чё-то я не нашёл в броузере объектов метода Print у объекта Printer. Имеется в виду Class Printer из библиотеки VB?

Ответить

Номер ответа: 3
Автор ответа:

CyRax

Разработчик Offline Client

ICQ: 204447456

Вопросов: 180
Ответов: 4229

Web-сайт: basicproduction.nm.ru
Профиль | | #3

Добавлено: 17.09.02 20:28

Имеется ввиду

Object.Print

Где объектом выступает Printer

Чего тут непонятного ?

Ответить

Номер ответа: 4
Автор ответа:

boevik

Хранитель чата

ICQ: 137392264

Вопросов: 8
Ответов: 557

Web-сайт: www.hypertech.ru
Профиль | | #4

Добавлено: 18.09.02 08:36

Ещё один вариант.
В General Declaration объявить:

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Const SW_HIDE = 0

В коде поставить следующую ком[sensored]у:

ShellExecute Me.hwnd, "print", App.Path & "\Print.txt", "", App.Path, SW_HIDE

Есть одно условие: должна быть привязка файла по умолчанию к Блокноту.

Ответить

Страница: 1 |