Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#1

String zerlegen

  Alt 11. Mai 2006, 09:11
Ok, das Thema hatten wir schon und die Funktionen pos und copy usw kenne ich. Das ist auch nicht das Problem, also nicht so direkt. Ich habe folgenden String:
Code:
BELEMMER025=11A13061960 GESCEICH026=1 UNTEEICH027=1 LIEFMMER029=061960 KUNDMMER032=00014028 KUNDNUNG033=ELODRIVE GmbH KUNDNUNG034=Stellantriebstechnik          KUNDNUNG035=Potsdamer Strasse 12           PLZKUNDE036=32423 ORTKUNDE037=Minden                        MATCUNDE038=                              BELEATUM039=10.04.2006 AULIEMER042= 61960 @PJL ENTER LANGUAGE = PCL
Und folgenden Record:
Delphi-Quellcode:
  TPJLComments = packed record
    belemmer025: string; // Belegnummer
    aurecmer041: string; // irgendwas Rechnung
    auliemer041: string; // irgendwas Lieferschein
    aulasmer041: string; // irgendwas Lastschrift
    gesceich026: string; // Geschäftsbereich
    unteeich027: string; // Untergeschäftsbereich
    kundmmer032: string; // Kundennummer
    kundnung033: string; // Kundenbezeichnung 1 (Firmenname)
    kundnung035: string; // Kundenbezeichnung 2 (Strasse)
    plzkunde036: string; // PLZ
    ortkunde037: string; // Ort
    matcunde038: string; // MatchCode
    beleatum039: string; // Belegdatum
  end;
Wie bekomme ich jetzt möglichst elegant ohne ohne viel rumzukopieren, die Werte aus dem String in die entsprechenden Felder meines Records? Leider gibt es kein eindeutiges Trennzeichen. Und an dem String kann ich nichts ändern, den bekomme ich so geliefert.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat