Si yo estoy usando el IndexName, de la siguiente manera:
Código Delphi
[-]
procedure TForm3.PageControl1Change(Sender: TObject);
begin
If Form3.PageControl1.ActivePageIndex=0 Then
ModuloDatos.TblSocios.IndexName:='Id1'
Else
If Form3.PageControl1.ActivePageIndex=1 Then
ModuloDatos.TblSocios.IndexName:='Id2'
Else
If Form3.PageControl1.ActivePageIndex=2 Then
ModuloDatos.TblSocios.IndexName:='Id3'
end;