Проблема с добавлением в БД

[VenMaster]

Ну вобщем у меня есть добавление в таблицу Users через Query, так же есть проверка на создание юзера с одинаковым Логином.
Так проблема в том что данные в таблицу добавляются после закрытия приложения, хотя если не закрывать то пользователя с таким именем уже создать нельзя будет писать "мол такой пользователь существует", хотя в БД его еще нет.
Можно ли сделать чтоб он сразу добавлялись???

[Stilet]

проблема в том что данные в таблицу добавляются после закрытия приложения

А это код смотреть надо... Телепаты как всегда в отпуске.

[VenMaster]

procedure TFRegist.Button1Click(Sender: TObject);
var
sql:string;
begin
sql:='SELECT * FROM users WHERE Login="'+Edit1.text+'"';
Query1.SQL.TEXT:=sql;
Query1.prepare;
Query1.open;
if(query1.RecordCount=1) then
begin
showmessage('Данный акаунт уже существует, введите другой логин');
Edit1.Text:='';
end else
begin
Query1.Active:=False;

if ((MaskEdit1.Text=MaskEdit2.Text) AND (MaskEdit1.Text<>'') and (edit1.Text<>'') and (edit2.Text<>'') and (edit3.Text<>'') and(edit4.Text<>'')) then
begin
UpdateSql1.DatabaseName:='Data\';
sql:='INSERT INTO users(Login, Pass, Name, Surname, Grup, Admin) VALUES("'+Edit1.Text+'","'+MaskEdit 1.text+'","'+Edit2.Text+'","'+Edit3 .text+'","'+Edit4.Text+'",false)';
UpdateSQL1.InsertSql.TEXT:=sql;
UpdateSql1.ExecSQL(ukInsert);
Showmessage('Данные добавлены');
Edit1.text:='';Edit2.Text:='';Edit3 .Text:='';
Edit4.Text:='';Maskedit1.Text:=''; Maskedit2.Text:='';
end
else
begin

ShowMessage('Введенные пароли не совпадают или есть незаполненные поля');
Label2.Font.Color:=clred;
Label1.Font.Color:=clred;
MaskEdit1.Text:='';
MaskEdit2.Text:='';
end;
end;
end;

[D-mon]

А чем коннектишься?

[VenMaster]

Сообщение от D-mon

А чем коннектишься?

в Query прописываю data\
Или я может чето не понял???

[D-mon]

Я бы посоветовал бы всязку:
IBDatabase1->IBTransaction1->IBQuery1
И тут у IBTransaction1.Commit; - обновляет записи.
Я так делаю, наньше делал как ты. и тоже самое было, не обновлялось.

[VenMaster]

А вроде IBQuery это для сетевых БД вроде??? а у мну локальная

[D-mon]

А какая разница??? Что сетевая что локальня??? Только в IP (у локальной 127.0.0.1).
А вообще у IBDatabase есть 2-ва вада коннекта. Можно выбрать в Database Component Editor-> Local or Remoute

[Pitbull]

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

Ну вобщем у меня есть добавление в таблицу Users через Query, так же есть проверка на создание юзера с одинаковым Логином.
Так проблема в том что данные в таблицу добавляются после закрытия приложения, хотя если не закрывать то пользователя с таким именем уже создать нельзя будет писать "мол такой пользователь существует", хотя в БД его еще нет.
Можно ли сделать чтоб он сразу добавлялись???

А даннЫе сразу и добавляются, просто нужно обновить запрос...