[FreePascal] Interpréter des commandes Linux

Bonjour à tous

Voila je débute sous Pascal, je commence à lire les tutoriels qui sont du reste très bien fait :)

Mais voila je me pose une question:
Comment peut on mettre une interprétation d'une commande linux, pour quel soit excuter lors de l'exécution du script?
Dans un script Bash il "suffit" de mettre un cd ou un cat

Merci d'avance pour votre aide :roll:

Bonjour,

Pour exécuter des commandes externes, il suffit d'utiliser la procédure Exec. Il y a un exemple d'utilisation dans la FAQ : http://pascal.developpez.com/faq/

@++

Merci pour ta réponse aussi rapide :)

Donc j'ai saisi un bout de code pour tester, il doit m'ouvrir un fichier :

Code:

---

1 2 3 4 5 6 7

program essais BEGIN SwapVectors; Exec('cat monfichier', ' ') ; SwapVectors; END.

---

Mais lors de la compilation, j'ai une message d'erreur :?

audiences.pas(3,1) Fatal: Syntax error, ";" expected but "BEGIN" found
audiences.pas(3,1) Fatal: Compilation aborted

Je sais pas trop d'où cela vient, d'un ";" pourtant il y sont non?

Merci d'avance

@+

après

Code:

---

program essais;

---

Merci bien, même pas vu trop nul :oops:

Par contre j'ai de nouveau une erreur :?

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

ree Pascal Compiler version 2.0.2 [2005/11/26] for i386 Copyright (c) 1993-2005 by Florian Klaempfl Target OS: Linux for i386 Compiling daudience.pas daudience.pas(3,12) Error: Identifier not found "SwapVectors" daudience.pas(3,23) Error: Illegal expression daudience.pas(4,13) Error: Identifier not found "Exec" daudience.pas(4,41) Error: Illegal expression daudience.pas(5,13) Error: Identifier not found "SwapVectors" daudience.pas(5,24) Error: Illegal expression daudience.pas(7) Fatal: There were 6 errors compiling module, stopping daudience.pas(7) Fatal: Compilation aborted Error: /usr/bin/ppc386 returned an error exitcode (normal if you did not specify a source file to be compiled)

---

Il reconnait pas la fonction Swapvectors je crois :(, j'ai installé la bibliothèqye contenu dans freepascal pourtant :cry:

Si quelqu'un à la solution je veux bien :roll:

Merci

Il faudrait peut-être mettre le bon uses ?

pour swapvectors on peut lire dans la doc :

Citation:

---

SwapVectors


Declaration:
Procedure SwapVectors ;

Description:
SwapVectors swaps the contents of the internal table of interrupt vectors with the current contents of the interrupt vectors.

This is called typically in before and after an Exec call.


Errors:
Under LINUX this call does nothing, as the interrupt vectors are managed by the kernel.

---

bref ça n'a pas l'air très utile sous linux :)

Quand à l'utilisation de exec,
c'est une commande incluse dans l'unité dos, il faut donc ajouter comme te l'a indiqué wormful_sickfoot

Code:

---

Uses dos;

---

Bonne continuation...

Re

Excusez moi j'étais parti la semaine dernière

Donc en effet j'ai bien mis :

Code:

---

1 2

uses dos;

---

J'ai donc plus d'erreur pendant la compilation mais par contre lorsque j'exècute le programme, rien ne se passe :(

Il devrait m'afficher les lignes du fichier non?

Merci de nouveau pour votre aide :roll: [/code]

Bonjour,

Le nom de l'exécutable et ses paramètres doivent être spécifiés séparément. Il faut aussi récuperer le code d'erreur pour voir ce qui s'est passé...

@++