DAU: Datei speichern und öffnen- Befehle gesucht.

[xantor]

könnte stimmmen...
..ob sich da auch InformatikLK-Lehrer freuen?
Ich wollt euch nur nicht damit nerven, shcon wieder nach einer FUnktiuon zu fragen, habe jmd. anders gefragt, aber der wusste es leider nicht, und wenn ich diese Mittel scho kene, dann nutze ich sie auch gerne.

[xantor]

Kann mir bitte noch jmd helfen, wie dieser Abschnitt zum öffnen der Datei richtig lauten müsste? Danke im Vorraus!
Variable:

Code: Alles auswählen

var
  Form1: TForm1; 
  dmin, dmax, dberechnung, i,l, lc, j: integer;
  pergebnis, emin, emax: extended;
  reset, gerechnet: boolean;
  auslagerung, zeichen:string;
  auslag2, endung, dat:ansistring;
  print: TStringList;
  datei: longword;

Code: Alles auswählen

if OpenDialog1.Execute THEN
       Begin
          auslagerung:=OpenDialog1.Filename;
          AssignFile(print, auslagerung);
          Reset;
 
          IF ExtractFileExt(OpenDialog1.FileName)='.ava'
            THEN
              Begin
 
 
              end;
          FileClose(print);
 
       end;

[theo]

StringList.LoadFromFile(OpenDialog1.Filename);

[shokwave]

oder

Code: Alles auswählen

var print : TextFile;