读取excel到dbgrid并进行比较,熟悉excel读取操作用。
rocedureTForm1.openxls(MyTable:TADOTable;mytabelname:string);
varCol,Row:Integer;
stemp:string;
begin
ifself.OpenDialog1.Executethen
begin
MyTable.Close;
stemp:='deletefrom'+mytabelname;
withself.ADOQuerytempdo
begin
close;