[Delphi] Accéder au port parallèle

Version imprimable

15/05/2006, 21h55
zozizozu

[Delphi] Accéder au port parallèle

Bonjour a tous ;
Je decouvre tout juste le pascal et suis un homme heureux . :D .
Cependant, mon unit I2C qui se compille tres bien avec tpx me renvoie un message d erreur quand je compille avec Delphi.6 :
" [Erreur] I2C.PAS(306): Identificateur non déclaré : 'Port'
[Avertissement] I2C.PAS(323): Combinaison de types signés et non signés - opérandes agrandis "

J ai donc rajouter ds mon I2C.PAS :

Code:

Var Port : ARRAY[0..2] OF Integer;

, et je n ai aucun message d erreur , cependant, l'.exe tourne, mais ne fontionne pas (pas de com avec i2c )....

Pour voir les fichiers j ai donc DA1.PAS et original_I2C.PAS qui se compillent tres bien avec tpx ( in / ount sur le port parallèle ),
et DelfDA1.dpr et I2C.PAS qui ne renvoie que le write('LeLog') dans Delphi.6 sans message d'erreur, mais sans aucune communication avec le port parallèle.

Mon pb est que je veus rajouter une lecture de socket, et que les exemples que je trouve se complillent tres bien avec Delphi.6 , mais pas du tout avec tpx .....

Au secour, newbe à la mer ... :cry:

Merci de votre comprehention/attention
17/05/2006, 22h30
Juju_41

Bonjour et bienvenue sur developpez.com ;)

Même si TP et Delphi ont un point commun, à savoir le langage Pascal, le code écrit dans l'un n'est pas forcément compatible avec l'autre.

La grosse différence est que TP est destiné à faire tourner des programmes sous DOS alors que Delphi, lui, les fait tourner sous Windows.

Sous TP, port permet d'accéder directement aux ports système, ce qui est interdit sous Windows ... c'est pourquoi Delphi n'intègre pas port. Le fait de déclarer un tableau port[] permet de passer l'étape de la compilation, mais bien évidemment le lien avec les ports système n'est pas fait, donc "ça ne marche pas".

Pour votre problème il va falloir accéder au port parallèle via l'API de Windows et non directement avec les ports.

Bon courage !
17/05/2006, 23h00
zozizozu

Genial ! , rigolo aussi, c est ce que j ai compris il y a quelques heures .
De plus, je me connectais pour rendre cette discussion Resolue :

L'unitee en question (i2c) a deja etee reecrite pr delphi :
http://home.wanadoo.nl/hihihi/k8000-libs.html

Apparement , pour la fonction port , :

Code:

PortIn (StatusPort)

au lieu de

Code:

Port(StatusPort)

a l air d etre suffisant .

J'ai trouve, j ai compile, je suis comble ....., meme si j ai pas tout comprit

Donc , merci a lui, a toi et vous tous

A bientot je crois ;)