Declaration Syntax Error

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "sComboBox"
#pragma link "sEdit"
#pragma link "sGroupBox"
#pragma link "sLabel"
#pragma link "sRadioButton"
#pragma link "sButton"
#pragma resource "*.dfm"
TForm1 *Form1;
float U;
float R;
float I;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
sComboBox1->Sorted=true;
sComboBox1->Items->Add("ìÂ");
sComboBox1->Items->Add("Â");
sComboBox1->Items->Add("êÂ");
sComboBox2->Sorted=true;
sComboBox2->Items->Add("ìÎì");
sComboBox2->Items->Add("Îì");
sComboBox2->Items->Add("êÎì");
sComboBox2->Items->Add("ÌÎì");
}
//---------------------------------------------------------------------------
 
 
void __fastcall TForm1::sComboBox1Change(TObject *Sender)
{
switch (sComboBox1->ItemIndex)
{
case 0: sEdit1->Text=FloatToStr(StrToFloat(sEdit1->Text)/1000); break;
case 1: sEdit1->Text=FloatToStr(StrToFloat(sEdit1->Text)*1); break;
case 2: sEdit1->Text=FloatToStr(StrToFloat(sEdit1->Text)*1000); break;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sComboBox2Change(TObject *Sender)
{
switch (sComboBox2->ItemIndex)
{
case 0: sEdit2->Text=FloatToStr(StrToFloat(sEdit2->Text)/1000); break;
case 1: sEdit2->Text=FloatToStr(StrToFloat(sEdit2->Text)*1); break;
case 2: sEdit2->Text=FloatToStr(StrToFloat(sEdit2->Text)*1000); break;
case 3: sEdit2->Text=FloatToStr(StrToFloat(sEdit2->Text)*1000000); break;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sEdit1KeyPress(TObject *Sender, char &Key)
{
if ((Key >= '0') && (Key <= '9'))
return;
if (Key == DecimalSeparator)
{
if ((sEdit1->Text).Pos(DecimalSeparator)!= 0) Key = 0;
return;
}
if ( Key == VK_RETURN)
{
sEdit2->SetFocus();
return;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sEdit2KeyPress(TObject *Sender, char &Key)
{
if ((Key >= '0') && (Key <= '9'))
return;
if (Key == DecimalSeparator)
{
if ((sEdit2->Text).Pos(DecimalSeparator)!= 0) Key = 0;
return;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sButton1Click(TObject *Sender)
{
U = StrToFloat(sEdit1->Text);
   R = StrToFloat(sEdit2->Text);
   if (sRadioButton1->Checked) I=(U/R)/1000000;
   if (sRadioButton2->Checked) I=(U/R)/1000;
   if (sRadioButton3->Checked) I=U/R;
   }
   sEdit3->Text=FloatToStrF(I,ffGeneral,7,2);
 }
}
//---------------------------------------------------------------------------

sEdit3->Text=FloatToStrF(I,ffGeneral,7,2);