Hola de nuevo amigos/as del foro:
Aquí toi con otra dudilla-problema que me ha surgido
. Os agradecería si podeis que me echárais una mano. El tema es que hemos creado una aplicación en Delphi 7 y que necesitamos llamarla desde un programa desarrollado en Delphi 5.
Hasta aquí todo bien, ya que utilizamos llamadas a librerías DLL y funciona bien. Lo único y ahí está el problema, es que cada vez que llamo a una ventana del nuevo programa de Delphi 7 aparece como un nuevo botón en la barra de tareas con su correspondiente icono y claro, cuantas más se abran más botones aparecen
. Creo que tiene que ver algo con manejador de la aplicación (handle) que le pasamos para hacer la llamada, no? Pero no sé si es posible solucionarlo para que no aparezcan esos sucesivos botones. Algo hago parecido a esto:
Código Delphi
[-]
procedure PROCEDIMIENTOLLAMADA(var ..); stdcall;
var
Biblioteca: THANDLE;
Procedim: TProcD7;
begin
try
Biblioteca := LoadLibrary('C:\...\MILIBRERIA.DLL');
finally
if (Biblioteca >= HINSTANCE_ERROR) then
begin
try
@Procedim:=GetProcAddress(Biblioteca,'NOMBREPROGRAMA');
if (@Procedim <> nil) then
Procedim(application.handle);
finally
FreeLibrary(Biblioteca);
end;
end
else
Application.MessageBox('Error', 'Aviso', MB_ICONERROR+MB_OK);
end;
end;
Bueno, espero haberme explicado bien.
Gracias por todo,
Saludos y un abrazo,
Berto2003.