Buchempfehlung
Mikrocomputertechnik mit Controllern der Atmel AVR-RISC-Familie
Mikrocomputertechnik mit Controllern der Atmel AVR-RISC-Familie
Umfassend, aber leicht verständlich führt dieses Buch in die Programmierung von ATMEL AVR Mikrocontrollern ein. [Mehr Infos...]
FreeBASIC-Chat
Es sind Benutzer im FreeBASIC-Chat online.
(Stand:  )
FreeBASIC bei Twitter
Twitter FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!

fb:porticula NoPaste

Info
Info / Hilfe
Liste
Übersicht / Liste
Neu
Datei hochladen
Suche
Quellcode suchen
Download
Dateidownload

Strings fester Länge

Uploader:RedakteurMOD
Datum/Zeit:12.10.2011 11:42:52

'Strings fester Länge verhalten sich im Bezug auf Chr(0) seltsam

Dim As String       foo = Chr(65) & Chr(65) & Chr(0) & Chr(65)
Dim As String*5     bar = Chr(65) & Chr(65) & Chr(0) & Chr(65)

'"|" & bar & "|" wird falsch ausgegeben, bar selbst aber richtig

Print "|" & foo & "|", Len(foo), foo
Print "|" & bar & "|", Len(bar), bar

'-------------------------------------------------------------

Type baz
    As String       foo
    As String*5     bar
End Type

Dim As baz buz

buz.foo = Chr(65) & Chr(65) & Chr(0) & Chr(65)
buz.bar = Chr(65) & Chr(65) & Chr(0) & Chr(65)

'"|" & buz.bar & "|" und buz.bar werden falsch ausgegeben

Print "|" & buz.foo & "|", Len(buz.foo), buz.foo
Print "|" & buz.bar & "|", Len(buz.bar), buz.bar

'-------------------------------------------------------------

Sleep