Solved

I want Get and Put one byte to Serial Port (2F8 or 3F8) in Windows 98/XP/NT/2000

Posted on 2006-07-18
8
334 Views
Last Modified: 2010-04-05
Hi ti all,

I want Get and Put one byte to serial port (2F8 or 3F8) in Windows 98/XP/NT/2000, anyone can help me, I will be very happy and thaksfull.

Thanks in advanecd,
A.R. Rafiee
www.mart.ir
www.laserayaneh.com
0
Comment
Question by:laserayaneh
8 Comments
 
LVL 17

Expert Comment

by:Wim ten Brink
Comment Utility
Read:
http://www.arunet.co.uk/tkboyd/ele1sp.htm
http://www.efg2.com/Lab/Library/Delphi/IO/PortIO.htm

Keep in mind that NT/2000/XP have implemented a security layer which won't allow you direct access to the serial ports. This should still be possible in 98/ME. Thus you might end up with two different solutions.
0
 
LVL 14

Expert Comment

by:Hamidreza Vakilian
Comment Utility
Hi!

How to Handle Serial Communication Tutorial by
Jan Taralczak =>

http://www.torry.net/samples/samples/hard/com_io.zip

HRV
0
 
LVL 22

Expert Comment

by:mnasman
Comment Utility
You could using TComPort for serial communication, and it's open source
http://sourceforge.net/projects/comport/

and look for this example
http://www.wimb.net/index.php?s=delphi&page=11


also if you need advanced serial communication libarary and more, you could  using Async Pro, it's open source too ;-)
http://sourceforge.net/projects/tpapro/
0
Find Ransomware Secrets With All-Source Analysis

Ransomware has become a major concern for organizations; its prevalence has grown due to past successes achieved by threat actors. While each ransomware variant is different, we’ve seen some common tactics and trends used among the authors of the malware.

 
LVL 6

Expert Comment

by:House_of_Dexter
Comment Utility
Check out Async...source code available...

http://sourceforge.net/projects/tpapro/
0
 

Author Comment

by:laserayaneh
Comment Utility
Hi to All,
 Thanks in advance for all comments ;-)

 I want use ReadPort(PortAddress) and WritePort(PortAddress, OneByte) in Windows XP and Windows 2000 and Windows NT, I can use this functions in Win98 and Win98SE , but this functions don't work under Windows XP/Windows 2000/Windows NT, Please help me how to use this funtions under Windows XP and Windows 2000 and Windows NT.

Thanks in advanced,
AliReza Rafiee
http://www.mart.ir
http://www.laserayaneh.com
0
 
LVL 6

Accepted Solution

by:
House_of_Dexter earned 100 total points
Comment Utility
You can't  as been stated...you can't get direct access to the hardware...but you can work around it...

http://www.grahamwideman.com/gw/tech/Delphi/iopm/index.htm
Code...
http://www.grahamwideman.com/gw/tech/Delphi/iopm/gwiopm.zip
0

Featured Post

IT, Stop Being Called Into Every Meeting

Highfive is so simple that setting up every meeting room takes just minutes and every employee will be able to start or join a call from any room with ease. Never be called into a meeting just to get it started again. This is how video conferencing should work!

Join & Write a Comment

In this tutorial I will show you how to use the Windows Speech API in Delphi. I will only cover basic functions such as text to speech and controlling the speed of the speech. SAPI Installation First you need to install the SAPI type library, th…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
In this seventh video of the Xpdf series, we discuss and demonstrate the PDFfonts utility, which lists all the fonts used in a PDF file. It does this via a command line interface, making it suitable for use in programs, scripts, batch files — any pl…
You have products, that come in variants and want to set different prices for them? Watch this micro tutorial that describes how to configure prices for Magento super attributes. Assigning simple products to configurable: We assigned simple products…

772 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

12 Experts available now in Live!

Get 1:1 Help Now