Debes hacer referencia directa al DataSet y no al DbEdit, ya que este ultimo solo muestra el contenido del registro qeu le proporciona el DataSet
Prueba con esto:
Código Delphi
[-]With Table1 do begin VAL(FieldByName('Campo1').AsString,UNO,COD1);
Suerte