Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #4  
Antiguo 03-06-2008
Avatar de Gambito
Gambito Gambito is offline
Miembro
 
Registrado: jul 2006
Posts: 10
Poder: 0
Gambito Va por buen camino
Hola, Pues para evitar el uso intensivo de la CPU, modifique la funcion que realiza el llamado a aplicaciones externas, para que no se quede esperando a que la nueva aplicacion termine. la funcion quedo asi.

Código Delphi [-]
 
function ExecuteApp ( sbApp, sbParameters, sbDir : String):boolean;
var
  SEInfo: TShellExecuteInfo;
//  ExitCode: DWORD;
begin
  FillChar(SEInfo, SizeOf(SEInfo), 0);
  SEInfo.cbSize := SizeOf(TShellExecuteInfo);
  with SEInfo do begin
    fMask        := SEE_MASK_NOCLOSEPROCESS;
    Wnd          := Application.Handle;
    lpFile       := PChar(sbApp);
    lpParameters := PChar(sbParameters);
    lpDirectory  := PChar(sbDir);
    nShow        := SW_SHOWNORMAL;
  end;
  Result := ShellExecuteEx(@SEInfo);

end;

Pero aun con este cambio no se soluciono el problema, aun se seguia presentando el problema de "OUT OF SYSTEM RESOURCES".
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Delphi resources Delfino Noticias 0 20-02-2007 10:57:08
utilizar Libc.system() guachinpon Lazarus, FreePascal, Kylix, etc. 0 21-06-2006 00:46:55
System Error 127 Kafu Firebird e Interbase 0 14-04-2004 17:07:35
driver not known to system? maruenda Varios 0 25-03-2004 15:25:30
system menu / icons tango01 OOP 3 06-01-2004 16:15:59


La franja horaria es GMT +2. Ahora son las 05:57:18.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi