Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Software-Projekte der Mitglieder (https://www.delphipraxis.net/26-software-projekte-der-mitglieder/)
-   -   Datensatz Komponente (https://www.delphipraxis.net/2908-datensatz-komponente.html)

Snoop007 13. Feb 2003 01:24


Datensatz Komponente
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hi,
da ich mich viel mit strukturierten Dateien beschäftige und im Prinzip immer das selbe schreibe dachte ich mir, mensch, machste mal eine Komponente :)

und da ist sie

Diese komponente ermöglicht euch ein einfaches
lesen
schreiben
ändern
neu erstellen
und anzeigen von datensätzen

zur zeit kann sie nur einen datensatz pro zeile lesen, wenn es erwünscht ist ändere ich dies noch ab.

Beschreibung :
die Datei UnitTStruckturdaten.pas in das Verzeichnis kopieren in dem das Programm ist, welches auf die Datei zugreifen soll.

eine variable vom typ TStruckturdaten erstellen, das wars

ein kleines fertiges programm liegt in der zip datei mitbei

über antworten würde ich mich sehr freuen ! :)

Luckie 13. Feb 2003 07:01

Re: Datensattz Komponente
 
Zitat:

Zitat von Snoop007
Beschreibung :
die Datei UnitTStruckturdaten.pas in das Verzeichnis kopieren in dem das Programm ist, welches auf die Datei zugreifen soll.

Dann ist es keine Komponente, sondern nur ein Unit. :wink:

Snoop007 13. Feb 2003 11:44

stümmt :)

sakura 13. Feb 2003 12:41

Hi,

Habe mir mal gerade Deine Unit angeschaut, dabei sind folgende Fragen aufgetaucht.
  1. warum benutzt die die veraltete object Direktive anstatt der seit Delphi 1 empfohlenen class Direktive ?
  2. Warum nutzt Du keine Streams anstatt von ReadLn, Reset, etc.
  3. Da das Ändern des Dateinamen nicht möglich ist (nach dem Laden), warum den Namen nicht gleich bei Create als Parameter übergeben
  4. Rein aus Prinzip, warum fangen KlassenVariablen nicht mit F an, und warum nutzt Du nicht die Groß-/Kleinschreibung wie üblich

Das Gute: Ich glaube, dass die Unit ganz nützlich werden kann :D

...:cat:...

Snoop007 13. Feb 2003 15:06

Liste der Anhänge anzeigen (Anzahl: 1)
1. hab ich geändert, ist das nicht wurscht ?
2. warum mit einem Fernseher nach Fliegen schlagen ? ;)
3. hab ich geändert
4. weil es schon füh war ;)

kleine veränderungen habe ich vorgenommen

über mehrere zeilen einen datensatz lesen
kategorien können über einen namen angesprochen werden
datei kann unter anderem namen gespeichert werden.

mimi 13. Feb 2003 15:19

Nicht schlecht, habe mir ebend das Demo angesen.
Aber könntes ihr es noch so machen das man auch binay apseichern kann ?
also so das man es nicht mehr lesen kann ?

Snoop007 13. Feb 2003 15:25

binär abspeicher ? du meinst anstatt a z.b. 00001111 ?
da würde die datei grösse um das 8 fache ansteigen

sakura 13. Feb 2003 15:32

Zitat:

Zitat von Snoop007
1. hab ich geändert, ist das nicht wurscht ?

Um mal Borland zu zitieren: Object types are supported for backward compatibility only. Their use is not recommended.
Ausserdem gibt es keine Create, Destroy, etc., welches jeder versierte Programmierer nutzt. In der .NET Zukunft kann man New, Dispose, etc. nicht nuzten, welche für object Objekte (ob offensichtlich oder versteckt) nötig sind.

Zitat:

Zitat von Snoop007
2. warum mit einem Fernseher nach Fliegen schlagen ? ;)

Weil Streams besser und efizienter implementiert sind.

Zitat:

Zitat von Snoop007
3. hab ich geändert

:)

Zitat:

Zitat von Snoop007
4. weil es schon füh war ;)

Na gut...

...:cat:...

mimi 13. Feb 2003 17:01

ja in 01010 oder so als ob du ein record abspeicherst.

Snoop007 13. Feb 2003 17:16

Zitat:

Zitat von Snoop007
binär abspeicher ? du meinst anstatt a z.b. 00001111 ?
da würde die datei grösse um das 8 fache ansteigen

sorry, da sehe ich keinen sinn drin, aber da die unti ja open-source ist, kannst du das ja selber rein machen :)


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:59 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz