Q&A

  • 새레코드추가시, DBCombobox의 디폴트값을 지정할수없나요?


새레코드추가시, DBCombobox의 디폴트값을 지정할수없나요?

(양,음력 중 양력을 디폴트로 하고싶어요)



DM.DataSource1.DataSet.Last;

DM.DataSource1.DataSet.Append; //추가

FrmClientAdd.DBComboBox2.ItemIndex := 0;





//아래코딩으로는 최초한번은 되는데,

//DBGrid에서 다른레코드 클릭하고, 추가하면 안된다.

procedure TFrmClientAdd.FormShow(Sender: TObject);

begin

if DM.ADOQryClient.RecNo < 1 then //실제로 -1이 된다.

DBComboBox2.ItemIndex := 0;



end;



(디자인시, DBComboBox2=> (양력,음력) 2가지아이템설정.)





1  COMMENTS
  • Profile
    coolling 2000.11.07 03:42
    onEnter이벤트에 초기 설정을 해두면 될것 같은데...

    test 해보지는 않아서 확실하지는 않습니다..



    won wrote:

    >

    > 새레코드추가시, DBCombobox의 디폴트값을 지정할수없나요?

    > (양,음력 중 양력을 디폴트로 하고싶어요)

    >

    > DM.DataSource1.DataSet.Last;

    > DM.DataSource1.DataSet.Append; //추가

    > FrmClientAdd.DBComboBox2.ItemIndex := 0;

    >

    >

    > //아래코딩으로는 최초한번은 되는데,

    > //DBGrid에서 다른레코드 클릭하고, 추가하면 안된다.

    > procedure TFrmClientAdd.FormShow(Sender: TObject);

    > begin

    > if DM.ADOQryClient.RecNo < 1 then //실제로 -1이 된다.

    > DBComboBox2.ItemIndex := 0;

    >

    > end;

    >

    > (디자인시, DBComboBox2=> (양력,음력) 2가지아이템설정.)

    >

    >