Einzelnen Beitrag anzeigen

Benutzerbild von Mackhack
Mackhack

Registriert seit: 29. Nov 2003
Ort: San Diego, CA/USA
1.446 Beiträge
 
Delphi 2006 Architect
 
#2

Re: string letztes zeichen überprügen und ggf. löschen

  Alt 22. Jul 2006, 02:55
Schon mal die Hilfe bemueht? Google Bemueht? Etwas auf english gedacht? Dann waere da wohl Delete rausgekommen.

Hier wie du es machen koenntest... Aber erstmal selbst gucken in der Hilfe mit F1 Delphi-Referenz durchsuchenDelete fuer die Function zum loeschen und zum gucken ob das letzte Zeiche nein "\" ist kannst du function Delphi-Referenz durchsuchenAnsiLastChar nutzen.

Und hier noch ein Beispiel weils so schoen war...

Delphi-Quellcode:
var
  S : String;
begin
  S := Edit1.Text;
  if AnsiLastChar(S)^ = '\then
    Delete(S, Length(S), 1);
  ShowMessage(S);
end;
Um etwas Neues zu schaffen muss man seine Ohren vor den Nein-sagern verschliessen um seinen Geist öffnen zu können.
(George Lukas)
  Mit Zitat antworten Zitat