Article

From:
To:
All
Subject:
Problems with columns
Newsgroup:
nevrona.public.rave.developer.delphi.code-based

Problems with columns

Delphi 7 Rave bex 7.0.0

Just getting started with code based reports. Report won't start a new column, rows print fine until bottom of page then all print on same line no new column. Printed out "Columns" value and it shows 3 columns. Using TDetailShell. Here is the code
Thanks Gary
procedure TdmReports.dtshlMembersBodyBefore(ReportPrinter: TBaseReport;   ReportShell: TDetailShell); begin   with ReportPrinter do   begin     SetColumns(3, 0.1);     SetFont('Times New Roman', 12);     SaveFont(2);//Row     ClearTabs;     SetTab(rvsysCode.SystemPrinter.MarginLeft, pjLeft, 0.75, 5, BOXLINENONE, 0);//FirstName     SetTab(NA, pjLeft, 0.75, 5, BOXLINENONE, 0);//LastName   end;   qryBookStudyMembers.Open; end;
procedure TdmReports.dtshlMembersRowPrint(ReportPrinter: TBaseReport;   ReportShell: TDetailShell; var Valid: Boolean); begin   with ReportPrinter, qryBookStudyMembers do   begin     PrintTab(FieldByName('LastName').AsString);     PrintTab(IntToStr(Columns));     //printTab(FieldByName('FirstName').AsString);     NewLine;   end; end;
procedure TdmReports.dtshlMembersRowAfter(ReportPrinter: TBaseReport;   ReportShell: TDetailShell; var Valid: Boolean); begin   qryBookStudyMembers.Next;   Valid:= not qryBookStudyMembers.Eof; end;
FYI: Phrase searches are enclosed in either single or double quotes
 
 
Originally created by
Tamarack Associates
Fri, 29 Mar 2024 13:03:20 UTC
Copyright © 2009-2024
HREF Tools Corp.