[SOLVED] TMySQL50Connection and timeout

[Dibo]

Hi,

I'm using TMySQL50Connection. When I don't send any queries for about one minute, every next query fails with errors: MySQL server has gone away. KeepConnection doesn't work (if it does what I think). I know this is server configuration, but how can I keep connection on client side? I can do some kind of timer and send simple query but maybe is any switch?

Regards

[Lacak2]

KeepConnection property is not used at all, so changing it has no effect.
AFAIK there is no "automatic disconnect" feature, so I think, that source of your error message is in another place.

There is api function mysql_options with param MYSQL_OPT_RECONNECT ... http://dev.mysql.com/doc/refman/5.1/en/mysql-options.html

[Dibo]

Thanks for the tip. I found this function in mysql.inc

Code: [Select]

function mysql_options(mysql:PMYSQL; option:mysql_option; arg:Pchar):cint;extdecl;external mysqllib name 'mysql_options';But I don't know how to get a PMYSQL from TMySQL50Connection. It is in private section and there is no public property :/

[Loesje]

The TMySQLConnection.Handle actually returns the PMYSQL you are looking for.

But it's better to add this option to TMysqlConnection, so that you can set it using TMysqConnection.Params. Can you create a bug report for that?

[Dibo]

Thanks, now it works . Sample:

Code: [Select]

uses mysql50

procedure TForm1.Button1Click(Sender: TObject);
begin
  MySQL50Connection1.Connected := True;
  mysql_options(MySQL50Connection1.Handle, MYSQL_OPT_RECONNECT, 'true');
end;

Can you create a bug report for that

Yes, I can. Thanks for help. Must I lock this topic or just add [Solved] to subject?

[Lacak2]

You must fill bug report here: http://bugs.freepascal.org/my_view_page.php

[eara]

thanks LaCak again....

[tsr]

Thanks for this topic, it is still usable in 2016.

I added by myself Timer with setted interval at 2 minutes and in OnTimer procedure I use

Code: Pascal  [Select][+][-]

1. mysql_ping(MySQLConnection.Handle);

Do you think it is a good solution?