Record im Array nutzen? - Sinnvollere Wege?

[Asura]

@Dalai:

Ich dachte mir für jede Property ein Parameter zu nehmen, wo ich den Inhalt eines Editfeldes übermittle ist unschön.
Oder gibt es eine andere Methode?

@p80286:

Muss ich mir dafür eine Funktion schreiben, oder wie kann ich nach der Property suchen?

[Dalai]

Zitat von Asura:

@Dalai:

Ich dachte mir für jede Property ein Parameter zu nehmen, wo ich den Inhalt eines Editfeldes übermittle ist unschön.
Oder gibt es eine andere Methode?

Ich würde das Objekt erzeugen, dann befüllen und dann der Liste hinzufügen. Wenn man mal die Klasse TEmployee von Sir Rufo als Vorlage nimmt, würdest du ein solches Objekt (statt der Stringliste) erzeugen, dessen Eigenschaften setzen (statt die Strings in die Stringliste zu packen) und das entstandene Objekt in die Liste einfügen (statt die Stringliste zu übergeben). Ich hoffe, die Beschreibung ist auch ohne Code verständlich, momentan hab ich weder Zeit noch Lust (vor allem bei der Wärme), mich auch geistig irgendwie anzustrengen...

MfG Dalai

[Asura]

@Dalai:

Ich habe es glaube ich aber trotzdem verstanden. Im Prinzip überspringst du einfach die Parameterübergabe von der einen Unit zur anderen und fügst gleich die Inhalte den Eigenschaften von dem Objekt Employee und fügst das dann der Objektliste zu.

Ich frage mich aber wie ich die Funktion Equals der Klasse TEmployee von Sir Rufo nutzen kann, könnte man mir da eventuell ein Beispiel geben?

[Sir Rufo]

Mit function TObject.Equals( Obj: TObject ): Boolean; kann man Instanzen auf Gleichheit prüfen.

Und zwar im Sinne von "stellen das Gleiche dar".

Zwei unterschiedliche Instanzen von TEmployee können ja die gleiche ID haben und stellen somit das Gleiche dar.

Delphi-Quellcode:

var e1, e2: TEmployee;

if e1 = e2 then
  ShowMessage( 'Gleiche Instanzen' );
if e1.Equals( e2 ) then
  ShowMessage( 'Gleiche Bedeutung' );

[Asura]

Dankeschön!

Ich habe noch eine weitere Frage:
Wenn ich einen Mitarbeiter hinzufüge über den Button erfolgt nun folgendes:
Ich erstelle ein neues Objekt mit  Employee.Create(); speichere dann die Inhalte in die Property von Employee und füge das dann der Liste hinzu.

Nun meine Frage ist jz, muss ich mit dem Objekt von TEmployee arbeiten oder muss ich pro Mitarbeiter ein neues Objekt von TEmployee erstellen mit einer Index-Nummer (Beispielsweise Employee1, Employee2 usw.) und dieses dann über Employee1.Create(); initialisieren?

Weil in meiner Methode hätte TObjectlist ja jedes Object in der Liste mit dem Namen "Employee", nur mit verschiedenen Properties oder kann ich das so machen?

[mkinzler]

Eine Instanzvariable ist eine Referenz (Zeiger) auf eine Instanz (Objekt). Du kannt die selbe wiederverwenden oder sogar ganz auf sie verzichten.

[Sir Rufo]

Eine Instanz erzeugt man mit Employee := TEmployee.Create(); .

Employee.Create(); ruft nur den Konstruktor der Instanz auf, erzeugt aber keine Instanz!

[jaenicke]

Zitat von Asura:

Ich erstelle ein neues Objekt mit  Employee.Create();

Das ist nicht korrekt. Damit rufst du den Konstruktor des existierenden Objektes Employee auf.
Neu erstellen geht nur mit  TEmployee.Create(); .

[Asura]

Ohh stimmt, mein Fehler.

Die Frage bleibt aber, ob ich nun die Instanz mit dem gleichen Namen "Employee" nur neu erstellen oder jeweils der neuen Instanz eine Indexnummer angefügt werden soll, weil sonst kann ich doch in der FUnktion Equals keinen Unterschied festlegen, da er nicht weiß, welche Instanz nun überprüft werden soll.

Aber dann frage ich mich, ich muss diese Instanzen ja initialisieren in var:

Delphi-Quellcode:

 var
 Employee1, Employee2: TEmployee

. Wie soll ich da mit einer variablen Indexnummer arbeiten?