Delphi - reinicar el equipo

Hola como hagio para que desde un boton se reinicie mi pc,rengo entendido que se puede hacer eso incluso ya encontre como apagarlo pero no como reiniciarlo tambien se que no es el mismo codigo para todos los windws yp uso Win XP y Delphi 5 gracias

Puedes intentar con lo siguiente:

procedure TForm1.Button1Click(Sender: TObject);
begin
ExitWindowsEx(EWX_REBOOT,0);
end;

Espero que te sirva.

Saludos.