(Resolvido) Código para deixar o processador 100% ocupado

[Mestereko]

trabalho como beta tester, mas n tenho muito conhecimento em programação, mas já tenho noções, a um tempo atrás eu fiz um código que fazia o processador ficar em 100% sempre, até eu mandar párar, mas eu perdi esse código e n me lembro como que faz, será que alguém tem uma idéia de como isso pode ser feito ? eu sei q é possivel, mas n lembro como... estou precisando urgente disso pra um teste de software... já de antemão agradeço...

Editado Fevereiro 22, 2008 por Jhonas
3.6 É proibida a abertura de tópicos com títulos como "Socorro", "Ajuda", "Urgente", etc, ou com títulos que não descrevam a dúvida, como "Uma dúvida simples", "Alguém pode me ajudar?", "Dúvida de Ini

[Jhonas]

fiz um código que fazia o processador ficar em 100% sempre, até eu mandar párar

Exemplo: um programa de calculo em loop infinito vai fazer o processador ficar em 100%

voce pode usar um programa exemplo do delphi

C:\Arquivos de programas\Borland\Delphi5\Demos\Threads

basta deixa-lo rodando sem parar que o processador vai ficar em 100%

abraço

[Mestereko]

Consegui lembrar como fazia, na verdade é bem simples, algumas linhas resolvem o problema...

pra quem quizer fazer isso um dia na vida ai vai:

procedure TForm1.Button1Click(Sender: TObject);
begin
   _uFim := true;
   while _ufim do
   begin
     application.ProcessMessages;
     sleep(0);
   end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
   _uFim := false;
end;

você declara a _uFim com sendo uma variavel boolean e pronto, um botão serve pra ligar e o outro pra desligar... agora é só usar a imaginação... end. Consegui lembrar como fazia, na verdade é bem simples, algumas linhas resolvem o problema... pra quem quizer fazer isso um dia na vida ai vai:

procedure TForm1.Button1Click(Sender: TObject);
begin
   _uFim := true;
   while _ufim do
   begin
     application.ProcessMessages;
     sleep(0);
   end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
   _uFim := false;
end;
end.

// você declara a _uFim com sendo uma variavel boolean e pronto, um botão serve pra ligar e o outro pra desligar...

Editado Fevereiro 25, 2008 por Micheus
Adicionado o delimitador de código [code] [/code]. Lembre-se de utilizá-lo para melhor visualização