QRLabelの動的作成について

解決

サンプー 2008-02-26 23:57:50 No: 29918

いつも活用させて頂いています
今回、DL6,XP Pro SP2をDL6梱包のクイックレポートを利用して、QRLabelの動的作成を試みました結果、EAccess・・・・エラーとなりましたどなたか、ご存知の方、アドバイス願います

type
ItemLbl = Array of TQRLabel;

Private
LbelItem : ItemLbl;

beforeDetailBand1print
var I,S : Integer;
begin
SetLength(LbelItem,s);
for I := 0 to S-1 do
  begin
   With LbelItem[I] do
    begin
     Parent := DetailBand1;
     height := 10;
     width := 20;
     visible := True;
     Tag := I;
     Caption := 'ItemLbl' + IntToStr(I);
     Color := clRed;
    end;
  end;
end;

えらーは当然 2008-02-27 00:36:50 No: 29919

>…動的作成を試みました
作成してないじゃん。

サンプ 2008-02-27 05:33:49 No: 29920

えらーは当然さま、れす有難うございます
その後、色々調べて、作成できるようになりました
SetLength ではなく、Createでやっていかないと（当たり前ですよね）いけないみたいですね