Delphi и удалённый MySQL-сервер

[PHP2Delphi]

Начал учить Turbo Delphi после PHP.
Хочу программой под Win достучаться до Удаленного MySQL-сервера,
на котором у меня есть базы данных, и хостер может изменить версию MySQL - не могу запретить.
На РНР таких проблем не было - годами программа без изменений
смотрела таблицы БД на разных доступных мне серверах
с периодическими обновлениями версий MySQL (и на localhost и на удалённых)
- примерно так:

PHP код:

$conn1= mysql_connect ('192.168.1.22', 'ivan', 'fh4gf3kk5');    // соединить PHP-программу с MySQL-сервером 'mysql_host',  'mysql_user', 'mysql_password'

$db1= mysql_select_db ('zvery'); // выбрать базу данных

$result = mysql_query ('SELECT * FROM pets'); // получить ответ MySQL-ля на запрос от РНР

$table1='<table>';
while ($Line= mysql_fetch_array ($result, MYSQL_ASSOC) )  // пройтись по записям ответа
{ $table1.='<tr><td>'.$Line['pet_name'].'</td></tr>';  // обработать каждую запись
       };
$table1.='</table>';

print $table1; // выдать ответ PHP-сервера удалённому броузеру. 


Как такое сделать на Delphi ?
Есть аналоги использованных здесь процедур ?
Помогите найти короткий путь. В какую сторону рыть?

[Stilet]

Как такое сделать на Delphi.

Ищи в своем Делфи компоненты ADO. Если найдешь то используй ADOQuery, в котором создай строку подключения (в инспекторе объектов по идее). Откроется мастер подключений, где ты укажешь провайдер мускула (он должен быть установлен в ODBC), в нем сами характеристики подключения.
Если компонентов нет можно изучить работу ADO через WIN API (http://msdn.microsoft.com/en-us/libr...=vs.85%29.aspx).
Если через ADO не устраивает, придется изучать работу с мускулом либо на уровне сторонних компонентов или как-то по другому.

Есть аналоги использованных здесь процедур.

Если через ADOQuery то выглядеть может так:

with ADOQiery1 do begin
 sql.text:='SELECT * FROM pets';
 Active:=true;
 table1:='<table>';
 while not eof do begin
  table1:=table1+'<tr><td>'+FieldByName('pet_name').AsString+'</td></tr>'
  Next;
 end;
 Active:=false;
 table1:=Table+'</table>';
end;

[PHP2Delphi]

Есть такой компонент. Посмотрел в книгу - понял, что не скоро
смогу проверить вторую часть вашего ответа.



Пока спасибо. Вторая часть ответа меня очень обнодёживает.
Нужно подучиться...

И ещё: можно будет c помощью этого сделать EXE, запускающийся с любого компьютера
и показывающий мою таблицу с MySQL-сервера
без установки на РС разных дополнительных драйверов, систем и прочих файлов?

[zevsnedv]

Не так то все просто с удаленным подключением на Делфи. Мне на работе тоже такую задачу поставили, шеф хочет программку такую, чтоб кнып и в окошен была последняя обновленная инфа на нашем портал, чтоб он не рылся и не читал все старое. В общем маразматик. Но не это главное, главное, что АДО это не единственный вариант, а ко всему прочему я его так и не смогла прикрутить. Все дело в драйвере, не находит сервер, то еще какая ерунда. В общем понемногу продвигаюсь но очень слабо. Буду рада если кто исходник кинет по данной теме. Не важно он рабочий или нет, я все равно в нем свои плюсы выковыряю) Спасибо!