infotutoriales

Quitar marca de la web Visual Studio

2024-09-27T15:23:00.000-05:00

Si se les presenta este error y tenemos muchos archivos como para ir desbloqueando uno por uno, podemos ejecutar el siguiente comando desde PowerShell

Get-ChildItem -Recurse -Path 'Directorio' |Unblock-File

Donde directorio es la ubicación en donde se encuentran los archivos a desbloquear.

Error Mysql: feedback' is disabled - XAMP

2024-07-21T17:58:00.010-05:00

Error Mysql: feedback' is disabled - XAMP

Pasos para solucionar este problema:

Crea una copia de la carpeta data.

En mi caso esta se encuentra en la siguiente ruta:

D:\XAMP\mysql\data

Después de crear la copia de seguridad, renombrar la carpeta data, por ejemplo a data_old.

Luego crear una nueva carpeta con el nombre data.

Copiar todos los archivos de la carpeta backup a la carpeta data.

Copie todas las carpetas que se encuentran en la carpeta data_old a la carpeta data.

Finalmente copiar el archivo "ibdata1" y todos los archivos "ib_logfile0, ib_logfile1" from "xampp/mysql/data-old" y copiar en el "/xampp/mysql/data".

Crear archivos Log en PowerBuilder

2024-01-16T18:22:00.002-05:00

Crear archivos Log en PowerBuilder

Estoy seguro que a más de uno se ha visto en la necesidad de crear log para poder realizar seguimiento a algunos procesos de sus sistemas. Para esto he creado una clase que simplifica el proceso de creación de estos archivos.

Esta clase tiene varios funciones que podemos usar.

of_log(runtimeerror)
- Recibe como parametro un objeto runtimeerror y escribe en el archivo log el detalle del error.
of_log(string)

Recibe un string que es escrito en el archivo log.

of_log(string,string)
- Recibe dos string que es escrito en el archivo log.
- El primero es el tipo de mensaje que puede ser IS_TIPO_ERROR o IS_TIPO_INFORMATION. También pueden pasarle un tipo personalizado.
- El segundo es la descripción o mensaje a escribir en el log.
of_log(string runtimeerror)

Recibe como parametro un string y un objeto runtimeerror.El primero es el tipo de mensaje y el segundo el objeto error para escribir el detalle del error.

Instancia

Se puede crear la instancia en el evento open de la aplicación y declarar el objeto como una variable global.
gc_log=create cc_lexblas_log Se indica el directorio base.
gc_log.is_directory_base="C:/" Se indica el en donde estaran los archivos log. Si no existe el directorio será creado.
gc_log.is_log_directory="logger"

Destruyendo la instancia

En el evento close de la aplicación destruimos la instancia del objeto. destroy gc_log

Archivo cc_lexblas_log.sru

Si trabaja con una versión distinta a 11.5 puede importar el objeto usando el archivo cc_lexblas_log.sru

Repositorio: https://github.com/LEXBLAS/log_powerbuilder

BARCODE 128 PowerBuilder

2022-09-06T12:07:00.001-05:00

Code 128 es un código de barras de alta densidad, usado ampliamente para la logística y paquetería. Puede codificar caracteres alfanuméricos o solo numéricos. Con este código es posible representar todos los caracteres de la tabla ASCII, incluyendo los caracteres de control.

Para comprender cómo se codifica este código, debemos tener en cuenta que cada ASCII se codifica mediante 11 barras.

https://es.wikipedia.org/wiki/Code_128

El código fue adaptado desde vbs http://www.myonlinetraininghub.com/create-barcodes-with-excel-vba

Se de instalar la fuente code128.ttf

https://github.com/LEXBLAS/barcode128pb.git

Error: /etc/apache2/modules/mod_mpm_worker.so: undefined symbol: ap_thread_current_after_fork

2022-03-16T23:32:00.005-05:00

El día de hoy apareció un error en un VPS, el cual no permitía levantar el servidor apache.

El error

httpd: Syntax error on line 28 of /etc/apache2/conf/httpd.conf: Syntax error on line 2 of /etc/apache2/conf.modules.d/000_mod_mpm_worker.conf: Cannot load modules/mod_mpm_worker.so into server: /etc/apache2/modules/mod_mpm_worker.so: undefined symbol: ap_thread_current_after_fork

Buscando la solucion en internet ingrese en la terminal las siguientes intrucciones.

yum shell

remove ea-apache24-mod_mpm_worker

install ea-apache24-mod_mpm_event

run

Después de terminar la ejecución del comando ingresamos exit.

Ahora levantamos el servicio.

sudo systemctl start httpd

Con esto ya debería funcionar.

Referencia: https://docs.cpanel.net/ea4/apache/multi-processing-modules-mpm/

Obtener el indice seleccionado en Dropdownlistbox | Powerbuilder

2021-04-20T13:45:00.003-05:00

Para obtener el indice seleccionado en un Dropdownlistbox vamos a crear un objeto Standar Visual que herede de este objeto.

Una vez creado el objeto nos posicionamos en la pestaña instance variables

Agregamos una variable que almacenara el índice seleccionado, en este caso le pondré de nombre índice.

En el evento selectionchange coloco lo siguiente:

Con esto ya tengo almacenado el índice seleccionado y puedo acceder a el externamente.

Guardo los cambios y le coloco un nombre, en mi caso le coloque cuvo_ddlb.

Para probarlo lo agregamos una ventana, para esto simplemente arrastramos el objeto a la ventana y soltamos. Además agregamos un botón a la ventana.

En el ddlb agregamos elementos desde las propiedades(también podríamos hacerlo mediante código)

Después de esto dentro del botón en el evento clic agregamos lo siguiente:

int i

i=ddlb_1.indice

messagebox("",string(i))

ddlb_1.deleteitem( i)

Donde índice es el nro de elemento seleccionado y ddlb_1 es el nombre del ddlb.

Con este código muestro en un mensaje el índice del elemento seleccionado y además elimino el ítem.

Prestashop - mercadopago: Las credenciales no pueden estar vacías y deben ser válidas. Por favor, completa tus credenciales para activar el módulo.

2020-11-08T19:35:00.006-05:00

Al intentar guardar la configuración del modulo de mercadopago en prestashop me mostraba el siguiente mensaje.

Las credenciales no pueden estar vacías y deben ser válidas. Por favor, completa tus credenciales para activar el módulo.

Para solucionar esto verifique las dependencias que que necesita el modulo.

PDO_MYSQL, simplexml, mcrypt,hash,DG,DOM, iconv, curl y SOAP.

De estas dependencias me faltaba el mcrypt. Procedí a instalar la librería y volví a probar guardar la configuración, pero me arrojaba el mismo error. Así que desinstale el modulo y lo elimine por completo. Volví a instalar el modelo, procedí a ingresar los datos de configuración y finalmente todo se guardo correctamente. Fue una final feliz.

Miniproyecto Powerbuilder Datawindows

2020-10-25T19:19:00.000-05:00

En esta ocasión vamos a crear un pequeño proyecto, en el cual solo vamos a implementar la parte principal,el Core del negocio . Este proceso debe permitir ingresar la fecha, el Po Number, seleccionar un supplier code e ingresar un receive number. Ademas de poder seleccionar varios productos para ser agregados a la lista que se encuentra ubicada en la parte inferior. Los datos que la lista debe contener es el producto, la cantidad y el texto ingresado en la caja de texto info.

Al presionar aceptar(guardar), debe insertar un registro en la tabla document y n registros en la tabla document detail, segun la cantidad de productos ingresados en la lista(detalle).

Nota: Los productos y supplier se agregaron manualmente para solo dedicarse a realizar el core.

Para avanzar con el tutorial, vamos a saltarnos los pasos de la creación del proyecto y la creación de la conexión a la base de datos.

Después de crear el proyecto y realizar la conexión, vamos a agregar dos ventanas.

Una se llamará w_lista y la otra w_registro.

La ventana w_lista tengra un dw que mostrará los documents registrados. Agregamos tres botones, el nuevo, eliminar y salir. Solo programaremos el botón nuevo y eliminar (a estas alturas ya deberían saber como programar el botón salir).

El siguiente paso es crear el objecto dw que contendrá la información de la tabla documents y su tabla relacionada (supplier).

Seleccionamos New Datawindow del tipo grid.

Seleccionamos las tablas document y supplier, así como las columnas que deseamos mostrar.
Click en el boton return, luego siguiente y finalizar.

Con esto tendremos nuestro objeto dw creado, pero aun falta guardarlo. Le pondremos por nombre dwgr_lista.

Regresamos a la ventana w_lista y asignamos el dw control el objecto dw que hemos creado.

Entramos al control dw y buscamos el evento constructor

Agregamos el siguiente código (para obtener los datos desde la base de datos, por ahora no mostrará nada porque esta vacío).

En la venta w_registro deben agregar los siguientes controles y asignarle los nombres que aparecen en la imagen.

Ademas de asignarle a la venta en la propiedad windowType el tipo response.

Para la cabecera crearemos un datawindow object(dw object o dwo) del tipo freeform.

Seleccionamos la tabla document y seleccionamos todas las columnas.

Luego nos vamos al menu Design y seleccionamos Retrieval Arguments.

Le asignamos el argumento creado a la columna document number.

Una vez hecho esto guardamos el dw con el nombre de dwff_document. Debe verse similar a la imagen.

Recuerden que apara el supplier se debe seleccionar de una lista. Estos datos ya deben estar ingresados en la tabla supplier para que aparescan. Para esto debemos crear otro dw y enlazar la columna supplier code del dwff_documento con el nuevo dw que vamos a crear.

El nuevo dw que contendrá la lista de supplier sera del tipo tabular(también podría haber sido del tipo grid).

Ocultamos el header y debería verse así.

Este dw lo guardamos con el nombre dwtb_supplier.

Regresamos al dwff_document y seleccionamos la columna supplier code. Luegos nos dirigimos a la pestaña Edit y en la propiedad Style type seleccionas dropdowndw

En la parte inferior seleccionamos el dw tabular, la columna que se mostrara y la que se va a guardar.

En la columna date editamos la propiedad mask y le asignamos el formato dd/mm/yyyy

Guardamos los cambios y asignamos en el dw_cabecera el dwo dwff_documento.

Vamos a crear otro dw para el detalle.

Retornamos y en la parte del diseño ocultamos las dos primeras columnas.

Guardamos el dw con el nombre de dwgr_detalle y asignamos este dwo al dw control llamado dw_detalle.

En el evento open de la ventana agregamos el siguiente código.

if message.doubleparm>0 then

dw_cabecera.retrieve(message.doubleparm)

dw_detalle.retrieve(message.doubleparm)

else

dw_cabecera.insertrow(1)

end if

Explicacion:

if message.doubleparm>0 then //preguntamos si recibe un message del tipo double, de ser así

recuperamos los datos según el parámetro pasado. Recuerden que asignamos un argumento en los objetos datawindows que habíamos creado. De caso contrario, inserta un registro en blanco en la cabecera.

Para ir viendo como va quedando agregaremos el siguiente script en el evento open de la aplicación.

En el botón nuevo de la ventana w_lista agregamos lo siguiente.

Explicación:

Abrimos la ventana pasando como parámetro el valor cero, de esta manera indicamos que vamos a registrar un nuevo registro. Si la ventana w_registro devuelve un mensaje del tipo double mayor a cero, entonces actualizamos el dw.

Ejecutamos la aplicación y debe verse de esta manera.

Poco a poco va tomando forma.

Regresamos a la ventana w_registro y vamos a crear tres funciones.

La primera se llamará uf_buscar, para lo cual primero vamos a tener que crear otra ventana del tipo response para poder buscar el producto a seleccionar. La ventana se llamará w_buscar y el dwo dwgr_product. No olviden colocar el WindowType que sea del tipo response.

Aquí creamos una función llamada uf_seleccionar()

int fila

string id_product

fila=dw_1.getrow()

if fila=0 then

return

end if

id_product=dw_1.getitemstring( fila,"product_code")

closewithreturn(this,id_product)

Esta función la llamaremos desde el evento doubleclic del dw control y desde el evento clic del cb_seleccionar.

Agregar además en el evento construct del dw control

Regresamos a la ventana w_registro y en la función uf_buscar agregamos el siguiente código.

Abrimos la ventana w_buscar, si el parámetro es correcto hacemos un select para obtener los datos del producto seleccionado (Esto también se podría haber hecho usando struct, el cual seria el valor devuelto por la ventana w_buscar).

Agregamos otra función llamada uf_agregar().

Agregamos otra función llamada uf_guardar

int id,i

dw_cabecera.accepttext( )

dw_detalle.accepttext( )

if dw_cabecera.update( )= 1 then

id=dw_cabecera.getitemnumber(1,1)

for i=1 to dw_detalle.rowcount( )

dw_detalle.setitem( i, "document_number", id)

if dw_detalle.update( )=1 then

commit using sqlca;

closewithreturn(this,1)

else

rollback using sqlca;

messagebox("Error",sqlca.sqlerrtext)

end if

else

rollback using sqlca;

messagebox("Error",sqlca.sqlerrtext)

end if

Ademas en el evento construct del dw_cabecera agregar el objeto de transacción.

y en el dw_detalle

Ejecutamos la aplicación para ir viendo como esta quedando. Le damos clic en nuevo y se abrirá la ventana de registro. Si desplegamos el campo supplier podemos observar que se muestra la lista de supplier que están registradas en la base de datos(ingresadas manualmente).

Agregamos el llamado de las funciones uf_agregar y uf_buscar en los botones cb_agregar y cb_buscar

No nos olvidemos del botón aceptar

Ejecutamos la aplicación para probarla.

Al ingresar los datos y al presionar el botón aceptar debe registrar los datos en la base de datos y mostrarlo en el dw de la ventana w_lista.

Si no se muestra ninguna datos verificar si se ha guardado en la base de datos y en e evento construct del dw_1 de la ventana w_lista verificar que este el siguiente codigo:

this.settransobject( sqlca)

this.retrieve( )

Descargar

Como averiguar si una columna existe en un datawindow

2020-08-17T11:08:00.001-05:00

Hay momentos en los cuales deseamos verificar si una columna existe o no. Como cuando creamos datawindows dinámicamente, esto se puede realizar usando la siguiente sintaxis:

dw_visualizar.Describe(columna + ".name")

En donde columna es una variable, la cual tiene almacenado el nombre de la columna y ".name" es una propiedad de la columna. Si existe la columna, devolverá el nombre de la columna, de caso contrario devolverá el símbolo "!".

string columna,s_columna

columna="nombre_columna"

s_columna=dw_visualizar.Describe(columna + ".name")

IF s_columna <> "!" THEN

//no existe

ELSE

//existe la columna

END IF

Cerrar todas las ventanas hijas - Powerbuilder

2020-07-31T18:50:00.000-05:00

Para cerrar todas las ventanas hijas de un MDI realizaremos lo siguiente.
Crearemos una funcion, en mi caso la llamaré uf_closewindowchild la cual recibirá como parámetro una variable del tipo window "iw_handle"
El código es el siguiente:

Integer li_counter,i

window lw_sheet

window aw_sheets[]

// valido el window solicitante

if IsNull(iw_handle) or not IsValid(iw_handle) then

return

end if

// obtengo toda las hojas abiertas

lw_sheet = iw_handle.GetFirstsheet( )

if IsValid(lw_sheet) then

li_counter++

aw_sheets[li_counter] = lw_sheet

lw_sheet = iw_handle.GetNextSheet(lw_sheet)

loop until IsNull(lw_sheet) or not IsValid(lw_sheet)

end if

for i=1 to li_counter

close(aw_sheets[i])

next

Para usarlo basta con colocar la siguiente instrucción uf_closewindowchild(w_principal), donde w_principal es mi ventana mdi.

Descargar

El ejercicio legal de la Criminalistica

2020-06-14T09:04:00.000-05:00

El ejercicio legal de la Criminalistica desarrollado por Marcelo Ebber el 13 de Junio del 2020.

Peru Hacking

PowerBuilder: Error - bind parameter value for is to big

2020-04-10T13:33:00.003-05:00

Error - bind parameter value for is to big

Este error se muestra cuando un queremos guardar una cadena bastante larga.

La solucion a este problema es seleccionar Disable Bind en el profile de ODBC(estoy trabajando con conexion ODBC)

Luego copiamos la sintaxys generado en el evento open.

Con esta opción ya podremos solucionar el error.

PowerBuilder: Control Personalizado - Editmask

2020-04-10T13:25:00.000-05:00

ontrol Personalizado - Editmask

Cuando usamos el control Editmask, este control muestra el valor ".00" cuando le hemos dado el formato decimal (Control Editmask de la derecha). Si queremos que este en blanco desde el inicio, debemos agregar codigo a este control. Para poder reutilizarlo vamos a crear un objeto del tipo Standar Visual y elegimos el objeto Editmask.

Nos dirijimos a la sección Event List

Agregamos un nuevo evento

Le damos un nombre al nuevo evento por ejemplo ue_char

Agregamos el siguiente codigo.

string texto
texto=this.text
if integer(this.text)=0 or this.text=".00" then
    this.setmask(decimalmask!,"####")
    return
end if
if len(this.text)=1 then
    this.setmask(decimalmask!,"####,###.00")
    this.text=texto
    this.selecttext( len(this.text)-2, 0)
end if

Aqui pueden descargar el codigo fuente. Esta desarrollado en powerBuilder 11.5.

Powerbuilder: Funciones.

2020-03-23T16:59:00.001-05:00

PowerBuilder : Activar Autoscript - Atajo de teclado

2020-02-22T21:20:00.001-05:00

Ahora para usar un atajo de teclado nos dirijimos a Tools->Keyboard Shorcuts

Luego a Edit->Activate AutoScript. una vez allí presionamos la combinacion de teclas que usaremos como atajo de teclado.

Consultar el ruc desde sunat sin ingresar el captcha.

2019-08-30T18:29:00.000-05:00

A continuación les dejo el codigo fuente de consultar datos de la SUNAT usando el número de RUC, el cual está desarrollado en Power Builder.

link del codigo fuente de giansalex(PHP): https://github.com/giansalex/peru-consult/tree/master/src/Peru/Sunat.

link del codigo fuente en PB: https://github.com/LEXBLAS/consultarRucPbNative

Error 3d Max c000375 windows 7: Solución

2019-04-19T20:16:00.000-05:00

Esta es una solución que encontré después de probar todas las alternativas que rondan en internet.

Para esto entramos a la opción 3d Max del Menú inicio y seleccionamos "Change Grafics Mode".

Nos debe aparecer la siguiente imagen.

Por defecto estará n la opcion Direct3D 11. Lo cambiamos por Legacy OpenGL y aceptamos los cambios. Con esto ya podemos ingresar con normalidad a 3d Max.

Restaurar basede datos desde una carpeta: Postgresql

2019-04-09T22:52:00.004-05:00

Restaurar basede datos desde una carpeta

Lo primero que debemos hacer es detener el servicio de Postgresql.

Una vez detenido copiamos a la carpeta data al directorio destino y reemplazamos todo el contenido. Luego en la carpeta data debemos eliminar el archivo postmaster.pid e iniciamos nuevamente el servicio de Postgresql e ingresamos al pgAdmin. Con esto ya deben visualizarse las base de datos que copiamos.

De salir algun error al iniciar el servicio, verifique los permisos de la carpeta "data". Asigne todos los permisos al usuario actual, quite el atributo de solo lectura e inicie nuevamente el servicio.

Error al iniciar apache en eclipse

2017-06-29T11:13:00.003-05:00

Hace unos dias se me presentó un problema al querer iniciar un proyecto de Spring Framework en eclipse.
Al iniciar el apache me arrojaba el siguiente error "Starting Tomcat v9.0 Server localhost has encountered a problem. Server Tomcat v9.0 Server at localhst failed to start."

Por mas que iniciara un nuevo proyecto en blanco, el error persistia. Asi que hice lo siguiente.
Entre a la carpeta "C:/usuarios/miusuario/". Dentro de esa carpeta borre tres carpetas:

.eclipse
.m2
.p2

Una vez eliminadas estas carpetas inicie nuevamente el proyecto en blanco y ahora si levantaba el proyecto con normalidad.

Nota: Tambien podria funcionar eliminando solamente la carpeta ". m2".

PowerBuilder - usando Treeview - Creando un Menu para nuestro sistema

2017-02-01T19:32:00.000-05:00

Lo primero será agregar un treeview al que llamaremos tv_menu y un boton. Dentro del boton es donde vamos a programar a modo de ejemplo. Una vez terminado, ustedes pueden colocar el codigo dentro de constructor del treeview.

El siguiente paso es agregar imagenes al treeview, los cuales seran usados para ser asignados a los items del treeview.

El número que esta al lado izquierdo de la imagen, indica el indice asignado de la imagen. Por ejemplo si deseamos asignar la imagen Asterisk a un item, entonces usaremos el indice 2.

Para insertar los items en el treeview usaremos la funcion insertitemlast.

control_treeview.insertitemlast( padre, "texto que aparecera",indice_de_la_imagen)

El primero parametro que recibe la funcion es el indice del padre, al iniciar el primer item o los primeros items, se le asigna el numero cero. El siguiente parametro es el texto que aparecera en el item y el tercer parametro es el indice de la imagen que se mostrará al lado del item.

Conforme se vayan insertando items, se van asignando automaticamente un indice correlativo.

Si queremos insertar un item hijo a compras el código seria así.

//hijos de Compras
tv_menu.insertitemlast( 3, "Proveedores",5)//11

Codigo para insertar los items al treeview
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//padres
tv_menu.insertitemlast( 0, "Almacen",1)//id 1
tv_menu.insertitemlast( 0, "Ventas",2)//id 2
tv_menu.insertitemlast( 0, "Compras",3)//id 3
tv_menu.insertitemlast( 0, "Configuracion",4)//id 4
//hijos

//hijos de almacen
tv_menu.insertitemlast( 1, "Tablas",7)//5
tv_menu.insertitemlast( 1, "Articulos",8)//6
tv_menu.insertitemlast( 1, "Grupos",9)//7

//hijos de Ventas
tv_menu.insertitemlast( 2, "Clientes",4)//8
tv_menu.insertitemlast( 2, "Documento de Venta",2)//9
tv_menu.insertitemlast( 2, "Reportes",3)//10

//hijos de Compras
tv_menu.insertitemlast( 3, "Proveedores",5)//11
tv_menu.insertitemlast( 3, "Documento de Compra",4)//12
tv_menu.insertitemlast( 3, "Reportes",7)//13

//hijos de Configuracion
tv_menu.insertitemlast( 4, "IGV",8)//14

//hijos de reporte de compras

tv_menu.insertitemlast( 13, "Reportes mensual",6)//15

/*********************************************************/

Si ejecutamos la aplicacion veremos que los items aparecen todos colapsados. Para desplegar los items usaremos el siguiente código.

long ll_tvi
int i

ll_tvi = tv_menu.FindItem(RootTreeItem! , 0)
tv_menu.ExpandAll(ll_tvi)
for i=1 to 3
    ll_tvi = tv_menu.FindItem(NextTreeItem! ,ll_tvi )
    tv_menu.ExpandAll(ll_tvi)

next

Si queremos abrir una ventana cuando presionen dos veces sobre un item, entonces debemos programar en el evento doubleclicked.
Para saber en que item se realizo el doble click, usamos el argumento handle del evento. Este argumento contiene el numero que indica el indice del item. Entonces para abrir una ventana sabiendo el numero de item seleccionado, usaremos choose case.

choose case handle
    case 5
        open(w_ventana1)
    case 6
        //otra ventana
    case 7
      //otra mas
end choose

Nota: Debe agregar una ventana llamada w_ventana1 al proyecto.

Descargar Codigo Fuente

PowerBuilder usando Dropdowndw

2017-01-31T10:08:00.004-05:00

PowerBuilder usando Dropdowndw

En el presente video se mostrará como usar columnas dropdowndw dependientes y el uso de getchild

Link del codigo fuente

Pruebas de Desempeño y Optimizacion en .NET

2017-01-24T09:47:00.001-05:00

Pruebas de Desempeño y Optimizacion en .NET

Paul Gravich y Chris Farrel

Idioma: Ingles

Páginas: 403

Descargar

Principios Pratrones y Practicas en C#

2016-11-25T10:16:00.001-05:00

Principios Pratrones y Practicas en C#

Idioma: Ingles
Páginas: 944

Autor: Robert C, Martin.

Para desarrollar aplicaciones de calidad este libro no habla sobre el uso patrones, buenas prácticas con c#.

Para el desarrollo de diferentes tipos de sistemas de informacion.

Descargar

Buenas practicas con VMWARE

2016-11-13T14:02:00.000-05:00

Parte 1 - Introducción a Vmware Sphere
Parte 2 - Gestión de Maquinas Virtuales
Parte 3 - Redes
Parte 4 - Almacenamiento
Parte 5 - Gestión de recursos

Hipervisor

El hipervisor es el componente más importante de toda una infraestructura basada en la virtualización, ya que es el componente que monitoriza las diversas máquinas virtuales que se ejecutan en un nodo determinado. Aquí monitoritzación se entiende como interceptación del uso de los recursos y autorización de acceso a los mismos, con lo que en el fondo estamos particionando un nodo para que pueda ejecutar varios entornos operativos (Linux, Windows, etc...)

Descargar

OpenGL con Qt

2016-10-31T23:05:00.001-05:00

En esta ocasión veremos un ejemplo de como usar OpenGL en Qt. Vale recalcar que solo se verá como usarlo, no se va a profundizar sobre el tema de OpenGL.

Primero vamos a crear un proyecto común y corriente(no se explicará esta parte por ser muy sencillo).
Una vez que tenemos nuestro proyecto, vamos a agregar una clase.
Clic derecho sobre el proyecto agregar nuevo... seleccionamos C++ Class

Le ponemos un nombre a nuestro Widget, por ejempo WidgetOpenGL

y en Base class Custom. Luego colocamos QOpenGLWidget y siguiente.

Finalmente les pedirá finalizar.

Ya tenemos nuestro proyecto con nuestra clase. Ahora vamos a modificar el archivo ".pro" para agregar las referencias a opengl. Agregaremos QT +=opengl y LIBS += -lOpengl32.

Ahora nos dirigimos a la clase que habiamos agregado y agregaremos las siguientes librerias.

#include <QOpenGLWidget>

#include <QOpenGLFunctions>

#include <QGLFramebufferObjectFormat>

Modificaremos la definicion de la clase.

class WidgetOpenGL : public QOpenGLWidget,protected QOpenGLFunctions

Agregamos las funciones virtuales que vamos a reimplementar.

void initializeGL() Q_DECL_OVERRIDE;//reimplementando las funciones virtuales
void resizeGL(int w, int h)Q_DECL_OVERRIDE;
void paintGL()Q_DECL_OVERRIDE;

Al final su archivo de cabecera widgetopengl.h se vera de la siguiente manera.

#ifndef WIDGETOPENGL_H
#define WIDGETOPENGL_H
#include <QOpenGLWidget>
#include <QOpenGLFunctions>


#include <QGLFramebufferObjectFormat>


class WidgetOpenGL : public QOpenGLWidget,protected QOpenGLFunctions
{
public:
    WidgetOpenGL();
explicit WidgetOpenGL(QWidget *parent = 0);
protected:
void initializeGL() Q_DECL_OVERRIDE;//reimplementando las funciones virtuales
void resizeGL(int w, int h)Q_DECL_OVERRIDE;
void paintGL()Q_DECL_OVERRIDE;


};


#endif // WIDGETOPENGL_H

Las funciones que hemos declarado van a ser implementadas.Asi que nos dirigimos

al archivo widgetopengl.cpp

Modificamos el archivo modificando el constructor.

WidgetOpenGL::WidgetOpenGL(QWidget *parent):QOpenGLWidget(parent)

 Agregando las funciones declaradas.

void WidgetOpenGL::initializeGL()
{
   

}


void WidgetOpenGL::resizeGL(int w, int h)
{


}


void WidgetOpenGL::paintGL()
{

}

 En la funcion initializeGL()vamos a agregar el siguiente código

 //esta parte sirve para poder usar las funciones de opengl

 initializeOpenGLFunctions();

 //Para habilitar o deshabilitar el buffer de profundidad
      glEnable(GL_DEPTH_TEST);

la fucion deberia quedar asi.

void WidgetOpenGL::initializeGL()
{
    initializeOpenGLFunctions();
      glEnable(GL_DEPTH_TEST);


}

la fucion resizeGL no la tocaremos por ahora, esta sirve como su mismo nombre

lo dice para redimensionar el contenido cuando la ventana cambia de tamaño.

Ahora vamos con el painGL. Aqui codificaremos nuestras instrucciones openGL.

Por ejemplo, si deseamos mostrar un rectangulo, usaremos la GL_POLYGON. Si han

usado openGL con glut, esto es lo mismo.

void WidgetOpenGL::paintGL()
{
    glClear(GL_COLOR_BUFFER_BIT|GL_DEPTH_BUFFER_BIT);
    glDepthFunc(GL_LESS);
    glEnable(GL_DEPTH_TEST);
    glShadeModel(GL_SMOOTH);
    // Resetear transformaciones
    glLoadIdentity();


    // LADO IZQUIERDO: lado verde
    glBegin(GL_POLYGON);


    glColor3f( 1.0, 0.0, 0.0 );
    glVertex3f(  0.5, -0.5, -0.5 );      // P1 es rojo
    glColor3f( 0.0, 1.0, 0.0 );
    glVertex3f(  0.5,  0.5, -0.5 );      // P2 es verde
    glColor3f( 0.0, 0.0, 1.0 );
    glVertex3f( -0.5,  0.5, -0.5 );      // P3 es azul
    glColor3f( 1.0, 0.0, 1.0 );
    glVertex3f( -0.5, -0.5, -0.5 );      // P4 es morado

    glEnd();
    glFlush();
      this->makeCurrent();
}

 Con esto ya tenemos lista nuestra clase. Ahora vamos a usarla en nuesta ventana.

En nuestra ventana(formulario) insertamos un widget.

 
 una vez agregado el widget hacemos clic derecho sobre el y elegimos Promote to...