Q&A

  • Parent 부분에서 오류가 나옵니다.
      while StreamF.Position < StreamF.Size do
      begin
        TempComponent := StreamF.ReadComponent(nil);
        Temp_Form.InsertComponent(TempComponent);
      end;

      for i := 0 to Temp_Form.ComponentCount-1 do
      begin
        if Temp_Form.Components[i] is TQuickRep then begin
          T_QuickRep := TQuickRep(Temp_Form.Components[i]);
          TControl(T_QuickRep).Parent := Temp_Form;
        end;
      end;
      for i := 0 to Temp_Form.ComponentCount-1 do
      begin
        if Temp_Form.Components[i] is TQRBand then
          T_QRBand := TQRBand(Temp_Form.Components[i]);
          T_QRBand.Parent := T_QuickRep;    <== 이 부분에서 오류가 나옵니다.

도저히 오류를 못 잡겠습니다. 뭐가 문제인지 모르겠군요. ㅠㅠ
꼭 도와 주세요.
1  COMMENTS
  • Profile
    모영철 2005.01.29 03:09
    음...아래 부분에는 "TQRBand 이면" 하는 if 문에서 begin 이 없네요..

    저리 되있다면 아래 줄도 묶어 주실라고 하셨던거 아니신지..