4D v15.4
LIRE CORRESPONDANCE PORT SERIE
LIRE CORRESPONDANCE PORT SERIE
| LIRE CORRESPONDANCE PORT SERIE ( tabNums ; tabLibellés ) | ||||||||
| Paramètre | Type | Description | ||||||
| tabNums | Tableau entier long |
|
Tableau de numéros de ports série | |||||
| tabLibellés | Tableau chaîne |
|
Tableau de noms de ports série | |||||
La commande LIRE CORRESPONDANCE PORT SERIE retourne deux tableaux tabNums et tabLibellés contenant respectivement la liste des numéros et des noms des ports série de la machine courante.
Cette commande est utile sous Mac OS X car le système alloue dynamiquement les numéros des ports série lorsque vous utilisez un adaptateur série USB. A l’aide de cette commande, vous pouvez adresser les ports série étendus via leur nom (invariable), quel que soit leur numéro.
Note : Cette commande ne retourne pas de valeurs significatives avec les ports standard. Si vous souhaitez adresser un port standard, vous devez passer directement sa valeur (0 ou 1) à la commande REGLER SERIE (ancien mode de fonctionnement de 4D).
Cette méthode projet permet d'adresser le même port série (sans protocole), quel que soit le numéro qui lui a été attribué :
TABLEAU TEXTE($tNomPorts;0)
TABLEAU ENTIER LONG($tNumPorts;0)
C_ENTIER LONG($vNumport;$vNumportFinal)
`Connaître les numéros actuels des ports série
LIRE CORRESPONDANCE PORT SERIE($tNumPorts;$tNomPorts)
$vNumport:=Chercher dans tableau($tNomPorts;vNomport)
` vNomport contient le nom du port à utiliser, il peut provenir d'une boîte de dialogue,
` d'une valeur stockée dans un champ, etc.
Si(tNumPorts{$vNumport}=0)
$vNumportFinal:=0 `cas particulier sous Mac OS X
Sinon
$vNumportFinal:=tNumPorts{$vNumport}+100
Fin de si
REGLER SERIE($vNumportFinal;params) `params contient les paramètres de communication
... `Effectuer ici les opérations souhaitées
REGLER SERIE(11) `Fermeture du port
Produit : 4D
Thème : Communications
Numéro :
909
Nom intl. : GET SERIAL PORT MAPPING
Créé : 4D 2004
4D - Langage ( 4D v15.4)
4D - Langage ( 4D v15)
4D - Langage ( 4D v15.3)
