yanweiyuan3
2023-08-09 588bc7829387dfc761cc25f06f77d4c81818bd10
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Quintiq file version 2.0
#parent: #root
Method SetNumberInStrings (
  Strings texts
) as owning Strings
{
  TextBody:
  [*
    textWithNumbers := construct( Strings );
    for( i := 0; i < texts.Size(); i++ )
    {
      // for each text, prefix with running number. Example: 1. <text>
      textWithNumbers.Add( ( [String] (i + 1) ).Concat( '. ' ).Concat( texts.Element( i ) ) );
    }
    return &textWithNumbers;
  *]
  InterfaceProperties { Accessibility: 'Module' }
}