Ver Mensaje Individual
  #5  
Antiguo 25-01-2008
Avatar de juanmdq
juanmdq juanmdq is offline
Miembro
 
Registrado: dic 2004
Posts: 52
Reputación: 20
juanmdq Va por buen camino
Ahi lo probe. Quedo mas o menos asi :

SearchPath := Registry.ReadString('\Software\Borland\Delphi\7.0\Library\SearchPath', False);
SearchPath := StringReplace(SearchPath, '$(Delphi)', 'c:\Archivos de Programa\Borland\Delphi7', [rfReplaceAll]);
SearchPath := StringReplace(SearchPath, '$(ProgramFiles)', 'c:\Archivos de Programa', [rfReplaceAll]);
SetEnvironmentVariable('RUTACOM', PChar(Searchpath));
RunCommand('dcc32 -$D- -$L- -$Y- -$M- -B -I"%rutaCOM%" -U"%rutaCOM%" ' + dpr.Name);

Lamentablemente me sigue tirando el mismo problema de package rtl not found.
__________________
Al infierno se llega por atajos.

Última edición por juanmdq fecha: 25-01-2008 a las 13:41:32.
Responder Con Cita