Mensajes

Pues para empezar tendrías que deshacerte del CreateProccess.

Yo ni idea de cómo trabajar con funciones enfocadas al nivel binario, pero el algoritmo vendría siendo un código que haga un GetProcess, luego un ReadFile para obtener los datos binarios. Cuando tengas en tu poder el programa descompuesto a instrucciones de nivel máquina, buscas la dirección de memoria en la que se encuentren las dependencias del programa y le agregarías, no sé, una referencia hacia el archivo DLL.

Lo que no sé es si para eso tendrías que correr todas las direcciones para que quepa tu offset de código o hacer unos JMP que redireccionen.

Repito, ni idea de aquella zona de VB pero creo que esa es la forma.

Hilsen.

Léete las chinchetas.

 

Je, bueno, creo que quedé medio trahumado por una aplicación que estoy haciendo (en lugar de un vbphotoshop es un vbnotepad2.exe,  osea, mi versión personalizada del notepad2.exe) y pues para aprender algo más decidí hacer casi todo con APIs y sin tantos controles ni dependencias por parte deVB, de modo que mi procedimiento main() quedó algo grande y con varias llamadas a procedimientos aún más grandes, y aunque no pasa de los 3 segundos en cargar (si se ejecuta por primera vez) ya me acostumbré a las cargas rápidas.

De cualquier forma sólo dije que yo no lo haría con un timer porque me parece innecesario.

Hilsener.

Ve »Aki« y cuando esté cargada la página das Edición/Buscar y tecleas: "Pueden ver como los caracteres están rotados o girados en cierto grado." Y checa por esa zona para que inspecciones los tips sobre las APIs.

Hilsen.

Yo soy de la idea de que, para casos como este, un Timer muestra falta de creatividad. Es mi pensamiento sólamente.

Hilsen.

Tan solo es cosa de ponerse a pensar un tantito:

frmMain.frm está con .Visible = False y frmSplash.frm en .Visible = True

frmMain ejecuta el proceso, digamos:

Código [Seleccionar] Expandir

Sub Main()

   CargarComponentes()
   CrearInterfaz()
   Inicializar_aplicación()
   
   'Ya está todo listo

   DestroyWindow(frmSplash.hWnd)
   frmMain.Visible = True

End Sub

Hilsen.

Es evidente que Vb6 va a caer en deshuso, así como también es evidente que falta aun más para que aquello suceda, pero al igual que como lo fueron Clipper, Cobol, Fortran, BASIC, VB6 pasará a ser un lenguaje obsoleto y sin utilidad, reemplazado por versiones posteriores como la ahora VB.NET. Pero, buscando opiniones ajenas, pregunto: ¿cuántos tiempo más crees que valla a estar en uso VB6 (VB98)? y ¿qué factores crees que influyan en su desaparición?

Hilsen.

Muy bien .

[NekroAyuda: Trabajar con APIs en Visual Basic 6.0.]

NekroAyuda: Trabajar con APIs en Visual Basic 6.0.
http://foro.elhacker.net/index.php/topic,61596.0.html

Guía de referencia para el uso de las APIs
http://www16.brinkster.com/eduroam/api/default.asp?pag=cap1