|
MySQL.RU - Webboard
 Вернуться
 Совместимость LibMySQL.dll с Delphi 2010 (Кылычбек) 28/12/2010 - 16:36:06
 Re: Совместимость LibMySQL.dll с Delphi 2010 (Kylychbek) 28/12/2010 - 16:53:37
> Original message text:
> From: Кылычбек - 28/12/2010 - 16:36:06
> Subject:Совместимость LibMySQL.dll с Delphi 2010
> -----------------
> Здраствуйте У меня такой вопрос Раньше я программировал на Delphi 7 теперь перешел на Delphi 2010 и после перехода все коды которые использует LibMySQL.dll перестали работать точнее они работают нормально связываются с MySQL но при выборе базы данных он не может выбрать базу. Этот же проект в Delphi 7 нормально связываетсы с базой данных. Прошу помочь. (Ваша программа Simple Query тоже так с hosтом связывается но не может выбрать базу http://www.mysql.ru/cgi-bin/download/DelphiMySQL.zip )
>
From: Kylychbek - 28/12/2010 - 16:53:37
Subject:Совместимость LibMySQL.dll с Delphi 2010
-----------------
var
host, user, passwd, db: String;
retval, i: Integer;
begin
connected:= 0;
host:= data1[1];
user:= data1[2];
passwd:= data1[3];
db:= data1[4];
mysql_connect(@mysqlrec, PChar(host), PChar(user), PChar(passwd));
if mysqlrec._net.last_errno = 0 then
begin
// Успешно подключается
ShowMessage ('Successfully connected to server');
connected:= 1;
end
else
begin
ShowMessage (Trim(mysqlrec._net.last_error));
Exit;
end;
retval:= mysql_select_db(@mysqlrec, PChar(db));
if retval <> 0 then
begin
// Вот здесь он выдает "Error attaching to: DB "
ShowMessage('Error attaching to: ' + db);
Exit;
end
else
begin
ShowMessage('Successfully attached to ' + db);
end;
[Это сообщение - спам!]
Последние сообщения из форума
Уважаемые посетители форума MySQL.RU!
Убедительная просьба, прежде чем задавать свой вопрос в этом форуме, обратите внимание на разделы:
- ответы на наиболее часто задаваемые вопросы - FAQ
- раздел документация
- раздел поиск по сообщениям форума и документации
Также, старайтесь наиболее подробно указывать свою ситуацию (версию операционной системы, версию MySQL,
версию программного обеспечения, по которому возникает вопрос, текст возникающих ошибок, и др.)
Помните, чем конкретнее Вы опишете ситуацию, тем больше шансов получить реальную помощь.
37809
|
|
