Bjr les gars svp j'aimerai communiquer avec le pic et l'interface realisée avec delphi. j'aimerai avoir les instructions pour envoyer un caractere/chaine de caractere respectivement avec Proton d'abord et Delphi ensuite. voici c k jai fais, mais g nariv pas à corriger les erreurs.
Dim SerString[2] As Byte ' Create a 10-byte array.
HRSIn Str SerString ' Fill the array with received data.
HSerOut [Str SerString ]
If SerString[2] = 65 Then
High PORTD.0
ElseIf SerString[2] = 66 Then
High PORTD.1
ElseIf SerString[2] = 67 Then
High PORTD.2
Else
High PORTD.3
EndIf.
merci davance
-----