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
Delete fuer die Function zum loeschen und zum gucken ob das letzte Zeiche nein "\" ist kannst du function
AnsiLastChar 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)