Chris Ek sal of vandag of more so R600 oorbetaal.
Corlien ============== H.C.C. Cloete XRF-Section, Laboratory Unit Council for Geoscience P/Bag X112 Pretoria 0001 South Africa Tel no.: +27 12 841 1302 ________________________________ From: [email protected] [mailto:[email protected]] On Behalf Of Chris Sent: 07 September 2009 02:20 PM To: [email protected] Subject: RE: [delphi-en] Re: usb virtual printer Ooh, I think what he is trying to achieve is to send data directly to the hardware printer port (on old pc's) to activate/deactivate current on particular pins to control some device. I don't know if its possible with a converter - what I know is accessing hardware ports directly from windows almost certainly gives access violations _____ From: [email protected]<mailto:delphi-en%40yahoogroups.com> [mailto:[email protected]<mailto:delphi-en%40yahoogroups.com>] On Behalf Of free2inov8 Sent: 07 September 2009 11:28 a To: [email protected]<mailto:delphi-en%40yahoogroups.com> Subject: [delphi-en] Re: usb virtual printer Thank you for all kindly respons for my problem. But what i really looking for is a way to use usb to printer converter/cable like lpt port. I'm not going to send data to printer, but send data to printer port. So there is difference beetwen them. So i'm looking for how to map the converter to I/O address, like on old pc LPT1=378h, LPT2=278h, etc. Could it be done in delphi? Or there is something tricky with the converter ? Thank you. --- In delphi...@yahoogrou <mailto:delphi-en%40yahoogroups.com> ps.com, "Nesler, Thomas J" <tnes...@...> wrote: > > When I want to print to a USB printer, I simply find the printer's name > and send my job to it. I have never had to go below the standard > interface. With Quick Reports for example, I use the Printer settings > dialog. > > Here is some sample code for printing directly to an LPT port: > > I := Printer.Printers.IndexOf(LblPrinter); // LblPrinter = Name of > printer > if I >= 0 then Printer.PrinterIndex := I; // -1 means no printer > selected > with Printer do > begin > BeginDoc; > Canvas.Font.Name := 'Courier New'; > Canvas.font.size := 12; > Canvas.font.Style := [fsBold]; > Z := Canvas.TextHeight('X'); //Height in pixels > X := Canvas.TextWidth('X'); // Width in Pixels > Canvas.TextOut(X,0,BuildLine('First')); > Canvas.TextOut(X,Z,Line); > Canvas.font.Style := []; > Canvas.Font.Name := 'Free 3 of 9 Extended'; //Bar code > Canvas.font.size := 48; > Canvas.TextOut(9*X,2*Z,'*' + IntToStr(OrdNo) + '*'); > Canvas.Font.Name := 'Courier New'; > Canvas.font.size := 12; > Canvas.font.Style := [fsBold]; > //................ Other printing on label > EndDoc; > > Tom Nesler > > -----Original Message----- > From: delphi...@yahoogrou <mailto:delphi-en%40yahoogroups.com> ps.com [mailto:delphi...@yahoogrou <mailto:delphi-en%40yahoogroups.com> ps.com] On > Behalf Of free2inov8 > Sent: Sunday, August 30, 2009 9:25 PM > To: delphi...@yahoogrou <mailto:delphi-en%40yahoogroups.com> ps.com > Subject: [delphi-en] Re: usb virtual printer > > No Chris, what i'm looking for is a tutorial on how to read and > write/send data to USB to LPT converter, just like using LPT port on an > old pc/notebook. I'm looking a way on how delphi can handle this task. > On old PC we can find LPT port that we use to connect to printer or as > an I/O port for data aquisition, but on latest notebook there is only > usb port available. So i wonder if i can use USB to printer > converter/cable to substitute missing LPT port as an I/O port for data > aquisition. > > Thank you. > > --- In delphi...@yahoogrou <mailto:delphi-en%40yahoogroups.com> ps.com, "Chris" <chris@> wrote: > > > > Are you looking for an LPT port simulator? > > > > > > > > _____ > > > > From: delphi...@yahoogrou <mailto:delphi-en%40yahoogroups.com> ps.com [mailto:delphi...@yahoogrou <mailto:delphi-en%40yahoogroups.com> ps.com] On > Behalf > > Of free2inov8 > > Sent: 27 August 2009 11:27 a > > To: delphi...@yahoogrou <mailto:delphi-en%40yahoogroups.com> ps.com > > Subject: [delphi-en] usb virtual printer > > > > > > > > > > > > Hi,I want to use USB printing support device as an I/O, just like LPT > on > > older PC. > > Does anyone have reference/tutorial for that? > > Thank you. > > > > > > > > > > > > [Non-text portions of this message have been removed] > > > > > > > ------------------------------------ > > ----------------------------------------------------- > Home page: http://groups. <http://groups.yahoo.com/group/delphi-en/> yahoo.com/group/delphi-en/ > To unsubscribe: delphi-en-unsubscr...@...! Groups Links > [Non-text portions of this message have been removed] Disclaimer Legal Notice: By having opened and read this electronic mail, you are deemed to have understood and accepted all disclaimers and conditions pertaining to electronic mail emanating from, and received by The Council for Geoscience, further detail of which may be viewed at the following URL: http://www.geoscience.org.za/disclaimer.htm [Non-text portions of this message have been removed]
