распечатка файла

← →
sherminator © (2004-03-24 15:36) [0]

есть: файл формата WordXP
нужно: отправить его на печать (просмотр файла не обязателен)

каким образом это сделать???

← →
panov © (2004-03-24 15:40) [1]

Выполнить ShellExecute с параметром "print"

← →
sherminator © (2004-03-24 15:43) [2]

можно поподробнее пожалуйста как будет эта строка выглядеть???

← →
panov © (2004-03-24 15:52) [3]

ShellExecute(0,"print","c:\1.doc",nil,"c:\",SW_SHOWNORMAL);

← →
sherminator © (2004-03-24 16:14) [4]

[Error] Unit1.pas(62): Undeclared identifier: "ShellExecute"

почему так????

← →
panov © (2004-03-24 16:20) [5]

uses ShellApi;

← →
sherminator © (2004-03-24 16:25) [6]

а как-то можно сделать чтобы без запуска окна ворд это всё делалось??? а то открывается окно, выскакивает автоматическая страничка печати, распечатывается файл и окно закрывается... а чтобы всё это скрыто было как сделать????

Заранее премного благодарен!!!

← →
panov © (2004-03-24 16:44) [7]

Попробуй пример в стандартной поставке Delphi посмотреть:
demos\ActiveX\OleAuto\Word8

← →
sherminator © (2004-03-24 16:57) [8]

неа... нет там ничего даже похожего....(((((((((

точно нет, полностью примеры просмотрел, может кто-нибудь что-то знает по этому поводу????

Ну кто тебе сказал, что там точно это должно быть?

var WA:TWordApplication; FName: OLEVariant; begin FName := "c:\1.doc"; WA := TWordApplication.Create(nil); WA.Visible := False; wa.Documents.Open(FName,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyPar am,EmptyParam,EmptyParam); WA.ActiveDocument.PrintOut(EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,Empty Param,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam); WA.Free;

огроооооооооооооооооооооооооомное спасибо...)))))))) гуру...)))))

распечатка файла Найти похожие ветки