程序段如下:其中A0188为自动增量自段,设为主键
Insert;
FieldByName('A0101').AsString := P_List[0];
FieldByName('A0144').AsDateTime := DateTimeP_A0144.DateTime;
FieldByName('A0191').AsString := Edit_A0191.Text;
FieldByName('DEPT_ID').AsInteger := Dept1.Id;
Post;
A0188 := FieldByName('A0188').AsInteger;执行后,A0188读出永远为0,请问如何才能正确读出该值,谢谢。
Insert;
FieldByName('A0101').AsString := P_List[0];
FieldByName('A0144').AsDateTime := DateTimeP_A0144.DateTime;
FieldByName('A0191').AsString := Edit_A0191.Text;
FieldByName('DEPT_ID').AsInteger := Dept1.Id;
Post;
A0188 := FieldByName('A0188').AsInteger;执行后,A0188读出永远为0,请问如何才能正确读出该值,谢谢。
A0188 := Query1['A0188'];
我都是这样读的啊,没有发现什么不对的问题啊
refresh 看看