Hallo,
ich habe in dem Open-Ereignis folgendes mit rein gepackt:
Delphi-Quellcode:
procedure TDataModuleRaveProjekt.RvDataSetConnectionnurSerialnummernOpen(
Connection: TRvCustomConnection);
begin
Connection.DataRows := 10;
end;
und in dem GetCols-Ereignis dieses hier:
Delphi-Quellcode:
rocedure TDataModuleRaveProjekt.RvDataSetConnectionnurSerialnummernGetRow(
Connection: TRvCustomConnection);
begin
Connection.WriteIntData('', Connection.DataIndex + 1);
Connection.WriteIntData('', (Connection.DataIndex + 1) mod 2);
end;
Beim GetCols kommt aber ein Fehler der lautet:
Attempt to write diffrent data type then defined (Column 1/12)
Aufrufen tue ich meine RaveReport so:
Delphi-Quellcode:
DataModuleRaveProjekt.RvSystem.DefaultDest := rdPreview;
DataModuleRaveProjekt.RvSystem.DoNativeOutput := false;
DataModuleRaveProjekt.RvSystem.SystemSetups := DataModuleRaveProjekt.RvSystem.SystemSetups - [ssAllowSetup];
DataModuleRaveProjekt.RvProject.Open;
DataModuleRaveProjekt.RVProject.SelectReport('ReportEvents', False);
DataModuleRaveProjekt.RvProject.ProjectFile := 'U:\Lieferschein_Geraetenummern.rav';
DataModuleRaveProjekt.RvProject.LoadFromFile('U:\Lieferschein_Geraetenummern.rav');
DataModuleRaveProjekt.RvProject.ExecuteReport('Report1');
Ich glaube das leigt daran das ich ein RvDataSetConnection benutze. Lese die Daten nämlich aus eine r Datenbank aus. Dafür vielleicht eine Lösung. Die anzahl der Zeilen ist daher natürlich immer verschieden, u.s.w.
Gruss
Holger