отделять Attachment и сохранять в файл

[D_E_N]

привет всем как отделить файл от письма и сохранить файлик? при запуске прога спрашивает какую тему грузить
вот код

program priem;

{$APPTYPE CONSOLE}

uses
  SysUtils,

  IdBaseComponent,
  IdComponent,
  IdTCPConnection,
  IdTCPClient,
  IdMessageClient,
  IdMessage,
  ImageHlp,
  Idpop3,
  IdHTTP,IdAttachmentFile;

procedure otpr;
label f;
var
 pop3:TIdpop3;
 idMessage:TIdMessage;
 today : TDateTime;
    i,num,fil: Integer;
 s,t:string;
 att:TIdAttachmentFile;
 begin
 write('Enter subject: ',t);
 readln(t);

                att:=TIdAttachmentFile.Create(nil);
                pop3:=TIdpop3.Create(nil);
               idMessage:=TIdMessage.Create(nil);

               POP3.Host:='******'; // адрес почтового сервера
   POP3.Port:=110; // порт по которому будет осуществляться подключение
   POP3.Username:='*****'; // логин пользователя
   POP3.Password:='*****'; // пароль пользователя

   IdMessage.Clear; // очистка буфера для сообщения
   POP3.Connect; // подключение по протоколу POP3, по настройкам в компоненте IdPOP3, с именем POP3

num:=(POP3.CheckMessages);
  if num<0 then goto f;

   for i := 1 to Num do begin
        POP3.Retrieve(i,IdMessage);
        if IdMessage.Subject=t then
        begin
         for fil := 0 to Pred(idMessage.MessageParts.Count) do
        begin
        if (idMessage.MessageParts.Items[fil] is att) then
        begin //general attachment
    att(idMessage.MessageParts.Items[fil]).SaveToFile(
      att(idMessage.MessageParts.Items[fil]).Filename);
    att.Create(idMessage.MessageParts,
      att(idMessage.MessageParts.Items[fil]).Filename);
  end;
        end;
S:=(IdMessage.Body.GetText); // передача сообщения из компонента IdMessage в memo
POP3.Delete(i);
   writeln(s);
end
end;
f:
   POP3.Disconnect;
end;

begin
otpr;
end.

ошибки компиляции

[DCC Error] priem.dpr(52): E2015 Operator not applicable to this operand type
[DCC Error] priem.dpr(54): E2066 Missing operator or semicolon
[DCC Error] priem.dpr(55): E2066 Missing operator or semicolon
[DCC Error] priem.dpr(57): E2066 Missing operator or semicolon