[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