AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Probleme mit typisierten Dateien

Ein Thema von GTF_Thanatos · begonnen am 3. Feb 2004 · letzter Beitrag vom 3. Feb 2004
Antwort Antwort
GTF_Thanatos
(Gast)

n/a Beiträge
 
#1

Probleme mit typisierten Dateien

  Alt 3. Feb 2004, 18:55
Hi Leute!

Ich wollte für unsern Clan, der inzwischen um die 70 Member umfasst, eine kleine Mitgliederverwaltung schreiben. Da ich aber keinen Bock mehr auf Paradox(von der BDE ganz zu schweigen ) habe, wollte ich das mit typisierten Dateien umsetzen.
nach dem Anlegen eines neuen Mitgliedes wollte ich das veränderte Array of Record wieder in die Datei auf Record schreiben. bekomme aber folgenden Fehler in der write-Anweisung:
"Inkompatible Typen: 'mitglied' und 'dynamic array'".
Der Queeltext steht unten(Kritische Zeile mit * markiert).

Delphi-Quellcode:
procedure TfrmNeu.btnOKClick(Sender: TObject);
var anzahlDS : Integer;
    i : Integer;
begin
  anzahlDS := length(frmMain.Speicher); //Speicher = Array of Record
  SetLength(frmMain.Speicher,anzahlDS+1);

  frmMain.Speicher[anzahlDS+1].Nick := edtNick.Text;
  frmMain.Speicher[anzahlDS+1].Nachname := edtNachname.Text;
  frmMain.Speicher[anzahlDS+1].Vorname := edtVorname.Text;
  frmMain.Speicher[anzahlDS+1].Rang := edtRang.Text;
  frmMain.Speicher[anzahlDS+1].Aufgaben := edtAufgaben.Text;
  frmMain.Speicher[anzahlDS+1].Wing := edtWing.Text;
  frmMain.Speicher[anzahlDS+1].Telefon := edtTele.Text;
  frmMain.Speicher[anzahlDS+1].mail := edtMail.Text;
  frmMain.Speicher[anzahlDS+1].msn := edtMSN.Text;
  frmMain.Speicher[anzahlDS+1].yim := edtYIM.Text;
  frmMain.Speicher[anzahlDS+1].eintritt := edtEintritt.Wert;

  reWrite(frmMain.Datei);
* Write(frmMain.Datei,frmMain.Speicher); //Datei = File of Record *
  CloseFile(frmMain.Datei);

  Close;
end;
Ich habe alternativ auch schon versucht, mit einer "for i := 0 to length(frmMain.Speicher)" Schleife jeden Datensatz einzeln in die Datei zu packen, dann speichert er mir aber immer nur den neu angelegten
Ich möchte aber kein append an die Datei machen, da das ganze in zukunft auch netzwerkfähig werden soll, deswegen möchte ich die Daten zur Laufzeit im Speicher halten, aber kein festes Array nutzen.

Wäre froh, wenn mir da jemand helfen könnte!
Danke im Voraus

[GTF]Thanatos
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#2

Re: Probleme mit typisierten Dateien

  Alt 3. Feb 2004, 19:26
Ähm, also mit T(File)Stream geht das irgendwie einfacher.
einfach myfilestream.write(myrecord, sizeof(myrecord));
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#3

Re: Probleme mit typisierten Dateien

  Alt 3. Feb 2004, 19:46
Oder nimm dir meine Klasse für typisierte dateien: http://www.luckie-online.de/downloads/
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:57 Uhr.
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