Q&A

  • Dbgrid 에서 Data 입력 시
한수 부탁드립니다.



dbgrid 에서 data 입력을 하는데 각컬럼에서 엔터키를 치면

입력한값을 받아 그값(문자나 그리고 숫자) 을 검증하여

아래 예처럼 사용하려 합니다

하지만 아래예에서는 때론 될때도 있고 않될때도 있습니다.

더좋은 방법을 부탁드립니다.



procedure TFmain.DBGrid1KeyPress(Sender: TObject; var Key: Char);

var ii:integer;

begin

if key=#13 then begin

case dbgrid1.SelectedIndex of

0:begin

ii:=query1.fieldbyname('bo').asinteger;

if query1.Modified then

query1.fieldbyname('cost').asinteger:=ss*query1.fieldbyname('price').asinteger;



0  COMMENTS