Helen Borrie wrote:

> This will get the header stats and then iterate through the indexes,
> delivering the stats into a TMemo:
>
> procedure YourForm.btnStatsClick(Sender:TObject);
> begin
> with IBOStatisticalService1 do
> begin
> ServerName :='YourServer';
> DatabaseName :='YourDBAlias'; // assuming Firebird 1.5
> Protocol := TCP_IP;
> LoginPrompt :=False;
> Params.Add('user_name=sysdba');
> Params.Add('password=masterkey');
> Active :=True;
> ServiceStart;
> try
> Options :=[HeaderPages,IndexPages,DBLog ];
> YourLogMemo.Lines.Clear;
> While not Eof do
> YourLogMemo.Lines.Add(GetNextLine);
> finally
> Active :=False;
> end;
> end;
>
> Helen

There are many UNIQUE indexes, i.e. not input as INDEXes but as UNIQUE
statements. These do not appear. Is this a bug or as designed?

Raymond.