procedure TForm1.Button2Click(Sender: TObject); var R: Variant; begin R := MemTableEh1.Lookup('Name',Edit1.Text,'Name'); if not VarIsNull(R) then ShowMessage(R); end;
delphi数据集查找不定位
猜你喜欢
转载自www.cnblogs.com/jijm123/p/11269176.html
今日推荐
周排行