RE: Help with Assembler

Try putting a colon after the LPT1  i.e. 'LPT1:"  I use the CreateFile
routine to read the serial ports and I use COM1:, COM2: etc and that
seems to work.

Jeff

> -----Original Message-----
> From: davidmuinos [mailto:[email protected]]
> Sent: 11 July, 2003 17:55
> To: [email protected]
> Subject: Re: [Delphi] Help with Assembler
>
>
> Thanks Jeff I found it, but when i tested the code, i got this
> message error : "Invalid Variant Type Conversion" I have no ideia why
> this is happening. I don't know if i am using it right.
> The code is :
>
> procedure TForm1.FormCreate(Sender: TObject);
> var
> sec : SECURITY_ATTRIBUTES;
> begin
> sec.nLength := 10;
> sec.lpSecurityDescriptor := nil;
> sec.bInheritHandle := TRUE;
> createfile('LPT1',2,1,@SEG,2,3,Null);
> end;
>
> Sorry if I'am annoying you and thanks for everything.
>
> --- In [email protected], "Jeff Steinkamp - N7YG"
> <n7yg@e...> wrote:
> > Dave
> >
> > Before I send you a bunch of files you don't really need, find the
> > Win32SDK.hlp file and launch it by itself.  Use the index and see
> if it
> > will find CreateFile.  If that works, then you have everything you
> need.
> > Just need to include that into the Delphi help environment.
> >
> > Jeff
> >
> > > -----Original Message-----
> > > From: davidmuinos [mailto:davidmuinos@u...]
> > > Sent: 09 July, 2003 14:43
> > > To: [email protected]
> > > Subject: Re: [Delphi] Help with Assembler
> > >
> > >
> > > Thanks guys for helping me.
> > >
> > > Glenn, i am trying to control a box that i made. It has 8 Leds
> and 4
> > > buttons. I want to learn how to control such simple hardware so
> that
> > > i can  , as a next step, control other things that i may connect
> to
> > > the parallel port.
> > >
> > > Jeff, I just have the file win32SDK. If You could send the other
> file
> > > i'd appreciate! I'm using Delphi6 (built 6.163).
> > >
> > > Thanks Again !
> > >
> > >
> > >
> > > --- In [email protected], "Jeff Steinkamp - N7YG"
> > > <n7yg@e...> wrote:
> > > > Not sure which version of Delphi you are using, but you should
> have
> > > the
> > > > help files for  the Win32API and win32SDK in the help folders.
> If
> > > they
> > > > are not there, let me know and I can send you those files and
> you
> > > can
> > > > update your help files.  The files have just about every API
> > > covered.
> > > >
> > > > Jeff Steinkamp
> > > >
> > > >
> > > > > -----Original Message-----
> > > > > From: Glenn B. Lawler [mailto:gblawler@i...]
> > > > > Sent: 09 July, 2003 11:59
> > > > > To: '[email protected]'
> > > > > Subject: RE: [Delphi] Help with Assembler
> > > > >
> > > > >
> > > > > David,
> > > > >
> > > > > > Thanks Glenn for answering my question ! You are right, i
> need
> > > to do
> > > > > > both( input and output ). So you told me that i may need to
> use
> > > the
> > > > > > Windows API,but i haveno ideia how to do that ! Please
> could
> > > you
> > > > > > tell me how ? Because i am a beginner in this subject !
> > > > >
> > > > > Check Delphi help for "OpenFile". This topic should reference
> > > > > the Windows
> > > > > API function for opening a file. I haven't tried this approach
> > > with a
> > > > > device opened for Input/Output, but this is where I would
> > > > > start since it is
> > > > > likely to be the simplest approach.
> > > > >
> > > > > You might get better help from the list on this if describe
> > > > > (briefly) what
> > > > > it is you are trying to do. When you say you want both input
> > > > > and output via
> > > > > the LPT port, it sounds like you are trying to control some
> > > > > device that is
> > > > > not a printer. If, on the other hand, you are trying to
> > > > > control a printer
> > > > > that talks back through the LPT port, there are specific API
> > > > > calls that
> > > > > address virtually all the printer issues.
> > > > >
> > > > > HTH,
> > > > >
> > > > > - Glenn Lawler
> > > > >
> > > > >
> > > > > ------------------------ Yahoo! Groups Sponsor
> > > > > ---------------------~-->
> > > > > Buy Ink Cartridges at Myinks.com - Save 80%. Quality inkjet
> > > > > cartridges &
> > > > > refill kits! FREE s/h on $50 orders to the US & Canada. Fast
> > > shipping.
> > > > > http://www.c1tracking.com/l.asp?cid=5511
> > > > > http://us.click.yahoo.com/hwZBYB/zoVGAA/ySSFAA/i7folB/TM
> > > > > --------------------------------------------------------------
> > > > > -------~->
> > > > >
> > > > > Delphi Tips & Tutorials...
> > > > > http://www.delphicollection.com
> > > > > --------------------------------------------------------------
> -
> > > > > Unsubscribe:[email protected]
> > > > > List owner:[email protected]
> > > > > --------------------------------------------------------------
> -
> > > > >
> > > > > Your use of Yahoo! Groups is subject to
> > > > > http://docs.yahoo.com/info/terms/
> > > > >
> > > > >
> > > > >
> > >
> > >
> > > ------------------------ Yahoo! Groups Sponsor
> > > ---------------------~-->
> > > Buy Ink Cartridges at Myinks.com - Save 80%. Quality inkjet
> > > cartridges &
> > > refill kits! FREE s/h on $50 orders to the US & Canada. Fast
> shipping.
> > > http://www.c1tracking.com/l.asp?cid=5511
> > > http://us.click.yahoo.com/hwZBYB/zoVGAA/ySSFAA/i7folB/TM
> > > --------------------------------------------------------------
> > > -------~->
> > >
> > > Delphi Tips & Tutorials...
> > > http://www.delphicollection.com
> > > ---------------------------------------------------------------
> > > Unsubscribe:[email protected]
> > > List owner:[email protected]
> > > ---------------------------------------------------------------
> > >
> > > Your use of Yahoo! Groups is subject to
> > > http://docs.yahoo.com/info/terms/
> > >
> > >
>
>
> ------------------------ Yahoo! Groups Sponsor
> ---------------------~-->
> Buy Ink Cartridges or Refill Kits for Your HP, Epson, Canon or Lexmark
> Printer at Myinks.com. Free s/h on orders $50 or more to the
> US & Canada.
> http://www.c1tracking.com/l.asp?cid=5511
> http://us.click.yahoo.com/sOykFB/k9VGAA/ySSFAA/i7folB/TM
> --------------------------------------------------------------
> -------~->
>
> CodeCoffer - new Delphi code protection Tool!
> http://www.delphicollection.com/public/CodeCoffer.htm
> ---------------------------------------------------------------
> Unsubscribe:[email protected]
> List owner:[email protected]
> ---------------------------------------------------------------
>
> Your use of Yahoo! Groups is subject to
> http://docs.yahoo.com/info/terms/
>
>
>



------------------------ Yahoo! Groups Sponsor ---------------------~-->
Buy Ink Cartridges or Refill Kits for Your HP, Epson, Canon or Lexmark
Printer at Myinks.com. Free s/h on orders $50 or more to the US & Canada.
http://www.c1tracking.com/l.asp?cid=5511
http://us.click.yahoo.com/sOykFB/k9VGAA/ySSFAA/i7folB/TM
---------------------------------------------------------------------~->

CodeCoffer - new Delphi code protection Tool!
http://www.delphicollection.com/public/CodeCoffer.htm
---------------------------------------------------------------
Unsubscribe:[email protected]
List owner:[email protected]
--------------------------------------------------------------- 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/