Gambas-it

Gambas3 => Programmazione => Topic aperto da: takoda - 09 Gennaio 2013, 10:54:01

Titolo: la stringa è vuota
Inserito da: takoda - 09 Gennaio 2013, 10:54:01

varTemp as variant
StrNode  as string
strOutput as string

strNode ="200"
varTemp = Hex$("1000", 4)

strOutput = Chr$(CByte(Val("&H" & strNode))) & Chr$(3) & Chr$(CByte(Val("&H" & Left$(varTemp, 2)))) & Chr$(CByte(Val("&H" & Right$(varTemp, 2)))) & Chr$(0) & Chr$(1)


PRINT strOutput

E strOutput È VUOTA

Nota: Sto convertendo un progetto di gambas 1
Titolo: Re: la stringa è vuota
Inserito da: vuott - 09 Gennaio 2013, 15:17:03

E strOutput È VUOTA

:ciao:
Ho provato quel codice. A me il risultato non è vuoto. Infatti in console mi dà questi caratteri:
^@^C^C�^@^A

Volendo vedere a quali valori byte corrispondessero, ho salvato il contenuto della variabile di tipo stringa strOutput in un file; e sono andato a vedere i valori con un editor esadecimale. Ecco i valori dei byte del file:
00 03 03 E8 00 01

Titolo: Re: la stringa è vuota
Inserito da: allegfede - 09 Gennaio 2013, 20:20:53

varTemp as variant
StrNode  as string
strOutput as string

strNode ="200"
varTemp = Hex$("1000", 4)

strOutput = Chr$(CByte(Val("&H" & strNode))) & Chr$(3) & Chr$(CByte(Val("&H" & Left$(varTemp, 2)))) & Chr$(CByte(Val("&H" & Right$(varTemp, 2)))) & Chr$(0) & Chr$(1)


PRINT strOutput

E strOutput È VUOTA

Nota: Sto convertendo un progetto di gambas 1



certo che cose del tipo:
strOutput = Chr$(CByte(Val("&H" & strNode))) & Chr$(3) & Chr$(CByte(Val("&H" & Left$(varTemp, 2)))) & Chr$(CByte(Val("&H" & Right$(varTemp, 2)))) & Chr$(0) & Chr$(1)

non e' che siano proprio leggibili ;-)
Titolo: Re: la stringa è vuota
Inserito da: fsurfing - 09 Gennaio 2013, 21:50:30
quoto, e comunque a me da lo stesso risultato di vuott
Titolo: Re: la stringa è vuota
Inserito da: takoda - 10 Gennaio 2013, 09:22:35
grazie mille riproverò forse il problema è mio , per la leggibilità il codice non è mio devo solo fare la conversione!