Einzelnen Beitrag anzeigen

merlin17

Registriert seit: 15. Dez 2002
Ort: Mittelfranken
980 Beiträge
 
Delphi 10 Seattle Enterprise
 
#13

Re: Suche Report-Generator...

  Alt 14. Nov 2003, 17:53
smokey,

stimmt, die doku ist noch etwas verbesserungswürdig....

<<Inhalte von Textfeldern an Memofelder im Report schicke oder ähnliches. >>

Code:

procedure TForm1.RvCustomConnection1GetCols(
  Connection: TRvCustomConnection);
begin
      Connection.WriteField('FieldMemo1',dtMemo,30,'','');
end;

procedure TForm1.RvCustomConnection1GetRow(Connection: TRvCustomConnection);
var
   s : string;
   Buffer : PChar;
begin
  // Delphi Memo1 in RaveMemo
  GetMem(Buffer,Length(Memo1.Text) + 1);
  StrCopy(Buffer, PChar(Memo1.Text));
  Connection.WriteBlobData( Buffer^, Length(Memo1.Text));
  FreeMem(Buffer);
end;

that's all

thomas, TeamNevrona
- TeamNevrona cannot respond to questions received via email -
http://rave-notes.blogspot.com
  Mit Zitat antworten Zitat