Aqui les dejo una funcion para ejecutar como administrador con delphi - Basada en el code de Rudeboy1991 en vb6.0

{Nemesis - 07/04/2013}

ShellExecute(Handle, 'runas',pchar(application.exename), nil, nil, SW_SHOWNORMAL);
application.terminate

Espero les sirva

Eso no ejecuta como Admin. gracias por el code

handle seria?

Eso lo que hace es solicitar la elevación para ejecutarse como admin, pero está mal planteado.. si en cada ejecución se efectúa el mismo procedimiento nunca va a terminar ya que tratas de abrir la propia aplicación cada vez, será un bucle..

Prefiero añadirle el manifest..