Guten Tag,
ich versuche über Fastreport per Checklistbox die gewählten Einträge
angezeigt zu bekommen.Drück ich auf "OK" sehe ich nur die leere Seite.
Hab das Handbuch gelesen, aber nix gefunden.
Kann mir jemand helfen?
Delphi-Quellcode:
procedure DialogPage1OnShow(Sender: TfrxComponent);
begin
ADOTable1.Open;
while not ADOTable1.EOF do
begin
CheckListBox1.Items.Add(ADOTable1.FieldByName('Nachnamen').AsString);
ADOTable1.Next;
end;
end;
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
if CheckListBox1.Checked[<Line#> - 1] then
MasterData1.Visible := True else
MasterData1.Visible := False;
end;
procedure BitBtn1OnClick(Sender: TfrxComponent);
begin
end;
begin
end.