Example: IndexDefs, Update, Count, Items, IndexName, Fields, Name

Top Previous Next

This example uses the IndexName property to sort the records in a table on the CustNo and OrderNo fields.

MySQLTable1.Active := False;
// Get the current available indexes
// Find one which combines Customer Number ('CustNo')
// and Order Number ('OrderNo')
for I := 0 to MySQLTable1.IndexDefs.Count - 1 do
  if MySQLTable1.IndexDefs.Items[I].Fields = 'CustNo;OrderNo' then
// Set that index as the current index for the table
    MySQLTable1.IndexName := MySQLTable1.IndexDefs.Items[I].Name;
MySQLTable1.Active := True;