[Re3oFFer]

вот так должно получится???

procedure TForm2.Button1Click(Sender: TObject);
begin
with Form1.ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add (' Insert into spravo4nik (Name,Doljnost,gazov,gorodskoy,sotov,' );
SQL.Add (' ip,fax,portativnaya,mobile,stacionar,abonent,kabinet)' );
SQL.Add (' values (:Name,:Doljnost,:gazov,:gorodskoy,:sotov,:ip,:fax,)' );
SQL.Add (' values (:portativnaya,:mobile,:stacionar,:abonent,:kabinet)' );
Parameters.ParamByName('Name,Doljnos,gazov,gorodskoy,sotov,ip,fax,portativnaya,mobile,stacionar,abonent,kabinet');
ExecSQL;
SQL.Text:='select * from spravo4nik';
Open;