Re: File I\O

["Gavin Bowra" <bowmac@iinet.net.au>]

Hi,
    Text file required....but saved to A:\.

procedure create (file: in out  File_type
                             mode: in     File_mode := out_file;
                             name: in      String        :=  "   ";
                             form:  in      String        :=  "   ");


Last night I was trying to get this to work, if you could maybe point out
ifthis will work.

      Procedure File_Buy  is
      Sponsors : File_Type;

      Begin --File_Buy

      New_Line(2);
      Put("                Please enter the file name");


      Create(In_Sponsors, Out_File, "A:\Sponsors.dat");

      Close (Sponsors);

      End File_Buy;

Gavin Bowra <bowmac@iinet.net.au> wrote in message
news:3905a5b7$0$28047@echo-01.iinet.net.au...
> Hi
>    I need a bit of a pointer on File I\Os Basically I have to create and
> read a file. My problem is that I can't get a handle on how it is done, I
> have the LRM and Rendezvous with Ada 95 but I can't follow the explanation
> or example ( I must be thick or something ;-) ) If there is anybody out
> there who can explain this to an IDIOT so he can understand would be
greatly
> appreciated.
>
> David
>
> --
> When all else fails, read the instructions
>
>