Perdida de conexión [MySQL Server has gone awway]

[frandigo77]

Hola buenas, q tal..estoy desarrollando una aplicación Delphi con MySQL y en un formulario de envio de datos donde trabajo con un campo blob, me aparece el eror [[MySQL Server Driver xx servr has gone away], he estado leyendo por el site de MySQL y he probado a ampliar la memoria de transferencia de paquetes modificando la variable mas_allowe_packet del servidor a 32 MB, pero me sigue saliendo el error, las foto que se envia es en formato .bmp por lo que no tiene que pesar mucho...alguien que ya hay tenido un problema similar o asi puede echarme una mano?...thaknk

[Casimiro Notevi]

¿Y el código que usas?

[frandigo77]

Ahí va:

Código Delphi [-]
function TDialogo.Guardar: boolean;
var
  I: Integer;
begin
  inherited;
  Result:= False;
  if Assigned(dsBase.DataSet) then
  begin
    try
     With dsBase.DataSet as TClientDataSet do
     begin
      if Assigned(DataSetField) or FModoCache then
      begin
        CheckBrowseMode;
        Result:= True;
      end
      else
      begin
        Result:= ApplyUpdates(0) = 0;
        if not Result then
           Abort;
      end;
      end;
    except
      On E: Exception do
      begin
        Application.ShowException(E);
        raise E;
      end;
    end;
  end;
end;