  |
|
|
 |
 Listendatenbank schreiben? |
[DS]-=Pencil=- ![[DS]-=Pencil=- ist männlich](images/male.gif "[DS]-=Pencil=- ist männlich")
Senior Member
Dabei seit: 20.09.2002
Beiträge: 446
Herkunft: Berlin
 |
|
| 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
__________________
[DS]-=Pencil=-
---------------------------
Eleminate the Enemy | Staatsfeind
Destroy Facism
www.rtcw-prison.net - www.darksoldiers.de
----------------------------
|
|
13.11.2003 10:39 |
![[DS]-=Pencil=- ist offline](images/user_offline.gif "[DS]-=Pencil=- ist offline")
![E-Mail an [DS]-=Pencil=- senden](images/3_email.gif "E-Mail an [DS]-=Pencil=- senden")
![Homepage von [DS]-=Pencil=-](images/3_www.gif "Homepage von [DS]-=Pencil=-")
![Beiträge von [DS]-=Pencil=- suchen](images/3_search.gif "Beiträge von [DS]-=Pencil=- suchen")
|
|
CDW
eine Simulation
Dabei seit: 12.10.2002
Beiträge: 1.329
Herkunft: CreateRemoteThread
|
|
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...
|
|
|
13.11.2003 17:39 |
|
|
[DS]-=Pencil=-
Senior Member
Dabei seit: 20.09.2002
Beiträge: 446
Herkunft: Berlin
Themenstarter ![Thema begonnen von [DS]-=Pencil=-](images/threadstarter.gif "Thema begonnen von [DS]-=Pencil=-")
|
|
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"
hope you help
__________________
[DS]-=Pencil=-
---------------------------
Eleminate the Enemy | Staatsfeind
Destroy Facism
www.rtcw-prison.net - www.darksoldiers.de
----------------------------
|
|
|
14.11.2003 09:22 |
|
|
CDW
eine Simulation
Dabei seit: 12.10.2002
Beiträge: 1.329
Herkunft: CreateRemoteThread
|
|
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 
hab hier zwei versionen vom Adressbuch, beides getestet (gerade) und sogar mit suchfunktion
... 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 
):
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 
| Dateianhang: |
 Adress.zip (6 KB, 1 mal heruntergeladen)
|
Dieser Beitrag wurde 3 mal editiert, zum letzten Mal von CDW: 14.11.2003 20:36.
|
|
|
14.11.2003 19:55 |
|
|
|
|
|
|
|
