<div>Worked, even better than i <span class="hps">thought.</span></div><p><span class="hps">Many thanks!</span><br></p><div class="gmail_quote">2012/2/24 Adrian Veith <span dir="ltr"><<a href="mailto:adrian@veith-system.de">adrian@veith-system.de</a>></span><br>
<blockquote style="margin:0px 0px 0px 0.8ex;padding-left:1ex;border-left-color:rgb(204,204,204);border-left-width:1px;border-left-style:solid" class="gmail_quote">
  
    
  
  <div text="#000000" bgcolor="#FFFFFF">
    try<br>
    <br>
    ((Numero:1;  Nome'everton'), (Numero:2; Nome: 'murilo'), (Numero:3;
    Nome:'vieira'));<br>
    Am <a href="tel:24.02.2012%2014" target="_blank" value="+12402201214">24.02.2012 14</a>:28, schrieb Everton Vieira:
    <blockquote type="cite"><div><div class="h5">
      <div>I was trying to make this construction:</div>
      <div> </div>
      <div>type<br>
          TRec = record<br>
            Numero: Integer;<br>
            Nome: String;<br>
          end;</div>
      <div> </div>
      <div>function mTRec(Numero: Integer; Nome: String): TRec;</div>
      <div> </div>
      <div>type<br>
          TTest = class<br>
            const Nomes: array[0..2] of TRec = (mTRec(1, 'everton'),
        mTRec(2, 'murilo'), mTRec(3, 'vieira'));<br>
          end;</div>
      <div><br>
        implementation</div>
      <div> </div>
      <div>{$R *.lfm}</div>
      <div> </div>
      <div>function mTRec(Numero: Integer; Nome: String): TRec;<br>
        begin<br>
          Result.Numero := Numero;<br>
          Result.Nome := Nome;<br>
        end;</div>
      <div> </div>
      <div>{ TForm1 }</div>
      <div> </div>
      <div>procedure TForm1.Button1Click(Sender: TObject);<br>
        var<br>
          i1: Integer;<br>
        begin<br>
          for i1 := 0 to Length(TTest.Nome) -1 do<br>
            ShowMessage(TTest.Nomes[i1].Nome);<br>
        end; </div>
      <div> </div>
      <div>Is there any how to do it?</div>
      <div><br>
        -- <br>
        Everton Vieira.<br>
      </div>
      <br>
      <fieldset></fieldset>
      <br>
      </div></div><pre>This body part will be downloaded on demand.</pre>
    </blockquote>
  </div>

<br>--<br>
_______________________________________________<br>
Lazarus mailing list<br>
<a href="mailto:Lazarus@lists.lazarus.freepascal.org">Lazarus@lists.lazarus.freepascal.org</a><br>
<a href="http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus" target="_blank">http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus</a><br>
<br></blockquote></div><br><br clear="all"><br>-- <br>Everton Vieira.<br>