Apro Exception on Windows 2000

[Manny Martinez]

Good morning,
I am having the following problem on Windows 2000. I wrote an application to
print directly to the RS232 ports and LPTports using Delphi4 and Async Pro
2.5, All worked fine on Windows 95/ME, however when we updated machines to
Windows 2000, on opening the port we get a message "apro exception". I did
not find any documentation that refers to this exception. What is it and how
do I fix it?

I am using Delphi4 with no patches applied, Async pro 2.57 released March
1999 and am writing to the rs232 with the TapdComport component. The
exception happens when the port is opened through the PutString procedure.

[duncan gold [TurboPower]]

Manny,

I have seen messages like this pop up when the port is already open (in most
cases it gives a more meaningful message, but I have also seen the behavior
that you are describing.

You can check if this is the case by setting ShowPortsInUse to false and
then making a call to IsPortAvailable for the port in question. This method
is in AdSelCom, so you will need to add that to your uses clause.

--
duncan gold [TurboPower]
TurboPower: http://www.turbopower.com
Personal: http://www.autowitch.org

"Manny Martinez" <mannym...@hotmail.com> wrote in message
news:$t7mQVF#BHA....@tpsmail01.turbopower.net...

[Malcolm Foo]

"duncan gold [TurboPower]" <dunc...@turboSPAMpower.com> wrote in message
news:Eri7rBq#BHA....@tpsmail01.turbopower.net...

> Manny,
>
> I have seen messages like this pop up when the port is already open (in
most
> cases it gives a more meaningful message, but I have also seen the
behavior
> that you are describing.
>
> You can check if this is the case by setting ShowPortsInUse to false and
> then making a call to IsPortAvailable for the port in question. This
method
> is in AdSelCom, so you will need to add that to your uses clause.

That may not help. I have seen this problem when there is a printer defined
on the NT or 2000 machine that is set up to use the COM port you are trying
to open. APRO does not recognise the generated exception so gives an 'apro
exception' error. A work around would do something like this
---------------------------
uses Adexcept;
...
try
...
except
on E : EAPDException do
if (E.ErrorCode = 0) or (E.Message = 'Apro execption') do
begin
ShowMessage('Error using Com port, please select another');
...
end;
end;
-----------------------------
Regards,
John Morris
jh...@hotmail.com

[Manny Martinez]

Thanks Malcom,
I found that there was a printer driver connected to the comport I was
trying to use.

Manny
"Malcolm Foo" <malc...@alfatron.com.au> wrote in message
news:HZ70EuIA...@tpsmail01.turbopower.net...

[Mike Welch [TurboPower Software]]

Great, I like it when it's not our fault<g>

--
Mike Welch (TurboPower Software)
Please reply to the newsgroups
God bless America
------------------------

"Manny Martinez" <mannym...@hotmail.com> wrote in message

news:jkNdCfnA...@tpsmail01.turbopower.net...