Conversion de números

[Elite237]

Hola, veo que tu hiciste que lograste la conversion, y quiero comentarte mi problema, fijate que quiero guardar mis datos en la bd, pero me sale un error que dice

Código Delphi [-]
invalid variant type conversion

aunque no entiendo el porque, ya que este mismo procedimiento lo utilizo para guardar otros datos, mi codigo es el siguiente:

Código Delphi [-]
var
i:string;
begin
if form11.table1.locate('preg_clave',edclave.text,[])then
             begin
              edclave.clear;
              showmessage('La clave ya existe')
             end
              else
                begin
                    i:=copy(cmbEvaluacion.text,0,pos('-',cmbEvaluacion.text)-1);
                    i:=copy(cmbSeccion.text,0,pos('-',cmbSeccion.text)-1);
                    form11.table1.insert;
                    form11.table1.fieldvalues['preg_evaluacion']:=i;
                    form11.table1.fieldvalues['preg_secc']:=i;
                    form11.table1.fieldvalues['preg_clave']:=EdClave.text;
                    form11.table1.fieldvalues['preg_descripcion']:=EdPregunta.text;
                    form11.table1.post;
                    cmbEvaluacion.clear;
                    cmbSeccion.clear;
                    edClave.clear;
                    edPregunta.clear;
                    showmessage('Los datos se guardaron con exito!');
                 end;

Utilizo un TTable, TDataBase, y un TQuery. En mi formulario tengo 2 combobox y 2 edit, y un boton para guardar.Saludos