[chellas88]

Все понял. В Try просто нужно было брать весь код связан с sql-запросом

Код:

procedure TForm1.log_buttonClick(Sender: TObject);
begin
try
ZConnection1.Connected := true;
ZQuery1.Connection:= ZConnection1;
userName:= userid.Text;
ZQuery1.SQL.clear;
ZQuery1.SQL.ADD('SELECT * FROM `users` WHERE `userid` ="'+userName+'"');
ZQuery1.Active:=TRUE;


pass:= ZQuery1.FieldByName('password').AsString;
    if (pass = Form1.password.text)
    then
      begin
         Form1.Hide;
         Form2.Show;
      //   Form2.user.Caption:=  zquery1.FieldByName('id').AsString;

      end

    else ShowMessage('Не верный логин или пароль');

except
ShowMessage('Нет связи с сервером');
end;
end;

Еще 2 вопроса. Достаточно одного подключения к БД на всю программу или желательно на каждой форме создавать? И обязательно ли закрывать SQL-запросы после выполнения?