Code:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
        // ceo broj ne pocinje sa nulom!
        int a=80, b=78, c=04, all;

        // konverzija INT u STR, dva nacina
        AnsiString BrojKaoString1 = AnsiString(a) + AnsiString(b) + AnsiString(c);
        AnsiString BrojKaoString2 = IntToStr(a) + IntToStr(b) + IntToStr(c);

        // prikaz
        ShowMessage( BrojKaoString1 );
        ShowMessage( BrojKaoString2 );

        // pristup elementima stringa
        for ( int i=1; i<= BrojKaoString1.Length(); i++ )
                ShowMessage( BrojKaoString1[i] );

        // konverzija STR u INT, varijanta 1
        all = BrojKaoString1.ToInt();
        ShowMessage( BrojKaoString1 );

        // konverzija STR u INT, varijanta 2
        all = StrToInt( BrojKaoString2 );
        ShowMessage( BrojKaoString2 );
}

Code:

#include <StrUtils.hpp>
void __fastcall TForm1::Button1Click(TObject *Sender)
{
        AnsiString Broj = "1234NijeBroj";

        // ako je greska, uzmi default vrednost
        int Broj1 = StrToIntDef( Broj, 999 );

        ShowMessage( Broj1 );

        try
        {
                int Broj2 = StrToInt( Broj );
        }
        catch ( const Exception &e )
        {
                // ako je greska, ispisi poruku o gresci 
                // (u razvojnom okruzenju ces ovome (catch) zavrsiti u debuggeru, a u realnom kodu bice samo uhvacena poruka o gresci)
                ShowMessage( e.Message );
        }
}