Kleine Adress-Datenbank

[Luckie]

Ich hatte hier schon mal eine Adress-Datenbank vorgestellt. Dies ist nun die nachfolge Version der Adress-Datenbank. Ich hhabe mich dazu entschlossen sie von Grund auf neu zu programmieren, weil ich mittlerweile meine alten Code schrecklich fand und weil mir die Oberfläche zu groß war. Noch sind nicht alle Features der alten Version implementiert. So fehlt noch der Upload der XML-Datei mit den Kontakten und die Möglichkeit die Kontakte auszudrucken. Sprich es gehen nur die grundlegenden Funktionen einer Adress-Datenbank:
- Kontakt anlegen
- Kontakt löschen
- Kontakt editieren
- Kontakte filtern

Ich habe versucht die Oberfläche möglichst minimalistisch zu halten. Sie besteht nur aus einer Listbox und einer Toolbar mit den nötigen Schaltflächen. In der Listbox direkt werden der Name und die Telefonnumer angezeigt, weil ich denke, dass man die Telefonnumer am häufigsten braucht. Die Details zu einem Kontakt lassen sich entweder durch einen Doppelklick auf den Eintrag anzeigen oder durch betätigen der Return-Taste oder über das Kontexktmenü der Listbox. Über das Kontextmenü der Listbox lässt sich der Kontakt auch löschen, was man auch mit der entsprechenden Schaltfläche in der Toolbar machen kann oder über die Tastenkombination [Strg + Entf]. Das Kontextmenü bietet noch die Möglichkeit eine E-Mail an den Kontokt zu schreiben mit dem Standardemailprogramm, wenn mindestens eine E-Mail Adresse hinterlegt ist.

Die Kontakte lassen sich auch filtern, wobei der Filter nur stupide nach den eingegeben Buchstaben filtert. Wird also "he" eingegeben, werden alle Kontakte angezeigt, in denen die Buchstabenkombination "he" vorkommt.

Die Daten werden in einer XML-Datei im Programmverzeichnis gespeichert. Im Programmverzeichnis deshalb, weil das Programm für meinen USB-Stick gedacht ist. Bis auf das Feld Bemerkung werden alle Daten im Klartext gespeichert. Das Feld Bemerkung wird Base64 codiert, damit man auch Zeilenumbrüche mit speichern kann.

Im Anhang das Programm mit Quellcode und ein Screenshot.

[Andreas L.]

Zitat von Luckie:

Mein Delphi 2006 kennt die Bezeichner dsTransparent und itImage nicht, obwohl die Unit Controls eingebunden ist. Und mit Main.frmAdressen.ImageList1.Draw(Canvas, ARect.left + 4, ARect.Top + 4, 6); sehe ich keinen großen Unterschied.

Unit ImgList in OwnerDrawListBox.pas einbinden

[Luckie]

Hm, das steht bei mir in der Hilfe irgendwie nicht. Aber davon mal abgesehen, kann ich keinen sichtbaren Unterschied feststellen.

[Andreas L.]

Zitat von Luckie:

Hm, das steht bei mir in der Hilfe irgendwie nicht. Aber davon mal abgesehen, kann ich keinen sichtbaren Unterschied feststellen.

Bei mir schon (siehe Anhänge). Vllt. liegt es daran das ich die TX²GraphicList verwende. Die Symbole haben bei mir jedenfalls mit dem Weg über TIcon total ekelhaft ausgesehen.

[Luckie]

Hast du auch die Icons in der Toolbar ersetzt? Das sind jedenfalls nicht meine original Icons.

[Andreas L.]

Das ist eine ganz andere Anwendung. Ich hab mir lediglich das OnDrawItem-Event abgeschaut...

Sind übrigens die Office 2003 Icons von http://www.glyfz.com

[Luckie]

Wenn man nur flüchstig hinguckt, könnte man meinen es wäre meine Adressdatenbank. Darf man die Icon dort frei verwenden? Sie sehen ja ganz schick aus.

[Luckie]

Ich habe mal eine aktuelle Version (1.0.0.34) hochgeladen. Ich habe noch irgendwas am Code gemacht (verschönter, Bugs behoben) und die Oberfläche hat komplett neue Icons bekommen, die, wie ich finde etwas schöner sind.

Die Schaltflächen zum Drucken und zum Abgleich mit der Kontaktdatei auf dem Webspace sind zur Zeit noch ohne Funktion.

[Andreas L.]

Zitat von Luckie:

Wenn man nur flüchstig hinguckt, könnte man meinen es wäre meine Adressdatenbank. Darf man die Icon dort frei verwenden? Sie sehen ja ganz schick aus.

Ne die kosten leider was. Waren damals (vor 2 Jahren) umgerechnet 180 € für ca. 50.000 Symbole. Jetzt verwendest du ja die Silkicons, würde dir aber raten eine PNGImageList bzw. die X2GraphicList zu verwenden. Dann gehen die weißen Ränder wieder weg.

EDIT: Die sind auch ganz nett: http://sweetie.sublink.ca/

[Luckie]

Ich will eigentlich zusätzliche Komponenten vermeiden. Ich habe die PNG-Silkicons in Bitmaps umgewandelt.