Перевод программы, из Delphi в С++ Builder Опции

[Jaxx]

Надо небольшую программку перегнать из Delphi в С++ Builder. Где-то читал, что для этого есть специальный софт. Рылся я в интернете и ничего не нашел толкового. Как мне побыстрее это дело провернуть?

[Jaxx]

Почитал я инфу о этой программке, говорят, что она подходит только для старых версий Паскаля, а под Delphi идет очень плохо, тем более под версии начиная с 6-ой.
Может вы чем подмогнете? Программка такая (на Delphi):

Код

procedure TForm1.Button1Click(Sender: TObject);
var
  f:textfile;
  i,r:byte;
  st:string;
begin
randomize;
  i:=0;
  assignfile(f,'index.txt');
  reset(f);
Memo1.Lines.Clear;
Memo2.Lines.Clear;
Memo3.Lines.Clear;
  st:='';
r:=1+(random(73));
  Label2.Caption:=IntToStr(r);
   for i:=1 to ((r-1)*3) do readln(f,st);
   readln(f,st);
   Memo1.Lines.Text:=st;
   st:='';
   readln(f,st);
   Memo2.Lines.Text:=st;
   st:='';
   readln(f,st);
   Memo3.Lines.Text:=st;
   st:='';
   i:=0;
end;