Ir para conteúdo

ericborrero

Members
  • Total de itens

    1
  • Registro em

  • Última visita

Reputação

0 Comum

Sobre ericborrero

  1. ericborrero

    Array menor Valor

    Boa Noite a todos .... aguem pode me ajudar com esse código.... preciso que ele procure o menor valor e não o maior como esta aqui Procedure TfrmAvaliacao.PiorTempo; var ArrayString: Array [1 .. 5] of string; PiorTempo: string; i: Integer; begin ArrayString[1] := dbtext2.Caption; ArrayString[2] := dbtext4.Caption; ArrayString[3] := dbtext6.Caption; ArrayString[4] := dbtext8.Caption; ArrayString[5] := dbtext10.Caption; PiorTempo := EmptyStr; for i := low(ArrayString) to high(ArrayString) - 1 do if PiorTempo < ArrayString then PiorTempo := ArrayString; Label210.Caption := PiorTempo; end;
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.