Para vedor dinamico voce pode usar assim .. Var arrayValue : array of variant;
begin SetLength(arrayValue,Length(arrayValue) + 1); arrayValue[Length(arrayValue) - 1] := dataFinal; att. Marcio. At 15:45 1/4/2009 -0300, you wrote: >Você poderia, ao invés de usar a variável k, usar a variável i acrescida de >algum fator. Você poderia pegar um valor a partir da hora atual pra gerar >esse fator. O exemplo abaixo cria um número com 3 algarismos a partir do >final da hora. > >var iFator : Integer; >sHora : String; >begin >sHora := DateTimeToStr(Now); >sHora := StringReplace(sHora, '/', '', [rfReplaceAll]); >sHora := StringReplace(sHora, ':', '', [rfReplaceAll]); >sHora := StringReplace(sHora, ' ', '', [rfReplaceAll]); > >iFator := StrToInt(Copy(sHora, Length(sHora)-2, 3)); >end; > >__________________________________________________ >Faça ligações para outros computadores com o novo Yahoo! Messenger ><http://br.beta.messenger.yahoo.com/>http://br.beta.messenger.yahoo.com/ > [As partes desta mensagem que não continham texto foram removidas]