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.
