여기저기 찾다가 소스를 구했는데요..
안되네요..
델파이 6 입니다..

begin
  // Config Client
  idSMTP1.UserId:= 'dogmh';
  idSMTP1.Password:= '*******';
  idSMTP1.Host:= 'smtp.hanmir.com';
  idSMTP1.Port:= 25;

  // Connect SMTP Server
  idSMTP1.Connect;
                          
  try
    with MyMessage do // Message = TidMessage <-- 여기서부터 아래로 전부 걸리네요...
    begin
      // Config Subject
      Subject:= 'IP ';

      // Config
      From.Text:= Label1.Caption;

      // Config Recipient
      Recipients.EMailAddresses:='put addresses mail for the recipient';
      ReceiptRecipient.Address:='put a list of recipient addresses';

      // examples
      // Recipients.EmailAddresses:='davidi@borland.com';
      // ReceiptRecipient.Address:='man1@borland.com;man2@borland.com;emerson@facunte.com.br';
      // Config Message
      Body.Text:= Label2.Caption;

      // Send e-mail
      idSMTP1.Send(MyMessage);
    end; // with MyMessage
  finally
    // Discconect Server
    idSMTP1.Disconnect;
  end;