Topic: Подключение к MySQL
Всем привет.
А как убрать, что бы каждый раз не высвечивалась табличка с данными подключения к бд?
Спасибо
My Visual Database → Russian → Подключение к 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;
exceptShowMessage('Can''t connect to database.');
end;
end;
Here is Script....
Хм, судя по тому что не выкидывает ошибку - работает. ПРобовал неверные данные - не подключается, ругается.
Но столкнулся с фигней - у меня сделан вход по логину и паролю. Выбор юзера через комбокс.
Без этого скрипта - все отлично.
Код привязан к форме главной, т.к. к окошку ввода лога и пасса
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;
Куда бы капнуть?
к этому скрипту добавьте
if frmLogin.MySQLConnection.Connected then
begin
UpdateDatabase('');
end;
к этому скрипту добавьте
ООО! Вы просто супер все тут ) Спасибо большое )))
My Visual Database → Russian → Подключение к MySQL
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi