Dateizugriff auf ein binary File

[GPM]

Hallo,

ich versuche gerade, einen einfachen Dateizugriff zu erstellen. Es sollen darin Records gespeichert werden. Allerdings kann ich nicht Compilieren (There is no overloaded version of 'AssignFile' that can be called with these arguments).

Selbst wenn ich den Code eines Tutorials kopiere, erscheint diese Fehlermeldung.

Delphi-Quellcode:

type
   TCustomer = Record
     name : string[20];
     age  : Integer;
     male : Boolean;
   end;

 var
   myFile   : File of TCustomer;  
   customer : TCustomer;          

 begin
   AssignFile(myFile, 'Test.cus');
   ReWrite(myFile);

[marabu]

Herzlich willkommen in der Delphi-PRAXiS, GPM.

Dein Code ist so wie du ihn gepostet hast in Ordnung. In deinem Programm wird eventuell myfile durch eine andere Deklaration überdeckt, so dass sich der falsche Typ ergibt. Wenn du nicht weiter kommst, dann musst du mal den kompletten Quellcode als Anhang bereit stellen.

Eventuell solltest du die von dir verwendete Delphi-Version in dein DP-Profil eintragen.

Freundliche Grüße vom marabu

[himitsu]

Die Nachricht bedeutet einfach nur, das der Compiler in der Unit, wo er eine Prozedur namens AssignFile gefunden hat, keine Prozedur mit den gewünschten Parametern finden konnte.


Was hast du denn in deinen Uses-Blöcken (also welche Units sind eingebunden und in welcher Reinfolge).

Halte mal den Mauszeiger über AssignFile und schau in dem Hint nach, welche Unit dort angegeben ist.

[mkinzler]

Also bei mir funktioniert dein Code. welche Delphiversion?

[GPM]

Danke für die schnelle Antwort.

AssignFile benutzt ooMisc, eingebunden sind:

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, OoMisc, AdPort, ExtCtrls, Math;


Mit einem Textfile klappts.

Die Version ist Delphi 2005

[marabu]

Um sicher zu gehen, dass die richtige Fassung von AssignFile() aufgerufen wird, kannst du die qualifizierte Schreibweise verwenden oder die Reihenfolge der Units in der USES-Klausel verändern:

Delphi-Quellcode:

System.AssignFile(myfile, 'Test.cus');

marabu

[GPM]

Zitat:

Zitat von marabu

Delphi-Quellcode:

System.AssignFile(myfile, 'Test.cus');

Perfekt, daran lags :)

Danke!