Auswertung

Das Auswertungs Form wurde grundlegend überarbeitet und besteht nun aus zwei ComboBoxen die das Projekt und die Datei auswählen die in der Tabelle angezeigt werden, wie Sie gleich sind zuden Anderen Dateien. Ich Denke die Darstellung ist in Ornung so, versuch mir aber Trozdem noch darüber gedanken zumachen.

Dadurch das die Ausswertung jetzt so erfolg brauch ich auch kein Auswahl Form mehr.

„TAuswUP=array[0..MAXPROJEKTE,0..MAXDATEIEN,0..MAXUNTERPRO] of TProzent;

TDateiErken = Record
Gleichheit: TProzent;
UnterprogrammeGleich: 0..MAXUNTERPRO;
UnterProAnzahl: 0..MAXUNTERPRO;
HauptGleich: 0..MAXDATEIEN;
UP: TAuswUP;
End;

TAuswDatei = array[0..MAXDATEIEN] of TDateiErken;
TAuswProjekt = array[0..MAXPROJEKTE] of TAuswDatei;

TAuswertung = array[TGroesse] of TAuswProjekt;“

Die Fehlermeldung dazu: [Pascal Fehler] u_typen.pas(69): E2100 Datentyp zu groß: 2 GB überschritten

Beim Datentyp bin ich auchweiter gekommen, ich hab jetzt eine Array struktur gefunden die eigentlich funktionieren müsste, tut sie aber nicht wegen der 2GB Datentyp bestimmung von Delphi.

Zusätzlich habe ich noch den Code berreinigt und Kommentiert.

Stack

Nachdem ich meine Datentypen und meine halben Code umgeschireben habe, kammen immer wieder Stack overflow Fehler auf aus der ich Schloss das Mein Datentyp mit 4 Array die jeweil aus Records und Strings bestehen zu Komplex ist.  Nachnachfragen in der DPraxis schien das auch der Fall zusein also teilte ich wenigsten meinen Datentyp in ein auswertungs und ein Projekt Typ aus nach weiteren umbau arbeitet funzte es aber immer noch nich nur wenn ich ein Array verkleinerte lief es. Nachweiteren Nachfragen stellte sich heraus das es an den Projektoptionen lag, denn nämlich man kann dort die Stack grösse einstellen, ich weiss zwar noch nicht die Nachteile aber ich hab schon wieder die frage in DPraxis gestellt.

Ansonsten hab ich noch an der Auswertung GUI und Informationen gearbeitet sieht zwar noch nicht Toll aus aber ganz gut.  Ich hab wenigsten herausgefunden wie man Dateinamen Ordner und Pfad trennt.

Dann grübel ich noch um den regulären Ausdruck für das herausfiltern von Proceduren im momen ist das der stand der dinge:  (procedure)([a-zA-Z.;:()0-9=\]*)(end;)

Blöderweise fischt er mir dann nur eine heraus und zwar vom ersten procedure bis zum end.

Projekt Datentyp

Nachdem ich mich daran erinnert habe das nacher ja auch mehr als eine Datei in eine Projekt sein können musste ich die Datentypen und so mit fast das ganze Programm neuschreiben bzw. anpassen