[ecfisa]

Hola Negriz.

Sumo un ejemplo más:

void __fastcall TForm1::FormShow(TObject *Sender){
 AnsiString Param;
 for (int i=1; i <= ParamCount(); i++)
   Param = Param +' '+ ParamStr(i);
 Caption = "Aplicacion: " + ExtractFileName(ParamStr(0)) +
           "  / Parámetros: " + Param;
}

Un saludo.