Records sortieren und bearbeiten / Zusamenführen.....

[dor557]

Ich bin am verzeweifeln.

Ich versuche jetzt schon seid stunden folgendes :

ich habe Folgenden record :

Delphi-Quellcode:

tour_Det : record
  tour_n : Integer;
  T_id : String;
  von : String;
  nach : String;
  Start : String;
  Ankunft : String;
end;

var 
  Touren_Details : Array of Tour_det;

nun lese ich die daten aus einer XML Datei aus und schreibe diese in einen Record wie es im XML Tutorial beschrieben ist.

Das Funktioniert nun also so weit.

nun habe ich z.b. folgende daten :

Delphi-Quellcode:

Touren_details[1].Tour_N := 1;
Touren_Details[1].T_Id := 'Mann-Hamburg';
Touren_details[1].von := 'Manheim';
Touren_Details[1].nach := 'Frankfurt';
Touren_Details[1].Start := '17:45';
Touren_Details[1].Ankunft := '23:00';


Touren_Details[2].Tour_N := 2;
Touren_Details[2].T_Id := 'Frankfurt-Hamburg';
Touren_details[2].von := 'Frankfurt';
Touren_Details[2].nach := 'Hamburg';
Touren_Details[2].Start := '23:00';
Touren_Details[2].Ankunft := '01:00';

Touren_Details[3].Tour_N := 3;
Touren_Details[3].T_Id := 'Mann-Hamburg';
Touren_details[3].von := 'Frankfurt';
Touren_Details[3].nach := 'Hamburg';
Touren_Details[3].Start := '23:00';
Touren_Details[3].Ankunft := '01:00';

Jetzt habe ich folgendes vor :

Einen record nach dem anderen durchsuchen sollte die T_id nicht im Temporären record stehen dann einen neuen einfügen.
Nach dem Nächsten Record mit den gleichen wert T_ID suchen und dann die ankunfts zeit einfügen !
sollte eine andere T_ID existieren dann einen neuen Temporären record erstellen und die daten übernehmen.

Ich habe schon vieles versucht was alles würde das ganze jetzt sprengen.

Wie kann ich das Bewerkstelligen.

Ich habe immer das Problem das ich zwar die daten in den neuen record bekomme. Aber wenn ich nun 2 neue Temporäre Records erstellt habe dann im 3. Record die daten habe ich ich im 1. Temporären record brauche müsste ich also wieder den Temporären Record durchsuchen.

Bekomme da immer nur eine Endlos Schleife hin und wenn ich die mit einer

Delphi-Quellcode:

if fertig then exit;

unterbreche macht er das nur ein oder 2 mal.


Bin für Jede Hilfe dankbar.

Gruss Sascha

[bttb930]

kann ich kein deutsch oder redest du etwas wirr? hab keine ahnung was du da machst oder vorhast.

schleifen verlässt man mit break, nicht mit exit. vielleicht hilft das?

[dor557]

sorry....

Das war schlicht und einfach schwer zu erklären.

ich weiss auch nicht wie ich das am besten in Worte fassen kann.

Ich habe mich auch inzwischen dazu entschieden das nicht mit Records zu machen.

Mein Alter Herr hat mir geraten ich soll das doch in eine Temp. SQL datenbank schreiben und dann dannach suchen...

Klingt irgend wie logisch !

habe Hier Einene Neuen Beitrag angefangen da er dann nicht mehr hier her gehört.

Trotzdem danke für den hinweis.

Gruss Sascha