[delphi-br] ROTINA BASIC PARA PASCAL! ME AJUDEM NESSA...

Olá pessoal! O que eu vou mostrar abaixo será de grande valia, mas antes de implantar no meu projeto em Deplhi, vou exibir um código que fiz em outro projeto em visual basic 6, que tem como objetivo em calcular o menor valor entre cinco campos. Exemplo: Fornecedor 01 – R$ 100,00; Fornecedor

Re: [delphi-br] ROTINA BASIC PARA PASCAL! ME AJUDEM NESSA...

Luciano, Vamos ver se consigo te ajudar: Nem tem delphi nesta maquina, mas tentarei nao cometer muitos erros, hehehe //Variáveis: Var vetValores , CurAux : array [0..5] of Currency ; I, J : Integer ; try VetValores[1] := StrToFloat(Trim(txtValor1.Text)); except VetValores[1] := 0;