Librería/Biblioteca de componentes GlibWMI v.3.2 compatible con Delphi 12

[Neftali [Germán.Estévez]]

Espero que sean de ayuda.

[navbuoy]

Neftali, las has hecho tu? justo andaba buscando algo asi

es genial, he estado viendo los EXE de las demos y pfffft... menudo curro

[Casimiro Noteví]

Es que Neftali es un maestro

[navbuoy]

yo es que solia usar para estas cosas las LMD Tools pero creo que las de Germán vienen muy completitas
si no da muchos quebraderos de cabeza para el deployment y solo hay que incluir algun BPL creo que me
van a venir muy bien para ciertas cosas.

[Casimiro Noteví]

Con delphi se instalan desde "getit".

[navbuoy]

tranquilo Casimiro, soy un MAESTRO JEDI de los Packages y el compile/install

el GetIt no me va y supongo que ya sabras porque jajaja (shhhhh)

[Neftali [Germán.Estévez]]

Empezado por navbuoy

Neftali, las has hecho tu?

Si.

Empezado por navbuoy

justo andaba buscando algo asi

Pues espero que te sirvan.
Si detectas algún error, puedes enviarme un mensaje directamente o incluso si necesitas alguna clase que no esté (sugerencia) dímela.

En breve, a ver si tengo un hueco uy las compilo para las últimas versiones (12.1 y 12.2). No debería haber problemas y deberían compilar y funcionar sin hacer nada.

[navbuoy]

si, puede que le de a las neuronas cuando este mejor (esta noche no he dormido ni 5 minutos programando Stardust, estaba inspirado ajjaaj)

cuando se me ocurra que añadidos puedes ponerle te lo diré

[navbuoy]

Neftali, tus componentes te dicen el numero de serie de los discos duros? eso podria resultar util para hacer cosas antipirateria te explico lo que pensé

//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////// SISTEMA DE LICENCIAS DE PROMTO ///////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
paso 1) --- La app va construida de forma que inicialmente es version FREE (gratis pero con limitaciones como por ejemplo que no pueda usar la
feature de ChatGPT via API directo para hacerle preguntas, que el numero de notas y pins sean los justos para probar un poco el funcionamiento
pero no te permitan montar muchas plantillas ni nada

paso 2) --- nosotros en un servidor MySQL tendriamos la Tabla (base de datos con unas claves de licencia generadas en cientos de miles de usuarios
o 1 millon o 2 millones o los que sean, inicialmente un numero grande para no preocuparnos de eso..... esos registros, tendran la clave
pero no estaran a nombre de nadie.....

paso 3) EL PAGO de la Membresia en nuestra pagina web una vez completado el pago con exito, la propia pagina web en php asignara el email,
nombre del cliente etc en una licencia de esas "vacias" y aqui viene lo bueno.....le enviara un email con la licencia....bien hasta aqui todo normal
pero....ahora....

paso 4) para activar la licencia tendra un menu en la app que tendra que meter su email y su licencia y una contraseña que el usuario elija,
dicha contraseña, le servira para poder re-activar nuestra app en caso de que cambie de PC o se le muera el disco duro porque....
lo que hace la app al enviar email-licencia y password....al mismo tiempo pillara un par de datos cruciales del PC
(por ejemplo el numero de serie de su disco duro y algo mas por ahi que veamos que puede identificar unicamente a ese PC)
lo archivara todo en la Base de datos junto con la licencia y el email, password etc de forma que si por ejemplo otro tio intenta usar
el email y licencia porque el tio dijo "oye, prueba mi licencia a ver si nos deja usar la misma" pues Promto comprobara el SERIE DE Disco duro
y vera que no coinciden asi que al otro que meta la licencia copiada no le funcionara nunca .....
y si el pavo que la pagó cambia el disco duro por otro, o se le incendia el puto PC y no quedan mas que hierros retorcidos,
pues teniendo la password y con una app FREE, metiendo esos datos y la password en una especie de opcion recovery aparte,
lo que haria nuestra app es asignarle a la BD Nuestra su nuevo ID de disco duro tras comprobar que la password del tio es valida y coincide
con la que se utilizo al activarlo

ese seria el sistema mediante el cual podemos asegurarnos un poco mas que nadie usa las licencias de otro
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

[Neftali [Germán.Estévez]]

Empezado por navbuoy

Neftali, tus componentes te dicen el numero de serie de los discos duros? eso podria resultar util para hacer cosas antipirateria te explico lo que pensé

Si.
Justo hay una demo que te muestra las características/propiedades de los discos duros instalados.
Entre la información disponible está el número de serie.
También hay otra que hace lo propio con la BIOS, que también puede ser útil para estos temas.

[navbuoy]

Neftali, tus componentes te dicen el numero de serie de los discos duros? eso podria resultar util para hacer cosas antipirateria te explico lo que pensé

//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////// SISTEMA DE LICENCIAS DE PROMTO ///////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
paso 1) --- La app va construida de forma que inicialmente es version FREE (gratis pero con limitaciones como por ejemplo que no pueda usar la
feature de ChatGPT via API directo para hacerle preguntas, que el numero de notas y pins sean los justos para probar un poco el funcionamiento
pero no te permitan montar muchas plantillas ni nada

paso 2) --- nosotros en un servidor MySQL tendriamos la Tabla (base de datos con unas claves de licencia generadas en cientos de miles de usuarios
o 1 millon o 2 millones o los que sean, inicialmente un numero grande para no preocuparnos de eso..... esos registros, tendran la clave
pero no estaran a nombre de nadie.....

paso 3) EL PAGO de la Membresia en nuestra pagina web una vez completado el pago con exito, la propia pagina web en php asignara el email,
nombre del cliente etc en una licencia de esas "vacias" y aqui viene lo bueno.....le enviara un email con el numero de licencia....bien hasta aqui todo normal
pero....ahora....

paso 4) para activar la licencia tendra un menu en la app que tendra que meter su email y su licencia y una contraseña que el usuario elija,
dicha contraseña, le servira para poder re-activar nuestra app en caso de que cambie de PC o se le muera el disco duro porque....
lo que hace la app al enviar email-licencia y password....al mismo tiempo pillara un par de datos cruciales del PC
(por ejemplo el numero de serie de su disco duro y algo mas por ahi que veamos que puede identificar unicamente a ese PC)
lo archivara todo en la Base de datos junto con la licencia y el email, password etc de forma que si por ejemplo otro tio intenta usar
el email y licencia porque el tio dijo "oye, prueba mi licencia a ver si nos deja usar la misma" pues Promto comprobara el SERIE DE Disco duro
y vera que no coinciden asi que al otro que meta la licencia copiada no le funcionara nunca .....
y si el pavo que la pagó cambia el disco duro por otro, o se le incendia el puto PC y no quedan mas que hierros retorcidos,
pues teniendo la password y con una app FREE, metiendo esos datos y la password en una especie de opcion recovery aparte,
lo que haria nuestra app es asignarle a la BD Nuestra su nuevo ID de disco duro tras comprobar que la password del tio es valida y coincide
con la que se utilizo al activarlo

ese seria el sistema mediante el cual podemos asegurarnos un poco mas que nadie usa las licencias de otro

y el unico punto debil seria que nos hackeen la BD claro
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

si se os ocurre como mejorarlo o proteger la BD a saco estare encantado de leer vuestras sugerencias

por cierto Neftali, crees que podrias hacer un componente que codifique un texto en plan contraseña a contraseña encriptada con SHA etc ??? eso seria genial al menos para mi que me he vuelto loco trasteando con eso, no se muy bien hacerlo para C++ builder aunque con PHP si

[navbuoy]

chatgpt me dio esta opcion con los componentes INDY

AnsiString CodificarSHA256(const AnsiString &texto)
{
    // Crea una instancia de la clase de hash SHA256
    TIdHashSHA256 *sha256 = new TIdHashSHA256();
    AnsiString resultado;

    try {
        // Convierte el AnsiString en un TIdBytes manualmente
        TIdBytes buffer;
        buffer.Length = texto.Length(); // Ajusta el tamaño del buffer

        for (int i = 0; i < texto.Length(); i++)
        {
            buffer[i] = static_cast<unsigned char>(texto[i + 1]); // Convierte cada carácter
        }

        // Calcula el hash en un TIdBytes
        TIdBytes hash = sha256->HashBytes(buffer);

        // Convierte el hash a una cadena hexadecimal
        resultado = sha256->HashBytesAsHex(hash);
    }
    __finally {
        delete sha256;  // Libera la memoria
    }

    return resultado;
}

Uso de la funcion:

AnsiString texto = "MiTextoSeguro";
AnsiString hash = CodificarSHA256(texto);
ShowMessage(hash);

[navbuoy]

olvidaos del anterior ejemplo, hay una manera mucho mas facil

incluir el System.Hash unit en delphi o System.Hash.hpp en C++ builder

y simplemente si tenemos la contraseña en un MaskEdit hacer esto

AnsiString password_hash = THashSHA2::GetHashString(MaskEdit1->Text, THashSHA2::TSHA2Version::SHA256);