Delphi를  C++Builder로 바꿀때..
저는 그냥 Builder에  Copy해 놓고
Ctrl+H 눌러서 Replace Text 합니다.

바꿀것은

1.   :=         는      =  
2.  begin    는      {
3.  end;      는      }
4.  Inc(x)    는      x++
5.  .            는      ->
6.  if           는      if (
7.  then      는      )

ReplaceAll  해버립니다.
아래 코드도 위에 것으로 바꾸며 대충 변환되겠는데요..

참 변서 선언은   직접 바꿔줘요
var
i:= integer;  의 경우   int  i; 

그럼..


rrr 님이 쓰신 글 :
: var
:  i: Integer; // 유닛변수
: procedure TForm9.QuickRep1NeedData(Sender: TObject; var MoreData: Boolean);
: begin
:   MoreData := Form1.DBGrid1.SelectedRows.Count > i; //선택한 레코드 만큼 실행.
: end;
:
: procedure TForm9.DetailBand1BeforePrint(Sender: TQRCustomBand;
:   var PrintBand: Boolean);
: begin
:   with Form1.DBGrid1 do begin
:     //선택한 레코드로 DB커서 이동
:     DataSource.DataSet.GotoBookMark(Pointer(SelectedRows.Items[i]));
:     // QRLabel에 Data를 넘긴다.
:     QRLabel1.Caption := DataSource.DataSet.FieldByName('Hanbun').AsString;
:   end;
:   inc(i);
: end;
:
: procedure TForm9.QuickRep1BeforePrint(Sender: TCustomQuickRep;
:   var PrintReport: Boolean);
: begin
:   i := 0; //유닛변수 초기화
: end;
:
:
: ㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡ
:
: http://www.delphiunion.com/dwp/QR/qreport.htm
: 퀵리포트백서 사이트에서 dbgrid의 선택한 레코드만 출력하는 코드인데
: 빌더에선 어떻게 써야할지 모르겠네요.
:
: 아시는분 코드좀 바꿔주세요 ㅎㅎ