[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index] | Reference for unit 'System' (#rtl)

# Assign

Assign a name to a file

## Declaration

Source position: line 0

`procedure Assign(`
`out f: file;`
`const Name: string`
`); procedure Assign(`
`out f: file;`
`p: PChar`
`); procedure Assign(`
`out f: file;`
`c: Char`
`); procedure Assign(`
`out f: TypedFile;`
`const Name: string`
`); procedure Assign(`
`out f: TypedFile;`
`p: PChar`
`); procedure Assign(`
`out f: TypedFile;`
`c: Char`
`); procedure Assign(`
`out t: Text;`
`const s: string`
`); procedure Assign(`
`out t: Text;`
`p: PChar`
`); procedure Assign(`
`out t: Text;`
`c: Char`
`);`

## Description

Assign assigns a name to F, which can be any file type. This call doesn't open the file, it just assigns a name to a file variable, and marks the file as closed.

## Errors

None.

## See also

Reset |  | Open file for reading
Rewrite |  | Open file for writing
Append |  | Open a file in append mode

## Example

    Program Example5;

    { Program to demonstrate the Assign function. }

    Var F : text;

    begin
      Assign (F,'');
      Rewrite (f);
      { The following can be put in any file by redirecting it
        from the command line.}
      Writeln (f,'This goes to standard output !');
      Close (f);
      Assign (F,'Test.txt');
      rewrite (f);
      writeln (f,'This doesn''t go to standard output !');
      close (f);
    end.

Documentation generated on: Feb 26 2014