테이블에 트랜잭션과 파라미터 이용해서 인서트

테이블에 트랜잭션과 파라미터 이용해서 인서트 하기.

  with ADOConnection1 do begin
    BeginTrans();

    with ADOQuery1 do Begin
      Close();
      SQL.Clear();
      SQL.Add('INSERT INTO member_tbl (member_type,passwd,member_id) VALUES');
      SQL.Add('(:member_type,:passwd,:member_id)');
      Parameters.ParamByName('member_type').Value  := 'S';
      Parameters.ParamByName('passwd').Value := 'S';
      Parameters.ParamByName('member_id').Value := 'wwww';
      ExecSQL;
    end;

    CommitTrans;
  end;