Einzelnen Beitrag anzeigen

Obelisk2k5

Registriert seit: 20. Jun 2010
14 Beiträge
 
Delphi 2 Desktop
 
#3

AW: Einzelne Elemente aus Datei auslesen

  Alt 20. Jun 2010, 18:47
Da ich eine eigene Funktion habe, nehme ich also am besten noch eine Variable vom Typ des Elements und gebe die als Prameter an die Funktion weiter.

Okay, danke.
Sieht ja schon fast zu leicht aus ^^

EDIT:

So, habe gedacht, das Speichern währe genau so einfach, aber denkste...

An markierter Stelle verlangt er nach einer Variable,
und ich wüsste jetzt nicht, was der Compiler will.

Delphi-Quellcode:
function writeToFile (const Filename: string): boolean;
var
  datavar: file of TElement;
  i : longint;
begin
  writeToFile := false;
  try
  AssignFile(datavar, Filename);
    try
      Rewrite(datavar);
       for i := 1 to getElementCount do
        begin
          write(datavar, getElement(i)); //<=======
          writeToFile := true;
        end;
    finally
      closeFile(datavar);
    end
  except
    on E: EInOutError do showmessage('Datei kann nicht gespeichert werden.')
  end
end
Andere Funktionen:
getElementCount - liefert die Anzahl an Elementen, also auch, wie viele gespeichert werden sollen.
getElement - liefert als Rückgabewert einen Wert vom Typ TElement mit dem angegebenen Index i.


Ich bin schoon gespannt, wie hier die Lösung aussieht

Geändert von SirThornberry (21. Jun 2010 um 09:54 Uhr)
  Mit Zitat antworten Zitat