cxGrid已选择最新日期

时间:2013-04-04 09:54:00

标签: delphi delphi-xe2 delphi-7 delphi-2010 delphi-xe

我的查询返回客人留在酒店的所有日期(start_date和end_date) 如何在查询打开时让cxGrid在网格中选择最新日期(选定)?

通过过滤器或代码?
在输入的所有日期中,我需要最新的日期。

我对在cxGrid中选择日期字段(end_date)到DESC的排序顺序感到不安,因为有时它表现得不可预测。
底层数据库是绝对数据库。

这是我用来获取数据的原因:

procedure TForm1.ABSTable1AfterScroll(DataSet: TDataSet);
begin
 with ABSQuery1 do
 begin
  Close;
  sql.Clear;
   if ABSTable1.FieldByName('GUEST_ID').AsString <> '' then
   begin
    SQL.Text:= 'select * from GUEST_DATA where GUEST_ID = ' +
               ABSTable1.FieldByName('GUEST_ID').AsString ;
    Open;
   end;
 end;
end;

1 个答案:

答案 0 :(得分:2)

您可以使用视图的排序和聚焦

procedure TForm1.aDatasetAfterOpen(DataSet: TDataSet);
begin
  ViewDate.SortIndex := 0;
  ViewDate.SortOrder := soDescending;
  View.Controller.FocusedRecordIndex := View.Controller.TopRecordIndex;
end;