Re: How to rename a file?

[Pi <pi3_1415926536@yahoo.ca>]

Thanks buddy,
I'll try it tomorrow :-)

DuckE wrote :

> Here's how I make the OS call on WindowsNT/W2K using ObjectAda or GNAT:
> 
> WITH Win32;
> WITH Win32.WinBase;
> WITH Interfaces.C;
>  ...
>   PACKAGE WinBase RENAMES Win32.WinBase;
>   PACKAGE C RENAMES Interfaces.C;
> 
>   USE TYPE Win32.BOOL;
>   USE TYPE Win32.DWORD;
> ...
>   PROCEDURE RenameFileDFU( sourceFileNameDFU, destFileNameDFU : STRING;
>                            renamedDFU : out BOOLEAN ) IS
>     result     : Win32.BOOL;
>     sourceName : ALIASED C.Char_Array := C.To_C( sourceFileNameDFU );
>     destName   : ALIASED C.Char_Array := C.To_C( destFileNameDFU );
>   BEGIN
>     result := WinBase.MoveFile( sourceName(0)'UNCHECKED_ACCESS,
>                                 destName(0)'UNCHECKED_ACCESS );
>     renamedDFU := result /= Win32.FALSE;
>   END RenameFileDFU;
> 
> I hope this helps,
> SteveD
> 
> "Pi" <pi3_1415926536@yahoo.ca> wrote in message
> news:MYKs7.11405$%r.2963162@news20.bellglobal.com...
> > It may sound stupid, but I didn't find anything.
> >
> > Is there a way to rename files in Ada?
> >
> > Other than :
> > create a new file,
> > copy every byte into the new one,
> > delete the old one.
> >
> > --
> > 3,14159265359
> >
> 
> 

-- 
3,14159265359