Пытаюсь записать данные в ячейки таблицы

[Anton911]

Разрабатываю дипломную, шахматы с мультиплеером, но это уже все готово, осталось связать игру с базой данных, сначала использовал текстовые файлы, но преподаватель против, говорит делай мне базу данных, ну и ладно.
Почитал статейки, и никак не пойму, пытался делать так.

В базе данных есть таблица "Игроки", в этой таблице есть поля "Имя" и "Пароль".

procedure Test(Name,Password:string);
BEGIN
with Form_Server.ADOQuery do
    begin
    Close;
    SQL.Clear;
    SQL.Text:=' SELECT * FROM [Игроки] ' ;
    Open;
    Insert;
    FieldByName('Имя').AsString:=Name;
    FieldByName('Пароль').AsString:=Password;
    ExecSQL;
    end;
END;

Нужно в базу данных в таблицу "Игроки" записать нового игрока: "Имя", "Пароль".
Приложение работает, но в базу данных ничего не записывается. В чем ошибка, как исправить?

[vovk]

procedure Test(Name,Password:string);
BEGIN
with Form_Server.ADOQuery do
    begin
    Close;
    SQL.Clear;
    SQL.Text:=' insert into [Игроки]([Имя], [Пароль]) values (:name_,:password_) ' ;
    Parameters.ParamByName('name_').AsString:=Name;
    Parameters.ParamByName('password_').AsString:=Password;
    ExecSQL;
end;
end;

PS
Лучше не используйте кириллицу в названиях таблиц, полей и тп.

[Anton911]

vovk, при компиляции ошибка, наводит на эти строчки:

Parameters.ParamByName('name_').AsString:=Name;
Parameters.ParamByName('password_').AsString:=Password;

И пишет E2003 Undeclared identifier: 'AsString'.

[Slym]

   Insert;
    FieldByName('Имя').AsString:=Name;
    FieldByName('Пароль').AsString:=Password;
   Post;

[Anton911]

Спасибо всем, кто помогал, всем +

[vovk]

Сообщение от Anton911

vovk, при компиляции ошибка, наводит на эти строчки:

Parameters.ParamByName('name_').AsString:=Name;
Parameters.ParamByName('password_').AsString:=Password;

И пишет E2003 Undeclared identifier: 'AsString'.

хех действительно

Parameters.ParamByName('name_'):=Name;
Parameters.ParamByName('password_'):=Password;

[Anton911]

Вновь нужна ваша помощ)
Написал функцию, которая авторизирует пользователя из базы данных, она работает, теперь же пытаюсь сделать так, чтобы при авторизации считывалась информация побед и поражений, и не получается.

function bd_Autorization(pName,pPassword:string):integer;
var Res,Vict,Loos:integer;
BEGIN
Res:=0;
with Form_Server.ADOQuery do
    Begin
    Close;
    SQL.Clear;
    SQL.Text:=
      Format('SELECT * FROM [Игроки] ' +
          'WHERE [Имя] ="%s" AND [Пароль] ="%s"',
          [pName, pPassword]);
    Open;
    If RecordCount > 0 then
      Begin
      Res:=1;
      Close;
      SQL.Clear;
      SQL.Text:='SELECT * FROM [Игроки] WHERE [Имя]='+pName; //Находим ячейку с нужным именем
     // Open;
      Vict:=FieldByName('Победы').Value; //Читаем из ячейки победы
      Loos:=FieldByName('Поражения').Value; //Читаем из ячейки поражения
      ExecSQL;
      End Else
      Begin
      Res:=2;
      End;
    End;
Result:=Res;
showmessage('Vict='+inttostr(Vict)+' Loos='+inttostr(Loos));
END;

Пишет невозможно найти "Победы", "Поражения", как исправить?

[vovk]

Сначала прекратите использовать имена на кириллице.

ЗЫ
попробуйте FieldByName('[Победы]').Value;

но прекратите геморроится, используйте имена на латинице

[Stilet]

      Format('SELECT * FROM [Игроки] ' +
          'WHERE [Имя] =:"%s" AND [Пароль] =:"%s"',
          [pName, pPassword]);

В запросе перед параметрами нужно ставить знак двоеточия - так СУБД определяет что тут параметр, а ты не поставил, когда запрос форматировал.
И еще: ExecSQL; не выполняет SELECT запрос. Пиши Open
P.S. Кста, а зачем тут функция Format?

P.P.S. Кста, только что заметил, что автор вообще не использует параметры в запросе. Нет там ни слова Победы, ни слова Поражения в любом их проявлении. Ессно оно ругается.

[Аватар]

Stilet, TC пытается просто выдернуть значения полей из не активизированного ADOQuery