PChar: Zeichen rechts abschneiden?

[Pseudemys Nelsoni]

Moin,

wie kann ich einen Teil eines strings (PChars) von rechts abschneiden?`
Angenommen ich habe einen string der so aussieht: 'fhgshsdfhfh....' und ich möchte rechts alle Punkte abschneiden (können beliebig viele sein), wie würde ich das machen? Ich habe mir schon überlegt, eine Schleife rückwärs laufen zu lassen, wo ich den Pointer um 1 dekrementiere... Nur wie lange lass ich die Schleife laufen wenn der String nur Punkte enthält? Auf #0 kann ich ja nicht prüfen.
:oops:

Vielleicht weiss es ja jemand.

[marabu]

Hallo Mario,

den Zeiger auf den Anfang deiner Zeichenkette brauchst du schon als Referenzpunkt. Wenn der dekrementierte Zeiger kleiner ist als der Referenzzeiger, dann ist es Zeit aufzuhören...

Grüße vom marabu

[dizzy]

Zitat:

Zitat von Pseudemys Nelsoni

Auf #0 kann ich ja nicht prüfen.

Nicht im String, aber lass doch beim Dekrementieren des Pointers noch nen Zähler mitlaufen. Wenn der 0 wird, biste am Ende (bzw. Anfang).

[Pseudemys Nelsoni]

Danke Leute :)

@marabu, darf ich denn einfach unter den Index gehen (solange ich da nichts rumschreibe) ?

[bigg]

So etwas wie "Ausschneiden" gibt es nicht, wenn du deinen String nur kürzen möchtest,
könntest du SetLength() benutzen ansonsten auch Copy() oder du setzt ein 0 Byte.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var i, l: Integer;
var s: String;
begin
s := Edit1.Text;

if s <> '' then
begin for i := Length(s) downto 1 do
begin if s[i] <> '.' then
begin
  l := i;
  Break;
end;
end;

SetLength(s, l);
Edit1.Text := s;
end;
end;

[Pseudemys Nelsoni]

hallo bigg,

danke für deinen Code ;)

Aber das würde nicht ganz funktionieren, weil ich wie gesagt PChars benutze und weil bei deinem Code bei dem ersten vorkommen von "." gestoppt werden würde, was bei 'text.text2...' ja falsch wäre, da ich ja wie gesagt nur die letzten Punkte löschen will.

[marabu]

Zitat:

Zitat von Pseudemys Nelsoni

darf ich denn einfach unter den Index gehen?

Klar doch - mit solchen "wild pointers" erhältst du Zugriff auf andere Variablen oder auf interne Speicherbereiche, die vom Compiler für lokales memory management genutzt werden. Irgendwann schlagen aber die Schutzmechanismen von OS und Hardware zurück und dann ist Schluss mit lustig - AV.

marabu

[bigg]

Hast du nicht gesagt, du möchtest von rechts beginned die Punkte abschneiden :!:
Dann sollte es auch so funktionieren.

[Pseudemys Nelsoni]

Klingt interessant, könntest du mir das:

Zitat:

Irgendwann schlagen aber die Schutzmechanismen der Hardware zurück und dann ist Schluss mit lustig - AV.

Nochmal näher erklären? Wann würden AVs auftreten?


@bigg: Doch habe ich:

Zitat:

wie kann ich einen Teil eines strings (PChars) von rechts abschneiden?`

[XeRo]

hm wie wärs mit einem stringreplace(s,'.','',[rcReplaceAll])?