On 02/01/2008, Michael Van Canneyt <[EMAIL PROTECTED]> wrote:
>
> Yes, but it should be
>
> SerSetParams(serialhandle, 2400, 8, NoneParity, 1, [RtsCtsFlowControl]);
>
> No ?
I have no idea! :-)
OK, I changed the code to the following... I it should do, is take
the modem off the hook... nothing happens. :-(
-------------------------
serialhandle := SerOpen('/dev/ttyS0'); // COM1 under Linux
if serialhandle = -1 then
writeln('Failed to open port');
SerSetParams(serialhandle, 2400, 8, NoneParity, 1, [RtsCtsFlowControl]);
s := 'ATH1' + #13;
SerWrite(serialhandle, s, Length(s));
-------------------------
> Also, 2400 baud seems very slow ?
That should not be a issue. All that the code is supposed to do is
dial the phone, nothing else (hence the reason I didn't even bother
with the SerSetParams call in the beginning). The end result should
allow the user to click a button next to a phone number and the modem
dials the number for the user. No other communication happens.
Anyway, I tried 19200 speed as well, but as expected, no change. This
has been driving me insane for a few days now. Grey hairs popping up
all over the place! :-)
Regards,
- Graeme -
_______________________________________________
fpGUI - a cross-platform Free Pascal GUI toolkit
http://opensoft.homeip.net/fpgui/
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
