Newsgroup: it.comp.lang.delphi
Titolo: [OT] Immenso... (Si parla di VB)

Salve a tutto il NG!
Scusate se chiedo qui ma sul NG di VB non ho avuto risposta e un mio collega
stà svalvolando sul problema...
Io ho un programma scritto in VB che attraverso la porta COM comunica con
una macchina.
Il problema è questo:
Il programma deve spedire i seguenti caratteri (scritti in Hex):   81 , 01 ,
04
Invece io mi ritrovo sulla macchina i singoli numeri scritti in ASCII.
ESEMPIO: 81 me lo scrive 38 (8 scritto in ASCII HEX) 31 (1 ASCII HEX) , 30
(0 ASCII HEX) 31 (1 ASCII HEX) ECT
In pratica mi servirebbe che il programma mi invii il carattere che
corrisponde a 81 in ASCII HEX e non l'8 e l'1 separati
Sò che non sono stato molto chiaro ma spero che abbiate capito e che
possiate aiutarmi
Grazie anticipatamente,
Ciao, Paolo.

BerserKer wrote:

in questo NG, rischi un plonk  a parlare di VB  =8^))
CMQ..
print#MiaPorta, chr$(81)+chr$(01)+chr$(04);        '// invia  =>  HEX 81+01+04
senza CRLF
ciao
maurizio

 corrisponde a 81 in ASCII HEX e non l'8 e l'1 separati
Ma non indichi: COME i dati vengono inviati...
Via il componente com di vb? Via WinApi? Via telepatica?
In che
Ne come vengono letti.
Bye
AS
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Tralascio il print# (suppongo che usi l'MSComm ma dato che non specifica
COME parli con la seriale magari usa la telepatia...), ma convertire "81"
nell'esadecimale 81 richiede Chr$(CLng("&H81")); va da se' che se "81" e'
contenuto in una variabile stringa S sara' Chr$(CLng("&H" & S)).
Chr$(81) e' il carattere ASCII 81d, non 81h. L'equivalente del $n in Delphi
e' &Hn in VB.
Ciaotutti,
*

una bella edit & continue lascerei VB per Delphi... Ieri.
ROTFL...


 contenuto in una variabile stringa S sara' Chr$(CLng("&H" & S)).
pork... sono un po' VB_arrugginito, ossido_di_Deplhi  :-)
Mi sono scordato &H... ma pero' non capisco come possa funzionare la definizione
di un char tramite CLng e sopratutto fra virgolette....
Telepatia?
Grazie per la puntale correzione.
Ciao!
maurizio


Sara', ma VB4 era SDI, VB5 era MDI: il piu' comodo tra i due era VB5.
Cliccare un pixel piu' in la' e vedermi apparire un'altra applicazione e'
una gran rottura di scatole...
Ciaotutti,
*


Ma una bella Immediate non ci starebbe tanto male (ed al limite puo' essere
simulata con una E&C sufficientemente valida)...
Ciaotutti,
*


Chr$ vuole un numero, mentre CLng accetta una stringa, anche formattata, e
restituisce un numero; CLng("&H10") = 16.
In pratica, CLng si occupa di fare la conversione da Hex a decimale, poi
Chr$ si trova in ingresso un normale input decimale :)
Ciaotutti,
*

Chiedo venia Roal, decisamente sono rimasto mooolto indietro in VB   :-(
Ho lanciato il VB6 in azienda ed ho visto che mastica char UnsLng e accetta
le virgolette
Ciao
maurizio

 Delphi :P
E tu credi che questo sia sufficiente a fermarli ???


> ROTFL...
Ke kakkio significa?
Bye
AS
"Se è Microsoft non funziona"



Non "credo", hanno rimesso entrambe le feature nelle ultime beta, e' un dato
di fatto :)
Sai, quando *tutti* i tuoi utenti si lamentano (e non per un generico "non
funziona" ma per "mi hai tolto una feature che mi serviva, rimettila o non
compro il software") devi adeguarti anche se ti chiami Microsoft.
Ciaotutti,
*