Aplicaçao

[Guest - Eduardo -]

Ola Amigos

Preciso de uma ajuda urgente. Preciso para temporariamente uma aplicacao que iniciei com o uso do Shellexecute, pois ela acessa um arquivo que tenho que ler.

Se eu precionar a tecla "pause" no teclado, o aplicativo para, e posso acessar o arquivo sem problemas, só que gostaria de fazer isso automatico.

Valeu

Eduardo

[bolomaster]

Posta a parte do seu ShellExecute

porque basta você adicionar um .pause.. que funciona ... ok

[Guest - Eduardo -]

O ShellExecute é normal, tipo

ShellExecute(Handle, 'Open', PChar('programa.exe'), nil, nil, SW_SHOW);

este programa.exe é um simulador, ele le dados de um arquivo texto, e grava os resultados em outro arquivo texto. Durante a simulacao, eu gostaria de poder mudar os dados iniciais, so que enquanto programa.exe roda, so posso ler os dados, não tenho como gravar os dados nos arquivos texto. Se eu aperto a tecla Pause no teclado, não tenho problemas em acessar os arquivos, so que eu quero deixar isso automatico.

Eu não entendi o que você quis dizer com .Pause, devo fazer ShellExecute(...).Pause????

[bolomaster]

Tipo eu não tenho certeza...

mas acho que é isso oh dentro de um button você pode

ShellExecute(Handle, 'Pause', PChar('programa.exe'), nil, nil, SW_SHOW);

Mas antes de você testar gostaria de dar uma pesquisada para ter certeza ok

Abraços

[Guest Alvarez]

var rk:TKeyboardState;

begin

GetKeyboardState(rk);

rk[VK_PAUSE] := 1;

SetKeyboardState(rk);

end;

[Guest - Eduardo -]

cara,

usei o que você escreveu ai, só que não acontece nada, tenho que declarar alguma coisa no uses.

Pelo que entendi, com esse comando, é como se alguém apertasse a tecla pause, é isso???