[VB6] Info su textbox?

[x69asterix]

Ciao a tutti,
allora ho notato ke il textbox come capienza si ferma a 65535 caratteri, visto ke dovrei visualizzare file certamente + grandi, quale tipo di casella o controllo può sodisfare la mia esigenza?

[Mabi]

La capienza massima di una casella di testo dipende dal sistema operativo. Guarda questo interessante articolo sulle effettive capacità del controllo.
In alternativa alla TextBox puoi utilizzare una RichTextBox.

[x69asterix]

Originariamente inviato da Mabi
La capienza massima di una casella di testo dipende dal sistema operativo. Guarda questo interessante articolo sulle effettive capacità del controllo.
In alternativa alla TextBox puoi utilizzare una RichTextBox.

Ciao Mabi,
beh sul S.O xpP,
x quanto riguarda RichTextBox, non l' ho mai usato, puoi suggerirmi?,
Quello ke mi serve è visualizzare un file.bin, questo mi riesce in parte con il textbox, in questo modo:

Text2.Text = Text2 & file

ma x il RichTextBox, come?

[Mabi]

La RichTextBox ha le stesse funzioni della normale TextBox, ma ne è arrichita di altre.
Quindi la puoi usare normalmente

[x69asterix]

Originariamente inviato da Mabi
La RichTextBox ha le stesse funzioni della normale TextBox, ma ne è arrichita di altre.
Quindi la puoi usare normalmente

Ciao,
ma usando la RichTextBox, io mi ritrovo delle scritte ke non c' entrano niente con il file letto xkè?
puoi usare un esempio?
per visualizzare il fil correttamente?

ti ripeto ke io riesco a leggere parzialmente con la textbox in questo modo:
textbox=textbox & file, unico problema ke il file.bin essendo da 1,5Mb non me lo visualizza tutto!,
x la RichTextBox io faccio così xò mi aggiunge delle scritte ke non c' entrano niente!

RichTextBox =  RichTextBox & file

[x69asterix]

Allora dopo varie prove diciamo ke sono riuscito ad ottenere quello ke volevo in questo modo:

Text1.SelText = Text1.SelText & datiletti

xò adesso sono alle prese con un nuovo problema, se kiedo di conoscere la lunghezza del file aperto

Label3.Caption = FileLen(File1.FileName)

ottengo la lunghezza esatta, ma se kiedo la len del Text1.SelText

Text2.Text = Len(Text1)

ottengo una len diversa anke se il file letto presente sul textbox è corretto,
preciso ke per i file con estensione.txt tutto combacia, ma se apro un file.bin si presenta il problema esposto!
Esiste una soluzione

[Mabi]

Originariamente inviato da x69asterix
...xò mi aggiunge delle scritte ke non c' entrano niente!

Magari sono caratteri con codici che vengono riconvertiti.
Ad esempio cosa ti ritrovi in più ?

Originariamente inviato da x69asterix
x la RichTextBox io faccio così:

RichTextBox =  RichTextBox & file

Cosa contiene "file" ?

[x69asterix]

Originariamente inviato da Mabi
Magari sono caratteri con codici che vengono riconvertiti.
Ad esempio cosa ti ritrovi in più ?

Cosa contiene "file" ?

Ciao,
allora diciamo ke sono riuscito a far funzionare anke il RichTextBox!
xò resta sempre il solito problema se kiedo la len(RichTextBox1) purtroppo ottengo una len diversa del file letto, il file contiene caratteri ascii, x leggerlo io faccio così:

Open SourceFile For Binary As #2

Do While Not EOF(2)
      Line Input #2, file
      RichTextBox.SelText = RichTextBox.SelText & file 
      Label9 = Len(RichTextBox) ' questa len è sballata!!
      Label8.Caption = FileLen(SourceFile)' questa len è corretta! 
      DoEvents
      Loop
Close #2

[Jupy64]

Ciao, ma il file che devi caricare è di testo?
Se è di testo fai cosi:

RichTextBox.LoadFile "c:\prova.txt", rtfText
MsgBox "Dimensione RichTextBox=" & Len(RTextBox.Text) & vbCrLf & "Dimensione file=" & FileLen("c:\prova.txt")

[x69asterix]

Originariamente inviato da Jupy64
Ciao, ma il file che devi caricare è di testo?
Se è di testo fai cosi:

RichTextBox.LoadFile "c:\prova.txt", rtfText
MsgBox "Dimensione RichTextBox=" & Len(RTextBox.Text) & vbCrLf & "Dimensione file=" & FileLen("c:\prova.txt")

a tutti,
il file è un .bin!!