Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by bernau,
27. Mär 2012
Ja. Generics wäre hier das Zauberwort. XE2 ist auch schon installiert. Aber leider habe ich eine Komponente, die ich noch nicht unter XE2 laufen lassen will. Daher Delphi 2007 und keine Generics.
Die überladenen Proceduren bringen mir nichts. Es geht mir nicht so sehr darum, "einen" Procedurenamen zu haben, sondern den gleichen Quellcode fünf mal mit geringen unterschieden zu haben....
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by bernau,
27. Mär 2012
Ne auch das meinte ich nicht. Mir geht es darum die Procedure nur einmal zu haben. Bei deiner Version ist die Procedure zwei mal vorhanden. Und dies mit fast identischem Code. So habe ich es ja jetzt, nur das diese Procedure etwas komplexer (>50Zeilen) ist. Die zweite Procedure wurde quasi kopiert und mit einem Copy/Paste wurde Type1 gegen Type2 ausgetauscht. Nun habe ich das ziemlich vereinfacht...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by bernau,
27. Mär 2012
Ne. Leider nicht. Dann könnte ich ja nur fData1 übergeben und nicht fData2. Und die ersten beiden Werte der Funktion dürften auch nur vom Type TAtype1 sein und nicht vom Type TAtype2.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by bernau,
26. Mär 2012
Ich habe grade ein Problem einen Lösungsansatz zu finden. Vieleicht könnt Ihr mir weiter helfen.
Ich habe verschiedene Aufzählungstypen. Diese können eine verschiedene Anzahl von Definitionen beinhalten.
type
TAtype1 = (def1_x1, def1_x2, def1_x3, def1_x4, def1_x5, def1_x6);
TAtype2 = (def2_y1, def2_y2, def2_y3);