[ecfisa]

Hola impadrón.

Para obtener 'n' números decimales:

...
#include <math.h>
...
double NumNDec(double Num, int Dec)
{
 return ((float)(int)(Num*exp(log(10)*Dec))/exp(log(10)*Dec));
}

Uso:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
double pi= 3.141592654;
   for(int i=1; i< 5; i++)
     ListBox1->Items->Add(FloatToStr(NumNDec(pi,i)));
}

Saludos.