I'm trying to familiarize with MySql components, using mysql 5.1.
I downloaded the TryMySql example linked from the Wiki page, I've changed TMySQL50Connection to TMySQL51Connection, and set in SQLQuery ParseSQL=False and ReadOnly=true, as suggested, but when I try to run it, the "connect to server" fails with the error "Database not assigned!".
The code I'm using is:

  MySQLConnection1.HostName := HostEdit.Text;
  MySQLConnection1.UserName := UserEdit.Text;
  MySQLConnection1.Password := PasswdEdit.Text;
  MySQLConnection1.DatabaseName := 'mysql'; // MySQL is allways there!
  ShowString('Opening a connection to server: ' + HostEdit.Text);
  MySQLConnection1.Open;

  // First lets get a list of available databases.
  if MySQLConnection1.Connected then begin
    ShowString('Connected to server: ' + HostEdit.Text);
    ShowString('Retreiving list of available databases.');
    SQLQuery1.SQL.Text := 'show databases';
    SQLQuery1.Open; <==== Fails here


This occurs both with Lazarus 1.02 and with Lazarus svn (rev.39655), and fpc 2.6.0, in Linux (FC14) environment. Useless to say that mysql from command line, with identical parameters works as expected. Am I doing something wrong, should I use fpc 2.6.1, set some extra parameter, or what?

Any help is welcome!

Giuliano




--
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to