[Помогите!] Составить запрос для добавления данных в БД MySQL

[qwert-yg]

Цитата: form1.SimpleDataSet1.Active:=false; for i:=0 to 8 do a[i]:=smemo1.Lines[i]; form1.SimpleDataSet1.DataSet.CommandText:='INSERT INTO games_login (name,vosrost,mesto,time_game,stil,on_line,skype,t op) VALUES (a[0],a[1],a[2],a[3],a[4],a[5],a[6],a[7]);'; form1.SimpleDataSet1.Active:=true;

[Ссылки могут видеть только зарегистрированные пользователи. ]
Сначало заполняю в мемо 8 строк, потом хочу это в БД внести. Код по кнопке выполняется код который я указ-ал выше, ошибка при нажатии [Ссылки могут видеть только зарегистрированные пользователи. ]

Добавлено через 35 минут

Цитата: procedure TForm1.sBitBtn1Click(Sender: TObject); var a: array [0..7] of string; i: integer; stroka: string; begin form1.SimpleDataSet1.Active:=false; for i:=0 to 8 do a[i]:=smemo1.Lines[i]; stroka:='"' + a[0] + '", "' + a[1] + '", "' + a[2] + '", "' + a[3] + '", "' +a[4] + '", "' + a[5] + '", "' + a[6] + '", "' +a[7] + '"'; form1.SimpleDataSet1.DataSet.CommandText:='INSERT INTO games_login (name,vosrost,mesto,time_game,stil,on_line,skype,t op) VALUES (' + stroka + ')'; form1.SimpleDataSet1.Active:=true; end;

Попробовал такой код, не помогло