Delphi-Programm mit Klassen!

Re(3): Delphi-Programm mit Klassen!

Somnatic — Sat, 06 Oct 2007 16:11:34 GMT

wie du genau ein Firmenobjekt findest ist Delphi - spezifisch zu implementieren. Ich kann dir sagen wie ich sowas in C# machen würde.

Zu einer ListBox (in C#) kannst du Objekte vom Typ object hinzufügen. Das ist sozusagen die Basisklasse aller anderen Objekte. Sprich: Du kannst jedes beliebige Objekt hinzufügen. Um eine sinnvolle Anzeige zu erhalten, kennt die Klasse object die Methode ToString(). Diese liefert ohne dass sie für die Klasse überschrieben wurde einfach nur irgendeinen Hash Wert der das Objekt identifiziert. Nun kannst du für dein Objekt Firma jedoch diese Methode überschreiben. In C# würde das so aussehen:
public override string ToString() { return this.name; }
In dieser Methode kannst du natürlich auf sämtliche Membervariablen zugreifen (z.b. auf den Firmennamen (name). Die Methode ToStirng() liefert jetzt keinen Hash Wert mehr sondern eine aussagekräftigen Namen der Firma.
Wenn nun ein Benutzer das entsprechende Objekt auswählt, kannst du ja das ausgewählte Objekt abfragen. Dieses IST dann zwar ovm Typ object, kann aber in den Typ Firma gecastet werden - somit hast du genau das Objekt das du suchst.

Ein anderes Beispiel:
Das Control ListView in C# akzeptiert als Elemente Elemente vom Typ ListViewItem. ListViewItem bietet eine Property namens Tag, die ein Objekt vom Typ object aufnehmen kann. Weiters bietet das ListViewItem eine Eigenschaft namens Text. Diese eigenschaft würde dann z.b. die Bezeichnung aufnehmen. Der Rest würde analog wie oben funktionieren. Du würdest ein Objekt vom Typ ListViewItem als "ausgewählt" erkennen und dann anhang von der Tag Eigenschaft auf das Firmenobjekt zurückschliessen können.

Das ist jedoch in C# so, in Delphi wird es ähnliche Methoden geben, schau dir einfahc mal an was die Listbox denn so zur Verfügung stellt, vielleicht gibt es ähnliche Ansätze.

Und wie meinst du das mit der globalen Liste, wo soll ich die denn
anlegen/speichern, und wie kann ich in dieser Liste auf eine bestimmte Firma
zugreifen bzw. woher weiss ich, welches Objekt welche Firma ist?

Ähm, ich meinte damit nur eine Liste namens firmen, die eine Liste von Firma Objekten enthält. Die Listbox könntest du dann mit dieser Liste füttern, indem du die Liste durchiterierst.

Und wie lange bleiben denn diese Objekte bestehen, solange bis ich die Form
beende, oder bis ich das gesamte Programm beende.

Sobald es keine Referenz mehr auf ein Objekt gibt, wird es gelöscht. Wenn du also alle Firmen Objekte beim Starten aus der DB ausliest und sie dann in einer Liste speicherst, dann existieren sie solange es diese Liste gibt.

Es wäre nett, wenn du mir sagen/beschreiben könntest, welche Klassen du machen
würdest, und vorallem WIE du diese machen würdest!

Abgesehen von den graphischen Klassen hast du es eh schon mehr oder weniger beantwortet. Und wie diese Aussehen, bleibt dir überlassen

Übrigens: Es wäre eigentlich besser, wenn ich es irgendwie ohne
Objektorientierung lösen könnte, falls das überhaupt geht

Sorry, aber das Beispiel impliziert fast schon eine objektorientierte Lösung ... da jetzt zurück zum prozeduralen zu gehen wäre nicht wirklich sinnvoll

Re(7): Delphi-Programm mit Klassen!

Robert Craven — Sat, 06 Oct 2007 15:45:26 GMT

Klar würds funktionieren. Aber wie gesagt, ich würds schon mit Objekten machen.

Re(6): Delphi-Programm mit Klassen!

Guugl — Sat, 06 Oct 2007 15:43:37 GMT

aha, danke!

aber würde auch meine Idee mit einem Record pro Mitarbeiter, welches ich dann direkt zu dem Item speichere, funktionieren?

mfg

Re(5): Delphi-Programm mit Klassen!

Robert Craven — Sat, 06 Oct 2007 14:51:00 GMT

Du musst die Liste der Mitarbeiter verwalten. Und beim Speichern diese Liste durchgehen.
Beim Mitarbeiter muss du auch speichern, ob er gelöscht wurde oder nicht, damit das beim Speichern entsprechend verarbeitet wird.

Mitarbeiter würd ich schon als Klasse definieren. Dann kannst du auch gleich speichern in der Klasse implementieren.

Re(4): Delphi-Programm mit Klassen!

Guugl — Sat, 06 Oct 2007 14:35:22 GMT

DB-Zugriff und sonstiges ist alles kein Problem, mein Problem ist, dass wir eben nur EINE Speicherfunktion haben dürfen, d.h. alle Daten müssen auf einmal in die DB geschrieben werden, und wie soll ich denn die MitarbeiterInfos zu dem ausgewählten Mitarbeiter "hinzugeben", und mir all diese Infos so lange merken, bis ich auf Speichern klicke?

Edit:

Ich hab mir was überlegt, könnte das funktionieren:

Ich lege mir einfach ein Record "Mitarbeiterinfo" an:

type
    TMitarbeiterinfo = record(
       Name : String;
       Adresse : String;
       Telefon: integer;
end;

Und immer wenn ich in der Listbox "Ausgewählte Mitarbeiter" einen Mitarbeiter anklicke, und seine Infos eingebe, dann speichere ich diese Infos in dem Record und dieses Record speichere ich dann genau zu dem ausgewählten Mitarbeiter in die Listbox (es müsste doch gehen, dass man ein Record zu einem Listbox-Item speicher, als Object oder so?)

Re(4): Delphi-Programm mit Klassen!

Guugl — Sat, 06 Oct 2007 14:35:22 GMT

Re(3): Delphi-Programm mit Klassen!

Robert Craven — Sat, 06 Oct 2007 14:30:53 GMT

Dann mach dir das Leben mal nicht zu schwer. Ein paar Listboxen und Edit-Felder wo du alle aktuell relevanten Daten ablegst, dazu noch eine DB-Verbindung und fertig. Buttons zum Speichern, Löschen und Leeren der Felder. Fertig.
Das Speichern von Firmen und Mitarbeitern würd ich getrennt voneinander machen, ausser es ist explizit vorgegeben, dass ihr nur eine Speicherfunktion haben sollt.

DB-Zugriffe habts schon durch? Was nutzt ihr da?

Für dich vielleicht interessant ist die ListboxFunktion AddObject. Damit kannst du in der Listbox eine Liste von Objekten (in deinem Fall Mitarbeiter und Firmen) verwalten.

Re(2): Delphi-Programm mit Klassen!

Guugl — Sat, 06 Oct 2007 14:16:21 GMT

nein, der Lehrer hat ausdrücklich gemeint, dass wir für den Anfang nur mal versuchen sollen, dass Problem zu lösen! Es muss ja nicht mal mit objektorientierten Mitteln gelöst werden, es passt auch, wenn wir es anders lösen!

Ich hab halt jetzt mal an das objektorientierte Konzept gedacht, da ich bei der Übung vor folgendem Problem stehe:

Ich habe 1 Formular, auf diesem soll ich genau 1 Firma anlegen, diese Firma kann mehrere Mitarbeiter haben (diese kann man selber auswählen)! Bis hierher hab ich noch kein Problem, dass könnte ich auch so lösen!

Aber jetzt kommts: Wenn man einen Mitarbeiter auswählt, dann kann man auf dem selben Formular zu diesem Mitarbeiter auch noch Daten dazuspeichern! Und nach dem klick auf Speichern soll alles in die DB geschrieben werden.

Aber wo soll ich mir die Mitarbeiterdaten "merken", es kann ja mehrere Mitarbeiter geben, also auch mehrere verschiedene "Mitarbeiterinformationen"! Ich bräuchte also irgendeine Lösung, wo ich mir diese Daten alle merken kann, bis ich sie dann schließlich in die DB schreibe!
Gibt es auch eine andere Lösung! Wie gesagt, OO wird eigentlich nicht benötigt, dieses Thema wird sowieso noch viel genauer durchgenommen, wir haben es eigentlich erst 3 Stunden gemacht, darum wäre mir eine andere Lösung eigentlich lieber!

Ich hoffe, du kannst mir eventuell helfen

auf jedem Fall danke

Re: Delphi-Programm mit Klassen!

Robert Craven — Sat, 06 Oct 2007 14:01:48 GMT

Soll es möglichst schönes OOP sein oder sollst nur das Problem lösen?

Re(2): Delphi-Programm mit Klassen!

Guugl — Sat, 06 Oct 2007 13:20:19 GMT

Hallo!

Danke schon mal für deine Hilfe!

Noch ne Frage:

Ich hab auch noch ne andere Form, auf dieser Form werden alle vorhandenen Firmen angezeigt! Hier kann ich ne Firma auswählen, und dann auf "Ändern" klicken, dann komme ich auf die oben beschriebene Form (diese muss dann natürlich mit den alten Daten "vor-ausgefüllt" werden! Wenn ich ne Firma verändern will, wie finde ich GENAU dieses Firmenobjekt wieder von der Firma, welche ich verändern will! Und wie meinst du das mit der globalen Liste, wo soll ich die denn anlegen/speichern, und wie kann ich in dieser Liste auf eine bestimmte Firma zugreifen bzw. woher weiss ich, welches Objekt welche Firma ist?
Und wie lange bleiben denn diese Objekte bestehen, solange bis ich die Form beende, oder bis ich das gesamte Programm beende.

Es wäre nett, wenn du mir sagen/beschreiben könntest, welche Klassen du machen würdest, und vorallem WIE du diese machen würdest!

Übrigens: Es wäre eigentlich besser, wenn ich es irgendwie ohne Objektorientierung lösen könnte, falls das überhaupt geht, siehe: http://forum.geizhals.at/t525183,4376941.html#4376941

Re(2): Delphi-Programm mit Klassen!

Guugl — Sat, 06 Oct 2007 13:20:19 GMT

Re(2): Delphi-Programm mit Klassen!

Guugl — Sat, 06 Oct 2007 13:20:19 GMT

Hallo!

Danke schon mal für deine Hilfe!

Also, mein Lösungsweg ist schon mal nicht falsch, dass ist gut, ich hab jetzt aber noch ein bisschen überlegt, und hätte eventuell ne einfachere Lösung:

Wenn man ne neue Firma samt zugehörigen Mitarbeitern anlegen will:

Ich klicke auf speichern, lege mir KEIN neues Firma-Objekt an (eigentlich will ich gar keine Klasse Firma machen, ich benötige das für meine Lösung nicht mehr)! Statt dem Firma-Objekt speichere ich die eingegebenen Werte für die Firma gleich direkt in die DB! Nachdem dies gespeichert ist, hab ich schon mal den Primary Key der neuen Firma (dieser Primärschlüssel wird ja für die Mitarbeiter benötigt, um die Beziehung herzustellen)

Jedes Mal, wenn ein neuer Mitarbeiter in die "Ausgewählte Mitarbeiter"-Liste hinzugefügt wird, lege ich mir ein neues Mitarbeiter-Objekt an, und speichere dies in einer Liste.
Nachdem auf speichern geklickt wurde, laufe ich die Liste durch, und speichere jedes einzelne Objekt in die DB!

Wie wär diese Vorgehensweise? Ist villeicht nicht die schönste Art, aber IMHO ein bisschen einfacher

Noch ne Frage:

Ich hab auch noch ne andere Form, auf dieser Form werden alle vorhandenen Firmen angezeigt! Hier kann ich ne Firma auswählen, und dann auf "Ändern" klicken, dann komme ich auf die oben beschriebene Form (diese muss dann natürlich mit den alten Daten "vor-ausgefüllt" werden! Wenn ich ne Firma verändern will, wie finde ich GENAU dieses Firmenobjekt wieder! Und wie meinst du das mit der globalen Liste, wo soll ich die denn anlegen/speichern, und wie kann ich in dieser Liste auf eine bestimmte Firma zugreifen bzw. woher weiss ich, welches Objekt welche Firma ist?

Re(2): Delphi-Programm mit Klassen!

Guugl — Sat, 06 Oct 2007 13:20:19 GMT

Re(2): Delphi-Programm mit Klassen!

Guugl — Sat, 06 Oct 2007 13:20:19 GMT

Re: Delphi-Programm mit Klassen!

user40015 — Sat, 06 Oct 2007 11:58:20 GMT

was für schule machstn? ich mach ein kolleg und wir haben in sachen objektorientiertes programmieren mit java angefangen.

Re: Delphi-Programm mit Klassen!

Somnatic — Fri, 05 Oct 2007 16:36:11 GMT

Ich kann jetzt nicht konkret von Delphi reden, aber generell: Deine Lösung klingt plausibel.

Ist es nun möglich, dass ich nach betätigen des Speichern-Buttons ein neues
Objekt vom Typ "Firma" anlege, und alle Firmendaten in die Membervariablen der
Klasse speichere!

Ja, so würde man das machen.

Ist es überhaupt möglich, dass ich in eine Liste mehrere Objekte vom Typ
"Mitarbeiter" speichere

Idealerweise solltest du in deinem Programm eine Liste von Mitarbeiter Instanzen haben (alle). Du würdest dann einfach nur eine Referenz auf einen Mitarbeiter speichern.
Sprich: Globale Liste enthält: MA1, MA2, MA3, MA4; MitarbeiterListe einer einzelnen Firma hat dann die Referenzen auf die Ibjekte MA2 und MA4 (z.b.). Sprich: Du legst also nicht für jede Firma mehrere Mitarbeiter an, sondern nutzt die bereits vorhandenen.

Vergiss weiters nicht, in deinem Programme eine Liste von Firmen zu führen. Du hättest dann also 2 Listen, einmal die Mitarbeiter und einmal die Firmen. Die Firmen selbst haben dann in einer Liste eine Referenz auf das jeweilige Mitarbeiter Objekt - so könntest du das auch dann schön persistieren (bspw. in einer DB).
Die würde dann wie folgt aussehen:
Table MA, Table Firma, Table MAinFirma.
MA: hat die Eigenschaften der einzelnen Mitarbeiter (ID, Name, ...); Firma hat die Eigenschaften der Firma (ID, Name, wasweiss ich,...) und MAinFirma hat dann nur die Beziehung Firma.ID mit MA.ID.
Um solche Beziehungen schön automatisch in eine DB überzuführen gibt es bereits fertige Frameworks, ich weiss jedoch nicht inwieweit ihr das selber machen sollt.

Als nächstes soll dann eine bestehende Firma verändert werden können (z.B.
neue Mitarbeiter hinzu, Mitarbeiter wegnehmen), wie kann ich da mit den
Klassen drauf zugreifen

Das ist das wenn ich oben schreibe dass du eine Liste von Firmen führen solltest. So kannst du im Prinzip deine Maske aufrufen, und beim Aufrufen übergibst du ihr im Konstruktor bereits das Objekt (eine Firma). Diese wird dann geändert und wenn die Maske geschlossen wird, kannst du das Objekt wieder aktualisieren. Du darfst nicht vergessen, dass du (wahrscheinlich auch in Delphi) eigentlich immer mit Referenzen arbeitest und nicht mit dauernd neuen Objekten. Sprich: Eine Änderung in der Maske wird sich auf das Objekt auswirken, das in der Liste der Firmen gespeichert ist.

(Ich hoffe das war einigermaßen verständlich).

Delphi-Programm mit Klassen!

Guugl — Fri, 05 Oct 2007 12:20:57 GMT

Hallo!

Wir haben jetzt in der Schule mit dem objektorientierten Programmieren begonnen (Klassenkonzept, ...., mit Delphi)! Nun hab ich meine erste Hausübung zu dem Thema bekommen, und ich hab mir auch schon eine Lösung für das gestellte Problem überlegt, nur will ich vorher fragen, ob das so funktionieren könnte:

Also, folgende Aufgabe:

Es gibt genau 1 Formular, auf diesem Formular kann eine neue Firma angelegt werden (Name, Telefon, Anschrift). Desweiteren müssen zu der neuen Firma Mitarbeiter hinzugefügt werden(das wird auf dem selben Formular gemacht). Es gibt dazu eine Listbox mit allen verfügbaren Mitarbeitern, aus diesen Mitarbeitern kann man auswählen, die ausgewählten MA werden dann in eine andere Listbox geschoben (Listbox: Ausgewählte Mitarbeiter)

Wenn man auf einen ausgewählten Mitarbeiter klickt, dann kommen 2 Textfelder, wo man den Namen und die Adresse des in der Listbox "Ausgewählte Mitarbeiter" Mitarbeiters eingeben kann.

Abschließend soll, nach Betätigen des Buttons "Speichern", die neue Firma +ausgewählte Mitarbeiter + Mitarbeiterdaten in eine Datenbank gespeichert werden.

Nun meine Lösung:

Eine Klasse Firma mit den Membervariablen Id,Name, Telefon, Anschrift, und einer Liste "Mitarbeiter" (in dieser Liste sollen dann alle Objekte vom Typ Mitarbeiter gespeichert werden)

Eine Klasse Mitarbeiter mit den Membervariablen Id, Name, Anschrift, FirmaId

Ist es nun möglich, dass ich nach betätigen des Speichern-Buttons ein neues Objekt vom Typ "Firma" anlege, und alle Firmendaten in die Membervariablen der Klasse speichere! Das selbe will ich dann mit den Mitarbeitern machen. Ist es überhaupt möglich, dass ich in eine Liste mehrere Objekte vom Typ "Mitarbeiter" speichere (diese Liste befindet sich in der Klasse Firma |denn eine Firma kann mehrere Mitarbeiter haben, darum ne Liste von Objekten), und wie soll ich das dann alles in die DB speichern, da muss ich theoretisch die ganze Liste von Mitarbeiterobjekten durchlaufen, oder?

Als nächstes soll dann eine bestehende Firma verändert werden können (z.B. neue Mitarbeiter hinzu, Mitarbeiter wegnehmen), wie kann ich da mit den Klassen drauf zugreifen

Ich hoffe ihr könnt mir helfen, sorry das ich soviel geschrieben habe, aber ich kenn mich mit dieser Thematik noch nicht so aus, und will nur wissen, ob mein Lösungsvorgang so halbwegs OK ist

Hier noch ein (Paint)-Bild meiner Form: http://bildupload.sro.at/a/images/Formular.JPG

danke