Jason Aller Floppy Collection/153.img/TELES.ZIP/GEEK.PAS

Pascal/Delphi Source File | 1988-07-19 | 176b | 8 lines

    i:='Mail: ';
    if (nomail in option) or (forusr<>0 then begin
      if nomail in option then
        i:=i+'Closed';
      else
        i:=i+'Forwarded';
    end;