@Ayahe_Hasna: gmana caranya menyimpan data pakai ado apabila edit1 misalnya kosong bisa tersimpan?

@Ayahe_Hasna: atau yang tersimpan hanya edit yg ada nilainya?

With Query1 do
               begin
                   if active=true then close;
                   SQL.Clear;
                   SQL.add('insert into mPegawai(NIK, Nm_Pegawai, KdCabang)'+
                           'values(:a0, :a1, :a2)');
                   prepared;
                   parameters[0].Value := edit1.Text;
                   parameters[1].Value := edit2.Text;
                   if edit3.Text='' then parameters[2].Value:=Null else  //misal diedit3 dikosongi
                   parameters[2].Value := edit3;
                  execSQL;
                end;