Ver Mensaje Individual
  #1  
Antiguo 16-02-2016
davidmedina29 davidmedina29 is offline
Miembro
NULL
 
Registrado: feb 2016
Posts: 34
Reputación: 0
davidmedina29 Va por buen camino
could not convert variant of type (null) into type (string)

tengo una base de datos con el campo: Ejercicio y Periodo

tengo un problema, tengo un edit(periodo) que le incremento en uno dependiendo el item que selecciona el combobox(Ejercicio) aqui pero cuando selecciono un item que el periodo aun no existe me marca este error "could not convert variant of type (null) into type (string) " les comparto mi codigo.
Código Delphi [-]
procedure TfCatPeriodosInNvo.cxComboBox1PropertiesEditValueChanged(
  Sender: TObject);
begin
 if dm.msqry1.State=dsInsert then
  with DM do
  begin
   Q_Auxi.Close;
   Q_Auxi.SQL.Clear;
   Q_Auxi.SQL.Add('select MAX(Periodo)+1 from CA_PERIODOSINGRESO where Ejercicio=:Ejercicio');
   Q_Auxi.ParamByName('Ejercicio').Value:=cxComboBox1.Text;
   Q_Auxi.Open;
   if not Q_Auxi.IsEmpty then
    cxTextEdit1.Text:=Q_Auxi.Fields.Fields[0].Value;
  end
  end;

cualquier sugerencia se los agradeceria mucho!!
Responder Con Cita