📄 repsmith.htm

📁 对于学习很有帮助
💻 HTM
字号:
<!-- This document was created with HomeSite v2.5 -->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">

<HTML>
<HEAD>
	<TITLE>UDDF - ReportSmith</TITLE>
	<META NAME="Description" CONTENT="ReportSmith section of the Delphi Developers FAQ" >
	<META NAME="KeyWords" CONTENT="" >

</HEAD>

<BODY>
<BODY LINK="#0000ff" VLINK="#800080" BGCOLOR="#ffffff">

<CENTER>
<IMG SRC="../images/uddf.jpg"> </CENTER>

<P><HR></P>
<FONT FACE="Arial Black" SIZE=7 COLOR="#ff0000"><P ALIGN="CENTER">Report Smith</FONT> </P>

<P><H1><A NAME="repsmith0">Passing a report variable to ReportSmith</P></A></H1>
<P><I>M Richens &lt;max@richens.demon.co.uk&gt;</I></P>

<PRE> "Matthew M. Boron" &lt;tomcat@tusco.net&gt; writes
&gt;I am having trouble passing a customer id to reportsmith to print a
&gt;specific master/detail report.  I keep getting prompted by reportsmith to
&gt;enter the id for the report variable.
&gt;
&gt;Is there a way to pass this variable from Delphi into ReportSmith
</PRE>
This caused  me a lot of grief to start with but
example <p>

<HR><PRE> 
begin
    MillCardNewRep.InitialValues.Clear;
    {Send the Current Milling Number either just
     finished or the last one to ReportSmith}
    MillCardNewRep.InitialValues.Add('@MILLING=&lt;'+MillingNoEdit.Text+'&gt;')                       
     MillCardNewRep.Run;
 end;
</PRE><HR>

I declared a report variable MILLING in RS report  as a number which is
entered from a box <p>

<U>BUT</U><p>

notice that you MUST send the value from Delphi as the .Text not as a
Value. If needed convert it to str (or PChar??) but I just read it from
an edit box which was readonly as I used an AutoIncrement field.<p>


<HR SIZE="6" color="#00FF00">
<FONT SIZE="2">
<a href="mailto:rdb@ktibv.nl">Please email me</a> and tell me if you liked this page.<BR>
<SCRIPT LANGUAGE="JavaScript">
<!--
	document.write("Last modified " + document.lastModified);
// -->
</SCRIPT><P>
<TABLE BORDER=0 ALIGN="CENTER">
<TR>
	<TD>This page has been created with </TD>
	<TD> <A HREF="http://www.dexnet.com./homesite.html"><IMG SRC="../images/hs25ani.gif" WIDTH=88 HEIGHT=31 BORDER=0 ALT="HomeSite 2.5b">
</A></TD>
</TR>
</TABLE>

</FONT>


</BODY>
</HTML>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -