[Lazarus] Assign not working on text files

Bart bartjunk64 at gmail.com
Sun Nov 9 15:38:14 CET 2014


On 11/9/14, Stefanos Beligiannis <smpel at yahoo.com> wrote:

> If somebody has met this problem please advise.
> ----------------code var    f : text;
>     fn,nam : string;
>
> begin
>      fn:=Edit2.Caption;
>      {$I-}
>      assign(f,fn);
>      if (not FileExists(fn)) then Rewrite(f) else Append(f);
>      {$I+}----------------- end codecompiler error
> report-----------------  startk2u.pas(92,18) Error: Wrong number of
> parameters specified for call to "Assign"k2u.pas(93,44) Hint: Local variable
> "f" does not seem to be initialized----------------- end
> use Lazarus # 1.2.6
>
>
>

Use TextFile instead of Text, use AssignFile instead of Assign.
Alternatively prepend both Text and Assign with system. (note the dot!).

Bart




More information about the Lazarus mailing list