Código Delphi [-] With Query1 do begin if (DataModule.tdemanda.FieldByName('ttipo_demanda').AsInteger=1) then with SQL do begin ...
With Query1 do begin if (DataModule.tdemanda.FieldByName('ttipo_demanda').AsInteger=1) then with SQL do begin ...