Einzelnen Beitrag anzeigen

Keldorn

Registriert seit: 6. Mär 2003
Ort: Meißen
876 Beiträge
 
Delphi 10.1 Berlin Professional
 
#2

Re: Drucken mit Rave - die zweite

  Alt 9. Nov 2005, 15:11
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

Lükes Grundlage der Programmierung:
Es wird nicht funktionieren
(Murphy)
  Mit Zitat antworten Zitat