RPC HELP TMult Count Example: Difference between revisions

From VistApedia
Jump to navigationJump to search
Created page with "<h2>Count Example (TMult Class)</h2> The following program code displays the number of items in a Mult class in the caption of a label when the user clicks the CountItems but..."
 
No edit summary
 
Line 1: Line 1:
[[RPC_Broker_Help| RPC Broker Help Home]]
<h2>Count Example (TMult Class)</h2>
<h2>Count Example (TMult Class)</h2>
[[RPC_HELP_Mult_Count|Back]]


The following program code displays the number of items in a Mult class in the caption of a label when the user clicks the CountItems button:
The following program code displays the number of items in a Mult class in the caption of a label when the user clicks the CountItems button:

Latest revision as of 22:43, 3 July 2015

RPC Broker Help Home

Count Example (TMult Class)

Back

The following program code displays the number of items in a Mult class in the caption of a label when the user clicks the CountItems button:


   procedure TForm1.CountItemsClick(Sender: TObject);
   begin
     Label1.Caption := 'There are ' + IntToStr(Mult.Count) +
     ' items in the Mult.';
   end;