Mysql + Delphi

[ToLeG]

Здравствуйте! В делфи я полный "0". Мне нужно подключить базу mysql к delphi, с возможностью редактирования (добавление, удаление, изменение), но я совершенно не представляю как это сделать, поиски по нету ни к чему не привели. Расскажите пожалуйста как это сделать, подробно. Может кто примеры выложит. Заранее спасибо.

Delphi 7
Mysql 5.1.35.

[Levsha100]

Вот
http://programmersforum.ru/showpost....46&postcount=7

[ToLeG]

Вот вроде бы разобрался.. Все работает Запросы выполняет.. Только когда пытаюсь сделать выборку возращает пустые строки. Хотя
в "MySQL Command Line Client" все нормально отображается и все строки заполнены. помогите пожалуйста.


procedure TForm1.btnCreateDBClick(Sender: TObject);
var
I: Integer;
groups: IMySQLQuery;
query_result: IMySQLQuery;
ListItem: TListItem;
Data: PGroupData;
begin
lInfo.Caption := '';

//Создаем базу данных
if MySQL.ExecSQL('CREATE DATABASE ' + eDB.Text + ';') then
begin
MySQL.Database := eDB.Text;
if MySQL.Database <> eDB.Text then
begin
ShowMySQLError;
Exit;
end;
MySQL.ExecSQL('SET CHARSET cp1251');
end;
//Создаем таблицу
if not MySQL.ExecSQL('CREATE TABLE IF NOT EXISTS list(id TINYINT UNSIGNED NOT NULL AUTO_INCREMENT PRIMARY KEY,name VARCHAR(25)) ENGINE = MYISAM CHARACTER SET cp1251 COLLATE cp1251_general_ci;')
then
begin
ShowMySQLError;
Exit;
end;

if not MySQL.ExecSQL('insert into list (name) values ("First");') then
begin
ShowMySQLError;
Exit;
end;

//Получаем данные
query_result := MySQL.Query('select * from list;');
if query_result = nil then
begin
ShowMySQLError;
Exit;
end;
while query_result.FetchRow do
begin
ListItem := lvGroups.Items.Add;
ListItem.Caption := query_result.ValueByName['name'];
New(Data);
Data.id := query_result.ValueByName['id'];
ListItem.Data := Data;
end;
end;

[ToLeG]

Так. Ладно. С этим тоже разобрался. Другой вопрос: Если вносить в базу значения русскими буквами, то когда эти значения получаешь вместо букв знаки вопроса - "?"... Как решить?

[S@fer]

Проблема в кодировке, посмотри эти темы:
http://www.programmersforum.ru/showt...F0%EE%E2%EA%E0
http://www.programmersforum.ru/showt...F0%EE%E2%EA%E0