Campo calculado com resultado de nome

Delphi

02/10/2015

Tenho um combobox que Tem os valores (30 ,60 , 90 e 120). e tenho um campo no DIAS dbGrid que mostra valores de dias tipo (qualquer valor de dias 120,20,35,45,60,) . O campo calculado nesse caso é RECEBER ( os valores para serem exibidos seria SIM ou NÃO).

A questão é quando o valor que estiver no DIAS , exemplo 140 , for maior do que foi escolhido no combobox (Exemplo 120) no campo RECEBER aparecer NÃO, pois o valor é maior do que escolhido .

Como faira isso?
Tiago Santos

Tiago Santos

Curtidas 0

Respostas

Rafael Bosco

Rafael Bosco

02/10/2015

Primeiro você verifica como o RECEBER vai ficar:

 function CheckDias: Boolean;
 var
   Dias, DiasComboBox: Integer;
 begin    
    DiasComboBox := StrToInt(ComboBox.Text);
    
    if Dias > DiasComboBox then
      Result := True
   else
      Result := False;
  end;   




   if CheckDias then
      Receber := 'NÃO
   else
      Receber := 'SIM';


Sugiro utilizar o campo RECEBER como Boolean, aí ele vai gravar como False e True, e não precisaria fazer a conversão para SIM ou NÃO.
GOSTEI 0
POSTAR