BlackBoard (http://www.black-board.net/index.php)
- Design, Programmierung & Entwicklung (http://www.black-board.net/board.php?boardid=55)
-- Programmieren (http://www.black-board.net/board.php?boardid=4)
--- Pascal Listendatenbank schreiben? (http://www.black-board.net/thread.php?threadid=14644)


Geschrieben von [DS]-=Pencil=- am 13.11.2003 um 10:39:

  Listendatenbank schreiben?

hy,
kann mir jemand mal eine TurboPascal Listendatenbank, basierend auf Folgendem schreiben?:

Zitat:

Name Eingabe/Ausgabe
Vorname Speichern/Loeschen
Straße Ergänzen
Hausnummer Ändern
PLZ Löschen
Ort Suchen
Telefonnummer
Geburtstag
Email

Mögliche Definition:

type tzeiger=^tknoten;
tknoten=Record
vorname:string;
name:string;
strasse:string;
hausnummer:integer;
plz:integer;
telefon:integer;
ort:string;
kopf:tzeiger;
end;


hope you help

traurig



Geschrieben von CDW am 13.11.2003 um 17:39:

 

also hier ist ne Listenunit - alle Operationen mit Listen sind enthalten (zumindest die meisten - ich war damals zu faul, ne Suchfunktion zu implementieren, weil man die eher immer anpassen muss, dürfte aber nicht schwer sein, da ja die restilichen Sachen vorhanden sind)
aber liste erstellen, einfügen, anhäengen usw. sind vorhanden...



Geschrieben von [DS]-=Pencil=- am 14.11.2003 um 09:22:

 

hy cdw

danke erstmal,
aber irgendwie kenne ich den befehl interface/implentation net..was bewirkt er?

btw und ich kann das programm nicht starten, da er sagt "eine unit kann nicht ausgeführt werden"

traurig

hope you help

traurig



Geschrieben von CDW am 14.11.2003 um 19:55:

 

hm, das ist eine normale unit, die bindet man mit "uses" ein (z.B uses crt für CRT und uses Listen hierfür.
Bist du sicher dass du Listendatentyp dafür benutzen musst? (frage nur weil man normalerweise die anderen Sachen wie Units usw. vorher macht)
Oder ist es nur ungeschickt ausgedrückt? ... ich such grade mal nach einem Proggie aus der 11 wo man auch ne Adressdatenbank machen musste - es dürfte einfacher sein.(das problem ist dass ich die ganz alten programme nicht oder nicht vollständig hab, weil ich die inzwischen innerhalb von 30-50 minuten wieder schreiben könnte - wird dir aber nciht viel nutzen weil ich da schon etwas "fortschrittlicher" arbeite Augenzwinkern
hab hier zwei versionen vom Adressbuch, beides getestet (gerade) und sogar mit suchfunktion Augenzwinkern
... eine ist komplex mit Menüführung und die andere was einfacher (wobei man da auch viel rausschmeißen kann)... egal,ohne den ganzen menükram ist es gar net so viel code... (ich hab schon sogar menüs mit mausbedienung geschafft großes Grinsen ):


PS: Units werden mit INTERFACE und IMPLEMENTATION deklariert (unter interface gibt man die Funktionen/Prozedurenköpfe an, unter IMPLEMENTATION stehen die nochmal ausgeschreiben (also vollständig)
um die Listen.pas zu nutzen, muss man die vorher in den glecihen ordner wie das Programm ablegen,compilen und mit uses "name" einbinden.Jetzt sollten die unitfunktionen zur verfügung stehen (eventuell nochmal datentyp anschauen, kann sein, dass wir gerade damals auf allgemeine Datenstrukturen/abkapselung der Datenstrukturen von Prozeduren umgestiegen sind und es etwas wirr ausschaut smile


Forensoftware: Burning Board 2.3.6, entwickelt von WoltLab GmbH