摘要:
beginwith Table1 dobegin Active := False; DatabaseName := 'DOCTOR'; TableType := ttParadox; TableName := 'DOCTORINF23'; if not Table1.Exists then begin with FieldDefs do begin Clear; with AddFieldDef ... 阅读全文
posted @ 2005-11-24 08:58
DELPHI技术
阅读(1118)
评论(0)
推荐(0)
浙公网安备 33010602011771号