Código: Seleccionar todo
************************************************************************
Autor:K-0Z
Lenguaje:Delphi
Modo De Uso:DelphiExecute(SFilePath,True or false)
Agradecimientos:BlackzeroX
Pagina web: www.indetectables.net
************************************************************************
uses ComObj;
function DelphiExecute(sFilePath:string;Hidden:bool):bool;
var
Vari:olevariant;
begin
vari:= CreateoleObject('Shell.Application');
vari.shellexecute(sFilePath, '', '', 'open', abs(strtoint(booltostr(not Hidden))));
DelphiExecute:= true;
end;
DelphiExecute('c:\pruebame.exe',false);
Salu2