Need to be translate....

[danburt]

Hi there,
I bought a book give me a code from Borland Delphi 7.0

-----------------------------------------------------------------------------------------------------
procedure TForm1.FormShow(Sender: TObject);
var
IniFile : TIniFile;
begin
Form1->Top=1;

begin
IniFile := TIniFile.Create('ProgramSetting.dll');
if IniFile.ReadString('Main','Enable','qqq') = 'True' then
cbEnable.checked := true;

-----------------------------------------------------------------------------------------------------

actually I don't really understand y it's happened. I mean I've no idea to translate it to Borland C++ 6.0
I've tried looking in the help, but it just give me something like...

-----------------------------------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent *Owner) : TForm(Owner)

{
TIniFile *ini;
ini = new TIniFile( ChangeFileExt( Application->ExeName, ".INI" ) );
Top = ini->ReadInteger( "Form", "Top", 100 );
Left = ini->ReadInteger( "Form", "Left", 100 );
Caption = ini->ReadString( "Form", "Caption",
"Default Caption" );
ini->ReadBool( "Form", "InitMax", false ) ?
WindowState = wsMaximized :
WindowState = wsNormal;
delete ini;
}
--------------------------------------------------------------------------------------------
... that couldn't be understood. What is the 'ChangeFileExt'?

So i need the Borland code to be translated into C++.

I'll appreciate any help...

Thnx...
daniel....