Auf den letzten char in einer Datei zugreifen

[dummzeuch]

Zitat von kagi3624:

Code:

str = str[0..$-1];

Wie geht es in Delphi?

Such' Dir was aus:

Delphi-Quellcode:

Delete(Str, Length(Str), 1);
str := LeftStr(Str, Length(Str)-1);
str := Copy(str, 1, Length(Str)-1);
SetLength(str, Length(Str)-1);

Und wenn es ein ShortString ist, geht auch:
Str[0] := AnsiChar(Byte(Str[0])-1);
Aber das will man nicht wirklich, zumal es bei normalen Strings zu Laufzeitfehlern führt.

Und ich habe bestimmt noch Möglichkeiten vergessen.

[Jasocul]

Zitat von kagi3624:

wie kann ich auf den letzten Char in der Textdatei zugreifen um den eventuell zu löschen? Hintergrund: Ich schreibe in eine CSV Einträge und möchte das letzte Komma einfach löschen, ohne dass es in den EOF zugreift oder mir sonstwie um die Ohren fliegt.

Du erstellst also selbst diese CSV-Einträge.
Ich würde die CSV-Datei gleich korrekt füllen.
Dann sparst du dir das Gemurkse mit Datei einlesen, das letzte Zeichen löschen und die Datei neu speichern.

Vermutlich erstellst du in einer Schleife die Zeileneinträge. Für jeden Durchlauf der Schleife mit Trennzeichen. Da kannst du schon nach der Schleife das letzte Zeichen löschen oder beim letzten Durchlauf einfach das Trennzeichen weglassen.

Also Fehlerursache beheben und nicht hinterher daran rumbasteln.

[himitsu]

In mobilen Anwendungen (NextGen-Compiler) und in den neuen StringHelpern werden die Chars in den String ab 0 gerechnet.
Bei PChar der Offset sowieso schon immer mit 0.

PS: Weil der alte ShortString als im ersten Byte (0) die stehen Länge hat, fingen die Chars nunmal erst bei 1 an
und daher wurde im Pascal/Delphi dann auch die neueren LongStrings mit 1 begonnen, auch wenn dort nun das erste Zeichen intern auf Position 0 seht. (und die Verwaltungsdaten mit negativem Offset vor den Chars)

Statische arrays dind frei, in der Definition, aber ja, ei dynamischen Arrays fängt es bei null an.
Aber variante Arrays gäbe es auch noch und die sind auch komplett frei. (Typ Variant)

[freimatz]

Und am Besten man verlässt sich auf nichts und verwendet dann z.B. Low() - geht das bei String überhaupt?

[himitsu]

Zitat von freimatz:

Und am Besten man verlässt sich auf nichts und verwendet dann z.B. Low() - geht das bei String überhaupt?

Ja, aber im XE ging Low(string) noch nicht ... wollte ich vor Kurzem mal verwenden.

Und ja, verlassen besser nicht, denn wer seine geliebte 1 nicht verlieren will, der kann {$ZEROBASEDSTRINGS OFF} .
http://docwiki.embarcadero.com/RADSt...trings_(Delphi)