Thema: Delphi savedialog/opendialog

Einzelnen Beitrag anzeigen

marcelwhip

Registriert seit: 5. Aug 2005
Ort: Berlin
38 Beiträge
 
Delphi 7 Personal
 
#8

Re: savedialog/opendialog

  Alt 17. Aug 2005, 15:24
so das sieht jetzt so bei mir aus:
Delphi-Quellcode:
procedure TForm1.Button6Click(Sender: TObject); ///laden
  begin
    AssignFile(F, opendialog1.filename);
    Reset(F);
    BlockRead(F, @eintrag, 300 * SizeOf(TDaten));
    Close(F);
    opendialog1.execute;
  end;

procedure TForm1.Button7Click(Sender: TObject); //speichern
var I:Integer; //zählvariable
  begin
      AssignFile(F, savedialog1.filename);
      Rewrite(F);
      BlockWrite(F, @eintrag, 300 * SizeOf(TDaten));
      Close(F);
      schongespeichert:=true;
  end;
dann kommt immer so ne fehler meldung:"konstantausdruck kann nicht als varparameter weitergegeben werden."

achso, wenns was zur sache tut: meine datei soll dann meineDaten.mod heißrn, das hab ich schon bei beiden in som filter und so eingetragen.

Mit dem Programm hab ich mich wahrscheinlihc übernommen !!
zum glück gibts ja euch!!
  Mit Zitat antworten Zitat