Kompontenten dynamisch

[Killer]

Das hier ist meine Schleife:

Delphi-Quellcode:

procedure TQuickReport3.QuickRepBeforePrint(Sender: TCustomQuickRep;
  var PrintReport: Boolean);
var i: Integer;
begin
 for i := 0 to Form1.DBGrid1.Columns.Count-1 do begin
  if TQRLabel(FindComponent('RLabel_'+IntToStr(i))) = nil then begin
  Lab := TQRLabel.Create(Self);
  Lab.Font.Style := [fsBold];
  Lab.Parent := QuickReport3.ColumnHeaderBand1;
  Lab.Name := 'RLabel_'+IntToStr(i);
  Lab.AlignToBand := True;
  Lab.Caption := Form1.DBGrid1.Columns[i].Title.Caption;
 end;
 end;
end;

Wie muss ich das denn jetzt einbauen? Also Top iss mal nebensächlich, da sie ja auf einem QuickReport-Band liegen, also müsste ich nur noch Left ändern, was ich aber nicht schaffe. Hat jemand nen Ansatz dafür?