| |
| |
|
| - Página 1 - |
|
Rolf
Koch | Hallöchen heut frag Yo veces así en el Runde, como I, con Drucken nie soviel gemacht habe.
Folgende Problemstellung:
Wir haben en uns una Computer con Drucker en el Lager.
Wenn una Kunde una Gerät gekauft ha y a el Kasse bezahlt ha, así kommt en uns una entsprechender Beleg de el Drucker, así wir el Waschmaschine, TV oder solch una Zeugs raussuchen puede.
Jetzt sería Me gusta una nebenbeilaufendes Tool escribir, welches una Sound abspielt, si una solcher Beleg de el Drucker kommt.
Meint Ihr, Yo podría dies irgendwie erreichen? |
|
| |
| |
| |
|
| |
| |
| - Página 2 - |
|
|
 | Hehe y ahora kannst el Info todavía con Gonzo por Bot después de Australien enviar y hay se entonces el Basura ausgeleert.  |
|
| |
| |
| |
|
|
Rolf
Koch | Grad con IF geskypet. Yo darf desafortunadamente de el Fa. de no Fremdsoftware (lediglich entonces mi) installieren. Also va esta Variante auch no  |
|
| |
| |
| |
|
|
Frank
Abbing | Das Tool nutzt el Windows-Job-API. Schau dir el doch veces a:
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 Franco Gracias voluntad me en uno ruhigen Minute (Stunden ^ ^) veces reinziehen  |
|
| |
| |
| |
|
|
E.T. | Tuve auch veces algo como para a Casa gebastelt. Yo como aber simplemente sólo el Spool-Directorio überwacht, si qué drinn liegt (Así que el simple Form sin API usw.).
Sombrero bastante bien funktioniert, lo fueron en me todos 4 Drucker (incl. pdf-Printer) bemerkt.
Vorraussetztung es natürlich, el el (el) Drucker el Spooler nutzen (aber el es sí meißt así). |
|
| |
| 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... | 21.12.2008 ▲ |
|
| |
|
|
Rolf
Koch | Hört se bien a E.T.
Yo dar ehrlich a, Yo garnicht wusste, daß lo un directorio son. Ist dies una Tempverz.? |
|
| |
| |
| |
|
|
Rolf
Koch | Aja Gracias para el Info
[...]  |
|
| |
| |
| |
|
|
E.T. | No schön, aber en el Schnelle  . En me funzt lo, lo voluntad auch pdf-Drucker, Fax-Drucker etc. berücksichtigt. Das Verz. muß natürlich passen.
En me va el jetzige Bsp no sin Ventana (ListBoxList ??  ), aber así es el Test wenigstens otra vez beendbar 
KompilierenMarcaSeparación
Erzeugt en me auch no Prozessor-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... | 21.12.2008 ▲ |
|
| |
|
|
Rolf
Koch | Ist sí otra vez typisch. Egal Yo drucke en el Pfad passiert nix. Lo voluntad no Archivos abgelegt (also tempmässig y überhaupt)
Apéndice:
Doch - tener veces el waitinput por sleep ersetzt y ya funktioniert lo. Komisch. Naja voluntad sí sowieso entonces con un Temporizador trabajo. |
|
| |
| |
| |
|
|
Paul
Glatz | |
| |
| |
| |
|
|
E.T. | | Schon veces en el Drucker-Einstellungen 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... | 21.12.2008 ▲ |
|
| |
|
|
Andreas
Miethe
 | ¡Hola Rolf,
versuchs veces hiermit, como se el Standard-Dricker überwacht.
KompilierenMarcaSeparación $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 : [...]  | 21.12.2008 ▲ |
|
| |
|
(466)
Deutsch
English
Français
Español
Italia