Acesso Ao Ms-dos Com Delphi

[RenatoMejias]

Alguém sabe o comando para executar comandos do MS-DOS no Delphi, por exemplo fazer um programa que dê o comando DIR.

[s3c]

Tente assim:

WinExec('cmd /k dir', SW_Show);

[RenatoMejias]

Realmente, ele dá um dir no dos, mas ainda não consegui meu objetivo. Aqui em casa temos uma rede, eu habilitei o serviço mensageiro em todos os computadores para poder enviar net send um para o outro, meu objetivo é fazer um programa onde você selecione através de um combobox o computador que você quer enviar a mensagem e um edit para escrever a mensagem que você quer enviar. Sei que ficaria mais ou menos assim:

"net send " & combobox1.text & " " & edit1.text;

Melhorou agora minha explicação ou está dificil?

[Graymalkin]

Realmente, ele dá um dir no dos, mas ainda não consegui meu objetivo. Aqui em casa temos uma rede, eu habilitei o serviço mensageiro em todos os computadores para poder enviar net send um para o outro, meu objetivo é fazer um programa onde você selecione através de um combobox o computador que você quer enviar a mensagem e um edit para escrever a mensagem que você quer enviar. Sei que ficaria mais ou menos assim:

"net send " & combobox1.text & " " & edit1.text;

Melhorou agora minha explicação ou está dificil?

E não é a mesma coisa? Ou seja:

WinExec('cmd /k net send ' + ComboBox1.Text + ' ' + Edit1.Text, SW_Show);

Não testei aqui, mas acredito que seria assim.

Abraços,

Graymalkin

[RenatoMejias]

Acredito que não Graymalkin, porque a função Winexec pede a entrada de um tipo de dados PAnsyChar e combobox1.text é do tipo String, ele não converteria.

[Graymalkin]

Acredito que não Graymalkin, porque a função Winexec pede a entrada de um tipo de dados PAnsyChar e combobox1.text é do tipo String, ele não converteria.

E não é só utilizar PChar() para converter?

Abraços,

Graymalkin