Drucken mit Rave - die zweite

[Keldorn]

Hallo

du brauchst die 3 ereignisse OnOpen (=anzahl), OnGetCols (=Feldname), OnGetrow (=eigentliche Daten).

Delphi-Quellcode:

procedure TForm1.RvCustomConnection1Open(Connection: TRvCustomConnection);
begin
  Connection.DataRows:=1; //hast ja nur einen Datensatz
end;

procedure TForm1.RvCustomConnection1GetCols(Connection: TRvCustomConnection);
begin
  Connection.WriteField('Edit1', dtString, 25, '', ''); //edit1 oder eine andere sinnvollere Bezeichnung
  Connection.WriteField('Edit2', dtString, 25, '', ''); 
  ...
end;

procedure TForm1.RvCustomConnection1GetRow(Connection: TRvCustomConnection);
begin
  with Connection do
    begin
      WriteStrData(Edit1.text,'');
      WriteStrData(Edit2.text,'');
      ...
    end;
end;

Wichtig: dein Delphi-Prog muß beim ersten Designen laufen, wenn du in Rave das entsprechende Dataview erstellst. (auf das "View"-Symbol-> Direct data view -> entsprechende Customc0nnection auswählen). Hattest du das schon, dann im Treeview Rechts das entsprechende Dataview mit rechts anklicken und refresh wählen. Dann stehen die richtigen Feldnamen drin.

Mfg Frank