Exemplos de GE_DOCXDevice em C++ (Cpp)

Exemplo n.º 1

Arquivo: DOCX.cpp Projeto: glutz/ReporteRs

SEXP R_DOCX_Device(SEXP filename
		, SEXP width, SEXP height, SEXP offx,
		SEXP offy, SEXP pointsize, SEXP fontfamily, SEXP env) {

	double* w = REAL(width);
	double* h = REAL(height);

	double* x = REAL(offx);
	double* y = REAL(offy);
	int nx = length(width);

	double ps = asReal(pointsize);

	BEGIN_SUSPEND_INTERRUPTS;
	GE_DOCXDevice(CHAR(STRING_ELT(filename, 0)), w, h, x, y, ps, nx, CHAR(STRING_ELT(fontfamily, 0)), env);
	END_SUSPEND_INTERRUPTS;
	return R_NilValue;
}

Exemplo n.º 2

Arquivo: DOCX.cpp Projeto: wangtulao/ReporteRs

SEXP R_DOCX_Device(SEXP filename
		, SEXP width, SEXP height, SEXP offx,
		SEXP offy, SEXP pointsize, SEXP fontfamily, SEXP start_id, SEXP is_editable ) {

	double* w = REAL(width);
	double* h = REAL(height);

	double* x = REAL(offx);
	double* y = REAL(offy);
	int nx = length(width);

	double ps = asReal(pointsize);
	int id_init_value = INTEGER(start_id)[0];
	int editable = INTEGER(is_editable)[0];
	BEGIN_SUSPEND_INTERRUPTS;
	GE_DOCXDevice(CHAR(STRING_ELT(filename, 0))
			, w, h, x, y, ps, nx, CHAR(STRING_ELT(fontfamily, 0))
			, id_init_value, editable
			);
	END_SUSPEND_INTERRUPTS;
	return R_NilValue;
}