[NiiliT]

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

База данных - сделана в MS Access

таблица 1:
-Название "maintable"
Поля:
-id (числовой тип (не счетчик))
-fam (текст)
-name (текст)
-otch (текст)
-sdate (тип дата)
-stype (текст)

Итак. Нужно добваить не через стандартный навигатор (т.е поля для ввода и используя SQL запрос на добавление как я понял).

Плиз подскажите как это организовать.

Добавение

Код:

var
  sSQL: string;
begin
  frmDM.qSQL.Close;
  sSQL := ' insert maintable '
           + '         (fam, name, otch, sdate, stype) '
           + ' values '
           +          (:fam, :name, :otch, :sdate, :stype) ';
  frmDM.qSQL.SQL.Text := sSQL
  frmDM.qSQL.Parameters.ParamByName('fam').Value := edtFam.Text;
  frmDM.qSQL.Parameters.ParamByName('name').Value := edtName.Text;
  frmDM.qSQL.Parameters.ParamByName('otch').Value := edtOtch.Text;
  frmDM.qSQL.Parameters.ParamByName('sdate').Value := edtDate.Date;
  frmDM.qSQL.Parameters.ParamByName('stype').Value := edtType.Text;
  try
    frmDM.qSQL.Open;
  except
  end;
end;

//оптимизируя сам!! .... with, Parsing