Hallo zusammen,
ich versuche mit RAVE-Report einen Ausdruck hinzubekommen.
Der Ausdruck hat 2 Seiten:
Auf der 1.Seite wird eine kleine Tabelle mit Parameterwerten dargestellt, sowie ein Chart.
Auf der 2.Seite soll eine Tabelle dargestellt werden, die mit mehreren Daten gefüllt werden soll, d.h. diese Tabelle ist dynamisch.
Die 1.Seite funktioniert problemlos, nur die 2.Seite baut nicht die Tabelle auf. Auf dieser Seite habe ich ein DataBand mit zwei DataText-Komponenten plaziert.
Die DataText-Komponente beziehen ihre Daten von DataView=dvDaten und DataField=Meter bzw. Meter3.
Die DataView-Komponente ist mit RvCustomConnection1 verbunden.
Der Delphi-Code sieht wie folgt aus:
Delphi-Quellcode:
procedure TForm1.RvCustomConnection1GetCols(Connection: TRvCustomConnection);
begin
Connection.WriteField('Meter',dtfloat,10,'Meter','');
Connection.WriteField('Meter3',dtfloat,10,'Meter3','');
end;
procedure TForm1.RvCustomConnection1First(Connection: TRvCustomConnection);
begin
FValueListIndex := 0;
end;
procedure TForm1.RvCustomConnection1Next(Connection: TRvCustomConnection);
begin
Inc(FValueListIndex);
end;
procedure TForm1.RvCustomConnection1EOF(Connection: TRvCustomConnection;
var Eof: Boolean);
begin
if FValueListIndex >= Pred(FTank.ValueList.Count)
then EOF := true
else EOF := false;
end;
procedure TForm1.RvCustomConnection1GetRow(Connection: TRvCustomConnection);
var
TankValue : TTankValue;
begin
TankValue := TTankValue(FTank.ValueList.Objects[FValueListIndex]);
Connection.WriteFloatData('Meter',TankValue.VAlue[0]);
Connection.WriteFloatData('Meter3',TankValue.VAlue[1]);
end;
Wieso wird die Tabelle auf der 2.Seite nicht aufgebaut.
Ich habe auch mal in jeder Procedure ein Breakpoint gesetzt und mußte feststellen, daß keine der Prozeduren aufgerufen werden.
Gruß,
Woto