Gedcom-Datei parsen

[hansklok]

Zitat von Sir Rufo:

Ausserdem muss man im Zweifelsfall erst die gesamte Datei ausgelesen haben, um auf die Referenzen auch zugreifen zu können.

Da hat Sir Rufo recht!

Zitat von Jumpy:

Wobei ich gerade überlege (ich hab allerdings keine Ahnung von Genealogie-Programmen) dass es eh nicht möglich(?)/einfach ist diese Objekte OOP-mäßig miteinander zu verknüpfen (assoziieren?). Hätte jetzt gedacht, dass die Objekte sortenrein in entsprechenden Collections liegen und in anderen Objekten gerade mal die Referenz-ID auf diese gespeichert wird und man dann die Collection fragen muss: Gib mir mal die Familie mir der ID F12, oder so. (Zumindest die Objekte auf Ebene 0).
Objekte auf höheren Ebenen würden wahrscheinlich mit dem übergeordneten Objekt erzeugt und im übergeordneten Objekt "verwaltet". Referenziert würden die glaub ich ala @I12!P2@ oder so, hab da aber bisher kein konkretes Beispiel für gesehen nur die Spezi so verstanden, das es das geben könnte.

Genauso ist es. Es werden nur die Verweiszeiger, also die ReferenceIDs gespeichert. Alle Hauptobjekte werden in Collections verwaltet (INDI, FAM, SOUR, OBJ, NOTE).

Zitat von Sir Rufo:

Code:

0 INDI @foo@

Ist nicht falsch, aber in dem Kontext unsinnig.

Code:

0 NOTE @foo@

macht schon mehr Sinn

Sir Rufo, da hast Du wiederum recht, allerdings schreibt der Standard explizit folgende Notation für Hauptobjekte außer HEAD und TRLR vor:

0 @I123@ INDI
0 @F123@ FAM
0 @N123@ NOTE
0 @S123@ SOUR
0 @O123@ OBJ

Header und Trailer (kommen einmalig pro Datei vor!):
0 HEAD
0 TRLR

Ich hänge mal den übersetzten Xojo-Code (Basic) ran. Allerdings kommt es zu Exceptions (habe das kommentiert). Auch, was nicht geht. Vielleicht findet Ihr den Fehler.
Achso: Xoxo kennt keine StringBuilder-Klasse. ich habe jetzt einfach einen String definiert und ihm immer wieder die neuen Teile angehängt. Das ist doch dasselbe, oder? Siehe OutputNode().

Danke für diesen angeregten, spannenden Thread.

[Jumpy]

Das fehlende List.Contains(ANode) musst du wohl selber nachbauen, wenn die Collection das nicht kann. Im einfachsten Fall einfach eine Prozedur, der man Collection und Element übergibt und die dann durch alle Elemente iteriert und schaut, ob es das Element schon gibt.

Oder aber Dictionary statt Collection nehmen, vllt. kann das mehr?

[Sir Rufo]

Ja, der StringBuilder ist nur schneller und rührt nicht so im Speicher herum.

Delphi-Quellcode:

LStr := '';
for LIdx := 1 to 1000 do
  LStr := LStr + 'a';
Result := LStr;

ist analog zu

Delphi-Quellcode:

LSB := TStringBuilder.Create();
try
  for LIdx := 1 to 1000 do
    LSB.Append( 'a' );
  Result := LSB.ToString;
finally
  LSB.Free;
end;

[hansklok]

...ach verdammt, ich kriege es nicht zum laufen.

Was wäre denn noch ein Konzept so eine Datei, ressourcenschonend, einzulesen?

[ktweigel]

Hallo,
ist zwar schon eine Weile her, dass die Frage diskutiert wurde, aber ich doktere seit Jahren an demselben Problem herum.

Eigentlich will ich lediglich ein möglichst reines GEDCOM (Version 5.5.1) schreiben und benutze dazu das Programm AGES 2.0 (http://www.daubnet.com/ages), weil es die Daten sofort in diesem Format speichert und einliest. Dabei sind die Unterschiede zum 'reinen' GEDCOM durch anschließende Bearbeitung leicht zu entfernen (z.Bsp. das von AGES benutzte Feld _UID). Anschließend möchte ich die textlichen Teile in einem listenartigen Ausdruck mittels LaTeX ausdrucken. AGES lässt einem zwar in der Reportgestaltung ziemlich freie Hand, hat aber leider nicht an allen Stellen alle notwendigen Felder zur Verfügung. Insbesondere der Hinweis auf die Quellennummer, die ich gern in einer Hochzahl hinter dem jeweiligen Eintrag hätte, ist nicht möglich.

Vor Jahren habe ich mich einmal mit dem GEDCOM-Parser für Delphi 'My Family Tree' (https://sourceforge.net/projects/myf...urce=directory - testproj-win32-0.1.1.zip) auseinandergesetzt, bin aber nicht bis zum Letzten durchgestiegen.

Ein weiteres Programm, das LaTeX-Ausdrucke von GEDCOM-Dateien vorsieht, ist LifeLines, das aber seit Jahren nicht weiterentwickelt wird.

Meine Frage an hansklok ist nun, ob er mit seinem Problem weitergekommen ist und mich eventuell an seinen Fortschritten teilhaben lässt, oder ob ich mich in das oldie LifeLines einarbeiten soll.

Gruß ktweigel (Thomas)

[hansklok]

Zitat von ktweigel:

Meine Frage an hansklok ist nun, ob er mit seinem Problem weitergekommen ist und mich eventuell an seinen Fortschritten teilhaben lässt, oder ob ich mich in das oldie LifeLines einarbeiten soll.

Lieber Thomas,
ja, ich bin noch an der Sache dran. Nur dauert meine Arbeit noch an, da wir es mit einer sehr komplexen Struktur zu tun haben und alle möglichen genealogischen Zusammensetzungen (Cousin/en-Ehe, Inzucht etc.) berücksichtigt werden müssen. Das ist alles, was ich bisher dazu sagen kann. Ich halte an dieser Stelle aber auf dem Laufenden. Bei genaueren Fragen, Anregungen und Wünschen, gerne eine persönliche Nachricht hier schreiben.

Gruß hansklok

[ktweigel]

Zitat von hansklok:

Zitat von ktweigel:

Meine Frage an hansklok ist nun, ob er mit seinem Problem weitergekommen ist und mich eventuell an seinen Fortschritten teilhaben lässt, oder ob ich mich in das oldie LifeLines einarbeiten soll.

Lieber Thomas,
ja, ich bin noch an der Sache dran. Nur dauert meine Arbeit noch an, da wir es mit einer sehr komplexen Struktur zu tun haben und alle möglichen genealogischen Zusammensetzungen (Cousin/en-Ehe, Inzucht etc.) berücksichtigt werden müssen. Das ist alles, was ich bisher dazu sagen kann. Ich halte an dieser Stelle aber auf dem Laufenden. Bei genaueren Fragen, Anregungen und Wünschen, gerne eine persönliche Nachricht hier schreiben.

Gruß hansklok

Lieber hansklok,
das mit den komplexen Strukturen kann ich nur bestätigen. Ich habe mich deshalb auch bisher davor gescheut, die Daten in einer Datenbank zu halten. Aber wenn man GEDCOM benutzt wird man dafür mit x. rekursiven Strukturen 'belohnt'. Bin nur Hobbyprogrammierer. Werde mir jetzt noch mal das Programm 'Ancestromania' anschauen (http://www.liberlog.fr/spip.php?page...&id_article=30), ob ich es aus den Quellen zum Laufen bekommen und ob ich dann eventuell an den Berichten etwas herumschrauben kann. Eine tex-Datei aus Lazarus heraus (mein Delphi geht auf Windows 8.1 nicht mehr) habe ich immerhin schon hinbekommen.

Am liebsten wäre es mir allerdings, man bekäme den Quellcode von AGES, das ja in DELPHI geschrieben wurde und könnte, falls man ihn versteht, die eigenen Bedürfnisse einprogrammieren.


Gruß Thomas (ktweigel)