Einzelnen Beitrag anzeigen

Benutzerbild von tomsel
tomsel

Registriert seit: 8. Dez 2005
Ort: am Chiemsee
304 Beiträge
 
Delphi 7 Professional
 
#20

Re: Datum mit Datum austauschen

  Alt 18. Apr 2008, 14:24
Ich hätte da mal einen ganz anderen vorschlag. Im Kern benötigst du ja nur die Position eines in einem String vorkommenden Datums, damit kannst du dann das alte Datum entfernen und ein neues einfügen.

Ersetze in einer Kopie deiner Zeichenkette alle numerischen Zeichen durch ein einheitliches Zeichen, z.Bsp. "0". Dann kommt an der Stelle, wo vorher das Datum stand etwas heraus wie: "00.00.0000".

Danach kannst du dann ganz einfach suchen mit iPos := Pos('00.00.0000', sKopieVonMeinString); Durch System.Delete(sMeinString, iPos, 10) löschst du das alte Datum und mit System.Insert(sDasDatum, sMeinString, iPos) fügst du das neue Datum an der gleichen Stelle ein.

Gruß
Ein Experte ist ein Mann, der hinterher genau sagen kann, warum seine Prognose nicht gestimmt hat. (Winston Churchill)
  Mit Zitat antworten Zitat