Q&A

  • [re] 퀵레포트에서 동적으로 lable생성
var
  qlArray: Array[1..10] of TQRLabel;

procedure TForm1.FormCreate(Sender: TObject);
var
  i: Integer;
begin
  for i:= Low(qlArray) to High(qlArray) do
  begin
    qlArray[i]:= TQRLabel.Create(Self);
    with qlArray[i] do
    begin
      Parent:= QuickRep1;
      Top:= 100;
      Left:= i * 100;
      Name:= Format('QRLabel%d', [i]);
    end;
    // 이름으로 Access하려면 Parent로 FindComponents[i]를 사용
  end;
end;
이 게시물을
1  COMMENTS
←First Page
121 122 123 124 125 126 127 128 129 130
Last Page→
한델 로그인 하기