Hi Metallicwar,
hm, ja das hab ich auch schon ausprobiert. das ist es nicht. hab aber nochwas gefunden in der Newsgroup. Für den Tipp auch schon mal ein dickes Dankeschön
Delphi-Quellcode:
for i := 0 to ibds.FieldList.Count-1 do
begin
if not Varisnull(ibds.Fields[i].Value) then
begin
ppLBankLabel[i] := TppLabel.Create(ppReport1);
ppLBankLabel[i].Band := ppSummaryBand2;
ppLBankLabel[i].Left := CompleteWidth;
ppLBankLabel[i].Top := pprbank.Top + 2;
ppLBankLabel[i].AutoSize := True;
ppLBankLabel[i].Caption := ibds.Fields[i].AsString;
CompleteWidth := CompleteWidth + ppLBankLabel[i].Width +2;
ppLBankLabel[i].BringToFront;
ppLBankLabel[i].Visible := True;
end;
end;
Geht immernoch nicht, aber wenigstens sagt er jetzt wenigstens, dass die Region der Parent der Labels ist. Immerhin
