C++ Builder Font Styles Formatting

http://www.functionx.com/bcb/howto/fontstyles.htm

//---------------------------------------------------------------------------

#include 
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
    for(int i = 0; i < Screen->Fonts->Count; i++)
        cboFont->Items->Add(Screen->Fonts->Strings[i]);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::cboFontCha