| |
| |
|
| - Page 1 - |
|
Rolf
Koch | Hallöchen today frag I time so into round, I with Print never so much made have.
following approach to the problem:
we've with us one computer with printer on the camp.
If one customer one unit bought has and on the cash-desk payd has, so comes with us one entsprechender voucher from the printer, so we The washing-machine, TV or such one Zeugs raussuchen can.
now would I gladly one nebenbeilaufendes Tool write, which a Sound abspielt, if one such voucher from the printer comes.
means your, I could this somehow achieve? |
|
| |
| |
| |
|
| |
| |
| - Page 2 - |
|
|
 | Hehe and now can The Info yet with Gonzo by offered to australia send and there becomes then the Trashcan ausgeleert.  |
|
| |
| |
| |
|
|
Rolf
Koch | strain with iF geskypet. I must unfortunately from the Fa. from no Fremdsoftware (solely then my) install. means goes these Variante neither  |
|
| |
| |
| |
|
|
Frank
Abbing | the Tool uses The windows-job-API. look you The still at times:
AbortPrinter
AbortProc
AddForm
AddJob
AddMonitor
AddPort
AddPrinter
AddPrinterConnection
AddPrinterDriver
AddPrintProcessor
AddPrintProvidor
AdvancedDocumentProperties
ClosePrinter
ConfigurePort
ConnectToPrinterDlg
DeleteForm
DeleteMonitor
DeletePort
DeletePrinter
DeletePrinterConnection
DeletePrinterData
DeletePrinterDriver
DeletePrintProcessor
DeletePrintProvidor
DocumentProperties
EndDocPrinter
EndPagePrinter
EnumForms
EnumJobs
EnumMonitors
EnumPorts
EnumPrinterData
EnumPrinterDrivers
EnumPrinters
EnumPrintProcessorDataTypes
EnumPrintProcessors
FindClosePrinterChangeNotification
FindFirstPrinterChangeNotification
FindNextPrinterChangeNotification
FreePrinterNotifyInfo
GetForm
GetJob
GetPrinter
GetPrinterData
GetPrinterDriver
GetPrinterDriverDirectory
GetPrintProcessorDirectory
OpenPrinter
PrinterMessageBox
PrinterProperties
ReadPrinter
ResetPrinter
ScheduleJob
SetForm
SetJob
SetPort
SetPrinter
SetPrinterData
StartDocPrinter
StartPagePrinter
WaitForPrinterChange
WritePrinter |
|
| |
| |
| |
|
|
Rolf
Koch | OK Frank thanks will be me the in a ruhigen Minute (hours ^^) time reinziehen  |
|
| |
| |
| |
|
|
E.T. | I had too time something like for To dwell gebastelt. I Have there but just the Spool-directory monitors, whether what drinn lying (means The simple shape without API etc.).
has integrally well functions, it get by me any 4 printer (incl. pdf-Printer) notice.
Vorraussetztung is naturally, the the (The) printer whom Spooler benefit (but this is Yes meißt so). |
|
| |
| Grüße aus Sachsen... Mario  WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 12/21/08 ▲ |
|
| |
|
|
Rolf
Koch | hears itself well on E.T.
I give sincere To, that I not at all known, that it a directory gives. is this one Tempverz.? |
|
| |
| |
| |
|
|
Rolf
Koch | |
| |
| |
| |
|
|
E.T. | not beautiful, but on The speedy  . by me working it, it go too pdf-printer, Fax-printer etc. berücksichtigt. the Verz. must naturally fit.
by me does it jetzige Bsp not without Window (ListBoxList ??  ), but so is the Test at least again beendbar 
CompileMarkSeparation
Created by me too no processor-Last. |
|
| |
| Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 12/21/08 ▲ |
|
| |
|
|
Rolf
Koch | is Yes again typical. alike I drucke in the way happens nothing. it go no Files stored (means tempmässig and at all)
Nachtrag:
still - Have time the waitinput through sleep supplant and already functions it. comic. Well wants Yes anyhow then with a Timer works. |
|
| |
| |
| |
|
|
Paul
Glatz | | by me goes it! (Win Vista) |
|
| |
| |
| |
|
|
E.T. | | already time into printer-Settings geschaut ?? |
|
| |
| Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 12/21/08 ▲ |
|
| |
|
|
Andreas
Miethe
 | Hello Rolf,
versuchs time herewith, there becomes the standard-Dricker monitors.
CompileMarkSeparation $H windows.ph
DEF Get_STDPrinter(1) Substr$(ReadIni$("WIN.INI","Windows","Device"),@&(1),",")
Var Spool& = ImportDll("Winspool.drv","")
cls
DEF &PRINTER_CHANGE_JOB $FF00
DEF &INFINITE $FFFFFFFF
DEF &PRINTER_CHANGE_ADD_JOB $100
Var A& = 0
Var chgObject& = 0
Var pdwChange& = 0
Var fcnreturn& = 0
Var hPrinter& = 0
Var Printer$ = Get_STDPrinter(1)
OpenPrinterA(Addr(Printer$),Addr(hPrinter&),0)
chgObject& = FindFirstPrinterChangeNotification(hPrinter&,&PRINTER_CHANGE_JOB, 0, 0)
Repeat
~WaitForSingleObject(chgObject&,200)200 Millisekunden warten
fcnreturn& = FindNextPrinterChangeNotification(chgObject&, Addr(pdwChange&),0,0)
If fcnreturn&
If pdwChange& = &PRINTER_CHANGE_ADD_JOB
Print "neuer Druck-Job"
endif
Endif
Until A& = 1Abbruchbedingungen vielleicht besser mit einem Button bestimmen ?
FindClosePrinterChangeNotification(chgObject&)
ClosePrinter(hPrinter&)
end
|
|
| |
| Gruss Andreas ________ ________ ________ ________ _ Profan 3.3 - XProfanX2 Win 95,98,ME,2000,XP,Vista - Win 7 32 / 64 Bit ASUS X93S - Intel Core I7-NVIDIA GForce 540M 8GB Arbeitsspeicher Homepage : [...]  | 12/21/08 ▲ |
|
| |
|
(278)
Deutsch
English
Français
Español
Italia