Создание/пересоздание индекса |
Previous Top Next |
Code: |
DbiRegenIndexes( Table1.Handle ); { Регенерация всех индексов } create index (зависит от существования выражения)
if (( Pos('(',cTagExp) + Pos('+',cTagExp) ) > 0 ) then Table1.AddIndex( cTagName, cTagExp, [ixExpression]) // <- ixExpression - _литерал_ else Table1.AddIndex( cTagName, cTagExp, []); |
©Drkb::02709
Взято с http://delphiworld.narod.ru