procedure TForm11.dxBarEdit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if key = 13 then
    ShowMessage('1');
end;

解决方案 »

  1.   

    第一次回车 你发现没   dxbaredit1.text  是不是为空  只有你回车才能确定输入内容   
    procedure TForm11.dxBarEdit1KeyDown(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
      if key = 13 then
        ShowMessage(dxBarEdit1.Text);  //一次回车 看看是不是空值?
    end;
      

  2.   


    我没装好dxbaredit控件,我用的cxtextedit测试的,只回一次车即可。
      

  3.   

    设置你的 dxBarManager 的 AlwaysSaveText 属性为 True,就会自动保存你所输入的文本。