dani223 - Do 10.12.09 10:15
Titel: Hilfe: Lehrerkonferenzprogramm

---

Hallo,

Wir wollen in unserer Schule ein Programm mit Delphi programmieren, dass uns bei den Lehrerkonferenzen eine Hilfe sein soll.
Hierbei handelt es sich darum, dass vorerst alle Lehrerkürzel der jeweiligen Klassen eliminiert werden, die mehr als einmal auftreten. Eine Liste der Lehrerkürzel ist zum Beispiel diese am eispiel unserer fünften Klassen:

05a-Pe-Eb-Hs-Lz-Pe-Sö-Sb-Os-Su-Lz-Pe-Os*
05b-Es-Dm-Hs-Lz-Dm-Sö-Wd-Qu-Gd-Su-Kt-Qu*
05c-Ro-Km-Eg-Se-Km-Be-Co-Fe-Os-Eg-Kt-Km*
05d-Pa-Kl-Eg-Li-Br-Ro-Wd-Bd-Hm-Bd-Bd-Vd*
05e-Pa-Km-Dv-Li-Ba-Hk-Wd-Bz-Ho-Ds-Kt-Pa*

Ist dies geschehen soll das Programm diese Kürzel nach dem Alphabet ordnen. und ausgeben.

Ich wäre Ihnen/euch sehr verbunden, wenn Sie Vorschläge hätten, wie die Aufgabe zu lösen sei! Bisher haben wir probiert dies mit dem ASCII-Code zu bewältigen, allerdings ist dies sehr kompliziert und wir hoffen auf einen Lösungsweg, der dies nicht ist.
Um Ihre Hilfe wäre ich Ihnen sehr verbunden.

mit freundlichen Grüßen,

das Gymnasium Warstade


Moderiert von Narses: Topic aus Algorithmen, Optimierung und Assembler verschoben am Do 17.12.2009 um 22:18

Narses - Do 10.12.09 10:58

---

Moin und :welcome: im Forum!

Interessanter Ansatz, so habe ich Hausaufgaben auch noch nicht präsentiert bekommen. ;)

dani223 hat folgendes geschrieben :

Ich wäre Ihnen/euch sehr verbunden, wenn Sie Vorschläge hätten, wie die Aufgabe zu lösen sei!

Ansatz:

• Die Textdatei (sofern der Aufbau wie angegeben ist) in eine TStringList einlesen, diese Zeilenweise durchgehen
  
• Eine weitere TStringList nehmen, .Delimiter auf "-" setzen und die aktuelle Zeile der Datei auf .DelimitedText zuweisen, dabei werden die Elemente am Minus getrennt als einzelne Strings abgelegt
  
• Das erste Element aus der Zeilen-Stringliste entnehmen und als Klassen-Bezeichnung aufheben, vom letzten das *chen entfernen
  
• In einer Schleife (von Hinten nach Vorne) die Zeilen-Stringliste durchgehen und die Duplikate entfernen (z.B. mit .IndexOf() prüfbar)
  
• Dann per .Sort-Methode der Zeilen-Stringliste diese sortieren
  
• Das ganze mit dem Klassen-Namen wieder ausgeben (z.B. per .CommaText ganz nett machbar -> CSV-Format)
  
• Fertig. :D

Und jetzt kommt die Frage nach einem kleinen Code-Beispiel, richtig? :zwinker:

cu :wave:
Narses

Marc. - Do 10.12.09 11:00

---

Hey dani223 und :welcome: im Forum!

Edit: Ich hatte heute Morgen sehr wenig Zeit und da Narses Antwort zwar in die gleiche Richtung geht, seine Antwort aber mehr Information bietet, seh meinen Post hier als redundant an. :P

dani223 - Mo 14.12.09 15:25

---

Hallo,

danke.
Ein Codebeispiel wäre sehr hilfreich, da uns einige Begriffe noch nicht geläufig sind.
Selbstverständlich versuchen wir auch die Aufgabe selbst zu lösen, eine Hilfe wäre es dennoch:;)

Lieben Gruß!

Narses - Mo 14.12.09 15:47

---

Moin!

dani223 hat folgendes geschrieben :

Ein Codebeispiel wäre sehr hilfreich, da uns einige Begriffe noch nicht geläufig sind. Selbstverständlich versuchen wir auch die Aufgabe selbst zu lösen, eine Hilfe wäre es dennoch: ;)

Na dann ist es doch kein Problem, wenn ihr mal die bisherige Lösung (oder Ansatz) hier als Code vorstellt und sagt, wo es noch Probleme gibt. :)

cu
Narses

dani223 - Do 07.01.10 10:20

---

Hallo,

nach wochenlangem Rumprobieren haben wir es noch immer nicht geschafft, diese Aufgabe zu lösen. Es gelingt uns zwar, die StringList zu sortieren, allerdings schaffen wir es nicht, sie aufzuspalten, um dann die einzelnen Teile zu verschieben und anschließend mit .sort oä zu sortieren. Um einen Lösungshinweis wäre ich sehr verbunden!

Gruß, dani223

iKilledKenny - Do 07.01.10 10:29

---

Wie Narses ja bereits geschrieben hatte:
Ein bischen von dem, was ihr schon habt, mit einer Beschreibung wo es hakt würde helfen.

OnkelTobi - Sa 16.01.10 23:18

---

@dani
Guck mal in den Anhang.

Evtl. hilft das euch weiter.

/edit
Ich hatte einen kleinen Fehler noch drin. Das (*) am Ende der Zeile gehört ja sicher nicht mit dazu...

Narses - So 17.01.10 00:39

---

Moin!

Du bist mein Held-des-Tages, Wahnsinn, du hast eine Simpel-Aufgabe gelöst bekommen, einfach toll! :roll: Machst du auch meine Hausaufgaben? :flehan: Ich habe immer so viel zu tun und so wenig Zeit, und dann habe ich auch noch im Krankenhaus gelegen und jetzt kriege ich deshalb auch noch eine schlechte Note... :( die Lehrer sind ja sooo gemein! :bawling: Und das, wo ich Informatik doch nur belegt habe, weil ich mich schon so gut mit Computern auskenne... 8)

OnkelTobi hat folgendes geschrieben :

Guck mal in den Anhang. Evtl. hilft das euch weiter.

Nein, das hilft ihnen ganz sicher nicht weiter, weil sie´s nicht selbst entwickelt haben. :nixweiss:

Da es dein erster Beitrag hier ist: nimm´s nicht persönlich, ab und zu ist mal wieder sowas fällig, heute hat´s dich getroffen. ;)

cu :wave:
Narses

OnkelTobi - So 17.01.10 01:22

---

:roll:
Ich musste grade schmunzeln, denn irgendwie hatte ich die Reaktion beim Posten schon erwartet.

Das Ganze ist ja noch ausbaufähig. Zu lernen gibts sicher noch genug :)

Narses - So 17.01.10 01:27

---

Moin!

OnkelTobi hat folgendes geschrieben :

Ich musste grade schmunzeln, denn irgendwie hatte ich die Reaktion beim Posten schon erwartet.

Und warum hast du dann der Versuchung nicht widerstanden? :roll: Du hast doch nicht ernsthaft geglaubt, dass das Lösen (nein, Quellcode-Liefern) einer so einfachen Aufgabe hier irgend einen positiven Eindruck hinterlässt, oder? :zwinker:

OnkelTobi hat folgendes geschrieben :

Das Ganze ist ja noch ausbaufähig. Zu lernen gibts sicher noch genug :)

Von Fischen und Lehrern... [http://www.delphi-forum.de/viewtopic.php?p=492306#492306] :les: :think:

cu
Narses