Problem mit Assign (Textfile, Textfilename)

[tolleware]

Hallo,

ich habe ein Problem mit Assign. Beim Kompilieren der Zeile "Assign (CsvFile, OutCsvFileName);" kommt die Meldung
Error: Wrong number of parameters specified for call to "Assign"
Error: Found declaration: Assign(TPersitent).

Komischerweise funktioniert Assign vorher in einer andern procedure bei einem weiteren Textfile korrekt "Assign (LogFile, LogFileName);".

Ich habe daraufhin mal bei Assign (CsvFile, OutCsvFileName) "Finde Deklaration von Assign" aufgerufen und lande in "classesh.inc" und "procedure Assign(Source: TPersistent); virtual;"

Mache ich auf dem ersten Assign (LogFile, LogFileName) "Finde Deklaration von Assign", lande ich aber in "systemh.inc" und "Procedure Assign(out t:Text;const s:rawbytestring);"

Ich denke, der Verweis nach "systemh.inc" ist korrekt.
Warum funktioniert das beim 2. Aufruf nicht, wieso wird ein falscher Aufruf benutzt ?
Was muss ich machen, das das korrekt funktioniert ?

Über etwas Hilfe freue ich mich - Danke vorab !

Gruß
Uli

[m.fuchs]

Benutz einfach statt Assign die gleichfunktionierende Prozedur AssignFile. Dann wirst du das Problem nicht mehr haben.

[af0815]

Warum funktioniert das beim 2. Aufruf nicht, wieso wird ein falscher Aufruf benutzt ?

Vor Jahren wurde Assign (mit Files) zu AssignFile umbenannt, da es zu Namenskonflikten gekommen ist.

[icho2099]

oder schreib den Unitnamen explizit davor: System.Assign()

[PascalDragon]

Warum funktioniert das beim 2. Aufruf nicht, wieso wird ein falscher Aufruf benutzt ?

Die Klasse TPersistent hat eine Method Assign mit anderen Parametern. In allen Klassen, die von TPersistent direkt oder indirekt erben hat diese Method nach den allgemeinen Sprachregeln von Object Pascal Vorrang zu der globalen Funktion aus System mit dem gleichen Namen. Du kannst dies umgehen, indem du entweder den Alias AssignFile nutzt, der extra aus diesem Grund eingeführt wurde, oder du nutzt den vollen Namen System.Assign.
Ein gleiches Problem besteht übrigens auch bei TForm.Close und System.Close.

[tolleware]

Danke an Alle, AssignFile() statt Assign() hat geholfen.