Entwickler-Ecke

Sonstiges (Delphi) - Letzten Stellen eines Wortes löschen?


majolo - Do 03.10.02 17:51
Titel: Letzten Stellen eines Wortes löschen?
Hi,

wie kann ich die letzten Buchstaben eines Wortes löschen?Wenn ich in einem Edit das Wort Delphi habe möchte ich die letzten 3 Stellen löschen.Also phi weg.Mit SQL geht so was glaube ich, aber nur in Verbindung mit DBs.
Danke im vorraus.
majolo


Anonymous - Do 03.10.02 18:05

Quelltext 
1:
 
Edit1.Text := Copy(Edit1.Text, 1, Length(Edit1.Text) - 3);


majolo - Fr 04.10.02 10:10
Danke,dass ging ja einfach.Hätte ich auch selbst drauf kommen sollen.
Gruss
majolo


Christian S. - Fr 04.10.02 19:08
Oder so:


Quelltext 
1:
 
Delete(mein_string,Length(mein_string)-2,3);


Hat wahrscheinlich keine Vorteile gegenüber der schon genannten Möglichkeit, aber ich wollte es der Vollständigkeit halber noch posten.

MfG,
Peter


DeCodeGuru - Fr 04.10.02 20:40
Man sollte vielleicht noch dazusagen, dass die Prozedur Delete nur Stringvariablen annimmt und keine Konstanten. Also würde folgender Code nicht funktionieren:


Quelltext 
1:
 
Delete(Edit1.Text,Length(Edit1.Text)-2,3);


Wenn man die ganze Sache mit Delete machen will, muss man dann folgenden Code verwenden:


Quelltext 
1:
2:
3:
4:
5:
6:
7:
 
var
  tmp: String;
begin
  tmp := Edit1.Text;
  Delete(tmp,Length(tmp)-2,3);
  Edit1.Text := tmp;
end;


Christian S. - Fr 04.10.02 20:52
Ups, habe ich vergessen. :oops: Dann ist Copy wahrscheinlich in diesem Fall doch die bessere Alternative!

MfG,
Peter


DeCodeGuru - Fr 04.10.02 21:01
ist auf jeden Fall kürzer :wink:


majolo - Sa 05.10.02 17:23
dann haben wir die Reihe auf jeden Fall vollständig.


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!