[JerS]

Amigos estoy tratando de insertar en mi tabla de Mysql una foto. efectivamente lo hago pero solo me deja insetar un solo registro luego me arroja la siguiente Exception!! EInvalitCast Invalid class typecast, pero esto susede siempre que intento insetar un registro cuando la tabla no esta vacia de lo contrario inserta los datos sin ningun problema.

Código Delphi [-]
Procedure TForm1.TomarFoto();
  var
    mybmp:TBitmap;
    myjpg:TJPEGImage;
begin
//Capturo la Imagen con mi webcam
  tsCap321.SaveAsBMP:='C:\pruebax.bmp';
// aqui lo que hago es convertir la imagen capturada a Jpeg
  mybmp:=TBitmap.Create;
  mybmp.LoadFromFile('C:\pruebax.bmp');
  myjpg:=TJPEGImage.Create;
  myjpg.Assign(MyBmp);
  myjpg.SaveToFile('C:\pruebax.jpeg');
  myjpg.Free;
  mybmp.Free;
end;



procedure TForm1.Button1Click(Sender: TObject);
var rs:TAdodataset;
begin
ShortDateFormat:='yyyy/mm/dd';
TomarFoto;
          rs := TADODataSet.Create(nil);
          rs.Connection := ADOConnection1;
          rs.CursorType := ctKeyset;
          rs.LockType := ltOptimistic;
          rs.CommandText := 'SELECT * FROM Captura';
          rs.Open();
          rs.Append();
          rs.FieldByName('hora').asstring:=formatdatetime('H:mm',now);
          rs.FieldByName('fecha').AsString:=formatdatetime('yyyy/mm/dd',now);
          (rs.FieldByName('foto') as  TBlobField).LoadFromFile('C:\pruebax.jpeg');
          rs.post();
          rs.Close();
          rs.Free();
end;