• Comunicados

    • Gabriel Torres

      Seja um moderador do Clube do Hardware!   13-02-2016

      Prezados membros do Clube do Hardware,

      Está aberto o processo de seleção de novos moderadores para diversos setores ou áreas do Clube do Hardware. Os requisitos são:
        Pelo menos 500 posts e um ano de cadastro; Boa frequência de participação; Ser respeitoso, cordial e educado com os demais membros; Ter bom nível de português; Ter razoável conhecimento da área em que pretende atuar; Saber trabalhar em equipe (com os moderadores, coordenadores e administradores).   Os interessados deverão enviar uma mensagem privada para o usuário @Equipe Clube do Hardware com o título "Candidato a moderador". A mensagem deverá conter respostas ao formulário abaixo:    Qual o seu nome completo? Qual sua data de nascimento? Qual sua formação/profissão? Já atuou como moderador em algo outro fórum, se sim, qual? De forma sucinta, explique o porquê de querer ser moderador do fórum e conte-nos um pouco sobre você.   OBS: Não se trata de função remunerada. Todos que fazem parte do staff são voluntários.
    • DiF

      Poste seus códigos corretamente!   21-05-2016

      Prezados membros do Fórum do Clube do Hardware, O Fórum oferece um recurso chamado CODE, onde o ícone no painel do editor é  <>     O uso deste recurso é  imprescindível para uma melhor leitura, manter a organização, diferenciar de texto comum e principalmente evitar que os compiladores e IDEs acusem erro ao colar um código copiado daqui. Portanto convido-lhes para ler as instruções de como usar este recurso CODE neste tópico:  
Entre para seguir isso  
Seguidores 0
Guest mvdias

[Resolvido] Pascal

2 posts neste tópico

<font color='#000000'>Pessoal

      gostaria de saber como faço para executar comandos no pascal, comandos esse do dos. tipo : telnet, net use ou quallquer outa aplicação onde eu possa definir o caminho. Eu utilizo o Free pascal ou turbo pascal  versão 1.4 para windows.

Atenciosamente,

marcos.</font>

Compartilhar este post


Link para o post
Compartilhar em outros sites

<font color='#000000'>program oi;

{$M 8192,0,0}

uses Dos,crt;

var Command    : string[79];

begin.

   clrsrc;

   Command := '/C ' + 'dir c:';

   SwapVectors;

   Exec(GetEnv('COMSPEC'), Command);

   SwapVectors;

   readkey;

end.

Aqui tá um exemplo q acredito ser a forma mais fácil de se entender algo... onde tem " Command := '/C ' + 'dir c:'; "

você pode trocar o " 'dir c:' " por qualquer outro comando.

não ESQUEÇA DE COLOCAR ESSA DIRETIVA DE COMPILAÇÃO: " {$M 8192,0,0} "

O q faz o comando é, então repita-o qnts vezes quiser.

   Command := '/C ' + 'dir c:';

   SwapVectors;

   Exec(GetEnv('COMSPEC'), Command);

   SwapVectors;

falou</font>

Compartilhar este post


Link para o post
Compartilhar em outros sites
Visitante
Este tópico está impedido de receber novos posts.
Entre para seguir isso  
Seguidores 0