смена пароля в базе данных на delphi

добрый вечер. сделал пароль хранящийся в базе данных но не получается сделать смену пароля. пароль и логин не хочет сохранятся в базе данных подскажите пожалуйста в чем ошибка. изначальные данные логин admin пароль 123.

вот код смены пароля:

Code:

procedure TForm1.Button2Click(Sender: TObject);
var
pas:string;
begin
ClientDataSet1.Filter:='username='''+s+'''';
ClientDataSet1.Filtered:=true;
pas:=InputBox('New password','Enter password','');
ClientDataSet1.Edit;
ClientDataSet1password.AsString:=pas;
ClientDataSet1.Post;
ClientDataSet1.Filtered:=false;

end;

пример базы данных вот:
http://narod.ru/disk/9733970001/%D0%BF%D0%B0%D1%80%D0%BE%D0%BB%D1%8C.rar.html