[OSKR]

La función no puedes meterla dentro del evento , debes colocarla antes q la primera función q la llame, por ejemplo:

#include <vcl.h>
#include <math.h>

#pragma hdrstop
#include "Unit1.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 float f(float x);
 { return pow(x,4);
 }
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//------------------------------------------------------------------------


void __fastcall TForm1::Btn_CalcularClick(TObject *Sender)
{ int n,i;
  float a,b,h,s,s2,s4,x,ts2,ts4,s13,suma; 
  char opc;
  .....