Q
quiben
Unregistered / Unconfirmed
GUEST, unregistred user!
各位高手:<br> 在下目前碰到一难题,请帮解决:<br>aName: String;<br> i: Byte;<br> aExclusive, aActive: Boolean;<br> with Table1 do<br> begin<br> aActive := Active;<br> Close;<br> TableName := ATableName;<br> aExclusive := Exclusive;<br> Exclusive := True;<br> IndexDefs.Update;<br> I := IndexDefs.Count;<br> while I > 0 do<br> begin<br> aName := IndexDefs.Items[I-1].Name;<br> DeleteIndex(aName);<br> Dec(i);<br> end;<br> AddIndex('','DBID',[ixPrimary, ixUnique]);<br> IndexDefs.Update;<br> Exclusive := aExclusive;<br> Active := aActive;<br> Check(DbiSaveChanges(Table1.Handle));<br> end;<br>当跟踪调试到Check(DbiSaveChanges(Table1.Handle))时,出现"Invalid Handle",不知是何<br>原固???