Ich hätte den Wunsch, daß man bei @Translate$()
die Anzahl der ersetzten Zeichen (Ersetzungen)
z.B. durch eine Systemvariable (z.B.: %Translate)
erfahren kann.
Das wäre sehr hilfreich, wenn man eine fremde .csv
Datei einlesen und z.B. in einer Gridbox anzeigen möchte.
Manchmal vergessen die Schreiber solcher Dateien die
die Kommas oder Semikolons, wenn auch keine Daten
vorhanden sind.
Zitat
Meier,Klaus,Hamburg,Alsterstr.,0611....
Schmitt,Bernd,Köln,Domstr
Bauer,Maria,Berlin,Am Damm,065....
Hier sieht man, daß in der zweiten Zeile die Telefonnummer
fehlt. Hier könnte man schön in einem Probelauf(WhileNot Eof()...)
die Kommas bei jeder Zeile ermitteln und in einer Variablen speichern.
Wenn dann wie oben %Translate größer als die Variable ist, bekommt
sie den neuen Wert von %Translate. Somit hätte man am Ende die
Zeile mit den meisten Kommas und könnte dann entsprechend
die Spalten der Gridbox generieren.
Da, wie in einem anderen Thread schon erwähnt, auch sowas mit
Arrays von Bereichen# geht :
daten1$ = Char$(bereich#[0], 0, SizeOf(bereich#[0]))
daten$ = @Translate$(Trim$(daten1$), Chr$(0), ",")
Print daten$
könnte man auch somit die Anzahl der Strings in einem Bereich#
ermitteln. Da hätte man zwei Fliegen mit einer Klappe geschlagen.
Außerdem wäre das auch eine gute Ergänzung für die Funktion
SubStr$().