Strings zusammenfügen und Trennen

basner · Beiträge: 39

Hallo und guten Morgen.

Ich habe folgendes Problem.

Ich möchte von einem String nach bestimmten Kriterien etwas abschneiden und den abgeschnittenen Teil an einen anderen anfügen.

Ein Bsp:

Ausgang:

AutoPrima Opel

Und ich möchte jetzt Auto an Opel ranhängen. Könnt ihr mir einen Weg zeigen, das soll aber nur passieren wenn in den ersten beiden Wörtern keine Leerzeichen vorkommen.

Vielen Dank

Blackheart666 · Beiträge: 2195 XP D3Prof, D6Pers.

Schau mal dort, da findest du alles dazu.
delphi.about.com/od/.../blrtlstringhand.htm

basner · Beiträge: 39

Vielen Dank.

Werde ich mir gleich mal genauer anschauen.

Lannes · Verfasst: Do 04.06.09 12:12

Hallo,

versuchst Du immer noch eine binäre Datei über Stringfunktionen auseinander zu pflücken. :wink:

zu Deinem Problem:
1. den String bei dem Leerzeichen trennen und in Variablen merken
'AutoPrima'
'Opel'
2. im String 'AutoPrima' ab dem zweiten Zeichen den ersten Großbuchstaben suchen
3. ab der gefundenen Position String auftrennen
4. gefundene Strings zusammenfügen

Den Großbuchstaben im String kannst Du wie folgt ermitteln:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

i := 2;
while (i <= Length(s)) and (not (s[i] in ['A'..'Z'])) do
  inc(i);
if i > length(s) then
  showmessage('kein Großbuchstabe nach Zeichen 1')
  else
    showmessage('ersten Großbuchstaben bei Position '+IntToStr(i)+' gefunden');

_________________
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )

basner · Beiträge: 39

Hallo.

Habe das erste Problem gelöst und dieses auch. Vielen Dank für Eure Hilfe.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme