Difference between revisions of "RPC HELP TMult Count Example"
From VistApedia
(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...") |
|||
| 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
Count Example (TMult Class)
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;
