Kdtop: Created page with " RPC Broker Help Home

Position Example

Back The following program code demonstrates how to get the position of an item..."

2015-07-03T23:28:02Z

Created page with " RPC Broker Help Home <h2>Position Example</h2> Back The following program code demonstrates how to get the position of an item..."

New page

[[RPC_Broker_Help| RPC Broker Help Home]]
<h2>Position Example</h2>
[[RPC_HELP_Mult_Position|Back]]

The following program code demonstrates how to get the position of an item in a TMult variable:

'''procedure''' TForm1.Button1Click(Sender: TObject);
'''var'''
Mult: TMult;
'''begin'''
{Create Mult. Make Form1 its owner}
Mult := TMult.Create(Form1);
Label1.Caption := 'The position of the ''Third'' element is ' +
{will be -1 since the list is empty}
IntToStr(Mult.Postion('Third'));
Mult['Second'] := 'Two';
Label1.Caption := 'The position of the ''Third'' element is ' +
{will be -1 since 'Third' item does not exit}
IntToStr(Mult.Postion('Third'));
Label1.Caption := 'The position of the ''Second'' element is ' +
{will be 0, TMult positions start with 0}
IntToStr(Mult.Postion('Second'));
'''end;'''

RPC HELP TMult Position Example - Revision history

Kdtop: Created page with " RPC Broker Help Home

Position Example