Topic: Подключение к MySQL

Всем привет.
А как убрать, что бы каждый раз не высвечивалась табличка с данными подключения к бд?

Спасибо smile

Re: Подключение к MySQL

Here is Script....

Begin
{$MySQL disable_connectdialog}
     Form1.MySQLConnection.Server := 'Localhost';
     Form1.MySQLConnection.Port := 3306;
     Form1.MySQLConnection.Username := 'root';
     Form1.MySQLConnection.Password := 'root';
     Form1.MySQLConnection.Database := 'DatabaseName';

     try
         Form1.MySQLConnection.Connect;
     except

         ShowMessage('Can''t connect to database.');
     end;
end;

Re: Подключение к MySQL

StateOne wrote:

Here is Script....

Хм, судя по тому что не выкидывает ошибку - работает. ПРобовал неверные данные - не подключается, ругается.
Но столкнулся с фигней - у меня сделан вход по логину и паролю. Выбор юзера через комбокс.
Без этого скрипта - все отлично.

https://i.ibb.co/hL83xML/111.jpg

Код привязан к форме главной, т.к. к окошку ввода лога и пасса

 frmLogin.MySQLConnection.Server := '127.0.0.1';
     frmLogin.MySQLConnection.Port := 3306;
     frmLogin.MySQLConnection.Username := 'root';
     frmLogin.MySQLConnection.Password := 'password';
     frmLogin.MySQLConnection.Database := 'billsfort';
     try
         frmLogin.MySQLConnection.Connect;
     except
         ShowMessage('Can''t connect to database.');
     end;

Куда бы капнуть?

Re: Подключение к MySQL

к этому скрипту добавьте

  if frmLogin.MySQLConnection.Connected then
  begin
    UpdateDatabase('');
  end; 

Re: Подключение к MySQL

sparrow wrote:

к этому скрипту добавьте

ООО! Вы просто супер все тут ) Спасибо большое )))