循环显示数据库的资料(41)

  • 主题发起人 主题发起人 terry_zhou82
  • 开始时间 开始时间
T

terry_zhou82

Unregistered / Unconfirmed
GUEST, unregistred user!
具体代码如下:if table1.eof then table1.first else table1.next;end;....现在的问题是,只想显示数据表中符合某些特定条件的记录,(如日期等于今天).应该写在哪里呢,试过加在table1.first前面加if table1.fieldbyname('date').asdatetime=now then....不过好像没有什么用啊
 
没高手知道啊
 
建议使用query吧,如adoquery等另外,不知道你的数据中途是否变化,如果变化则把query再执行一次刚刚好
 
//遍历数据Open; While Not Eof Do Begin Next; End; Close;
 
=now 什么意思?精度太高,基本不会有符合数据。
 
我写了,但是好像还是不行procedure TForm2.Timer1Timer(Sender: TObject);begin//form1.abstable2.filtered:=False;Label1.Caption :=FormatDateTime('HH:mm',form1.ABSTable2.FieldByName('提醒时间').Asdatetime) ;label2.Caption :=Form1.ABSTable2.FieldByName('提醒内容').AsString ;form1.abstable2.filter:=......form1.ABSTable2.Filtered :=true;form1.ABSTable2.Open ;if (Form1.ABSTable2.eof) thenbegin Form1.ABSTable2.first; end else Form1.ABSTable2.next;end;
 
简单 ,在table1的onfilterrecord里添加代码就ok的if 条件 then Accept := False;//满足条件就不显示,自己写就ok的。hoho。。
 
不过我推荐你使用adoquery控件。功能更强大的。
 
用adoquery控件 dd
 
帮顶,接分
 
query里面怎么写啊?
 
Query控件,写入你需要的SQL语句.Query.SQL.Clear;Query.SQL.Text:='select * from date=:Paradata';Query.Parementers.pareByname('ParaData').asdatatime:=now();Query.open;
 
后退
顶部