Einzelnen Beitrag anzeigen

Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
 
FreePascal / Lazarus
 
#10

AW: Stringfunktionen

  Alt 11. Jan 2012, 21:16
Deine Strings sollten so aussehen:
Delphi-Quellcode:
DELTAX1111
DELTAX1111DELTAY2222
DELTAY2222DELTAX1111
DELTAY2222
Delphi-Quellcode:
pdeltax:=pos('DELTAX',s);
pdeltay:=pos('DELTAY',s);
pdeltax und pdeltay enthalten 0 wenn nicht in s enthalten,
oder 1 oder größer wenn in s enthalten.
je nach dem wert von pdelta kopierst du dann den Inhalt:
copy(s,7,pdelta-8) oder
copy(s,pdelta+6,maxint) Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
  Mit Zitat antworten Zitat