wie kann ich von einem String das letzte Zeichen wehschneiden, gibts da ein direkten Befehel, oder muss ich mir da selber was zusammenbasteln??

Hallo wenns nicht grad ein "\" sein soll, kannst du dir das schnell mit delete und lenght zusmammenbasteln.

Mfg Frank

Hallo

Holger

Delete(Str,length(str),1);

hab ich so, aber ich sollte erst mal prüfen ob das Zeichen überhaupt dran ist.
Es wird nicht immer angefügt, und ich hab noch nicht herausgefunden wann, oder wann nicht.
Im Moment find ich das Zeichen leider nirgend, sonst hätt ich ein Screenshot gemacht und hier gepostet. Sieht ähnlich aus wie das Pipe Symbol, nur ist der Strich kürzer und dicker.

Hi,

@o.d.g Das wär eigentlich das was ich brauch, muss jetzt nur noch das zeichen ausfindig machen, bzw. den ASCI-CODE herausfinden.

Kopier dir doch das Zeichen raus, wenn es mal vorhanden ist und mach hol dir den bytewert so?

Bevor du per Auge dann im ASCII- Code nachguckst und vergleichst.
Im Extended ASCII gibt es 5 fast gleich aussehende Zeichen, die auf deine Beschreibung passen.

Wär halt schneller:

ok, danke, das ist das richtige.

also jetzt hab ich das Zeichen,

@ o.d.g. Ich kann das leider nicht so machen wie du es gemeint hast, mein Zeichen ist in Delphi nicht darstellbar, hab so das dumme gefühl dass es sich um ein Carrege Return oder NewLine handelt.

Hier nun mein Bild:

Da es zwei aufeinanderfolgende Zeichen sind, liegst du vermutlich richtig. Die ASCII-Codes sind #13#10, falls du es gerade nicht weißt.

also muss ich prüfen ob das letzte Zeichen ein #10 oder #13 ist, und wenn ja abschneiden, oder??

Nicht ganz. So:

aber ich muss doch davor prüfen ob es ein #10 oder ein #13 ist, weil es ja nicht unbedingt jedes mal da ist.
(Sorry, kann das ganze nur von c++, da geht es so ähnlich)

csigg hat folgendes geschrieben:

aber ich muss doch davor prüfen ob es ein #10 oder ein #13 ist, weil es ja nicht unbedingt jedes mal da ist. (Sorry, kann das ganze nur von c++, da geht es so ähnlich)

Nope, wenn Delete nix findet, wird nichts gelöscht.

pos gibt dann 0 zurück und delete löscht nichts an der position 0.

strings beginnen bei 1

//EDIT: STOP, ich hab da grad nen Fehler bemerkt *kichert* Wart mal kurz.
//EDIT2: ne, passt schon.. bin verplant

opfer.der.genauigkeit hat folgendes geschrieben:

markieren Delphi-Quelltext     1: 2: 3: begin   Delete(str, pos(#$A#$D, str), 4); end;

Und ich war noch am überlegen, ob ich die Hex-Codes mit angebe.
btw: warum löscht du 4 Zeichen, wo doch nur 2 da sein können?

@csigg:

So wird nur gelöscht, wenn die Zeichen auch da sind.

jasocul hat folgendes geschrieben:

opfer.der.genauigkeit hat folgendes geschrieben: markieren Delphi-Quelltext     1: 2: 3: begin   Delete(str, pos(#$A#$D, str), 4); end; Und ich war noch am überlegen, ob ich die Hex-Codes mit angebe. btw: warum löscht du 4 Zeichen, wo doch nur 2 da sein können?

Weil ich, wie oben erwähnt verplant bin.

ok, funtioniert wunderbar, dankeschön

Wenn ich jetzt aber bis zum \ alles abschneiden will, wie geht es dann??
Also ich hab ein Datei-Namen, und brauch das Verzeichnis davon