TUUCode component declared with methods

procedure UUEncode(aSource, aDest: TStream; fSource: TFileName);
procedure UUDecode(aSource, aDest: TStream; fDestination: TFileName);

fSource, fDestination - these parametres needed for compatablity with 
other versions of UUcode programs:

procedure UUEncode(aSource, aDest: TStream; fSource: TFileName);

if fSource = '' the Uuencoded file header looks like this:

begin 644

if fSource = my_file then this header looks:

begin 644 my_file


procedure UUDecode(aSource, aDest: TStream; fDestination: TFileName);
...
if (fmask = '444') AND (fDestination <> '') then FileSetAttr(fDestination, faReadOnly);
...

------------------------------------------------------
Copyright (c) by Artem A. Berman (art@aber.kherson.ua)
