Vous êtes sur le site Web historique de la documentation de 4D. Les documentations sont progressivement déplacées vers developer.4d.com
GET SERIAL PORT MAPPING
| GET SERIAL PORT MAPPING ( 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 GET SERIAL PORT MAPPING 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 SET CHANNEL (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é :
ARRAY TEXT($tNomPorts;0)
ARRAY LONGINT($tNumPorts;0)
C_LONGINT($vNumport;$vNumportFinal)
`Connaître les numéros actuels des ports série
GET SERIAL PORT MAPPING($tNumPorts;$tNomPorts)
$vNumport:=Find in array($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.
If(tNumPorts{$vNumport}=0)
$vNumportFinal:=0 `cas particulier sous Mac OS X
Else
$vNumportFinal:=tNumPorts{$vNumport}+100
End if
SET CHANNEL($vNumportFinal;params) `params contient les paramètres de communication
... `Effectuer ici les opérations souhaitées
SET CHANNEL(11) `Fermeture du port
Produit : 4D
Thème : Communications
Numéro :
909
Créé : 4D 2004
4D - Langage ( 4D v20 R7)
