Hi
I am having this weird problem.
If I connect to my company network using a 3-modem on my laptop, and run my program against a MySQL database, the connection is dropped when I close my program.
The modem connects again within 30 seconds, but I lose my SSL connection.
If I run in the IDE (Delphi 6), the connection is dropped if I close my program normally, but not if I terminate using Ctrl-F2.
The problem also existed when I was using MyDAC.
Jens Lund
dial-up connection closed
Please, try to execute the following code (you should add the CRVioTcp unit to your uses clause to compile it):
Check, if after executing this code the problem is arised.
Code: Select all
var
tcp: TCRVioTcp;
buf: string;
begin
tcp := TCRVioTcp.Create('localhost', 3306);
try
tcp.Connect;
SetLength(buf, 64);
tcp.Read(PAnsiChar(buf), 0, Length(buf));
sleep(1000);
tcp.Close;
finally
tcp.Free;
end;
end;