Код на Pb

[Arei17]

смотри 1 программой я архивирую, а другой пытаюсь распаковать, но не получается почему то

[*PB*]

смотри 1 программой я архивирую, а другой пытаюсь распаковать, но не получается почему то

Программа PureSFX создаёт самораспаковывающийся архив с расширением EXE, который нужно сохранить на диске и его запускать для распаковки архива.
Прога Stub вспомагательная и её запускать не нужно. Она нужна для PureSFX (внедряется в нее при компиляции).

[Arei17]

Привет а можно код ниже что бы когда он начинает работать потом информацию сохронять в txt и почему если в письме есть русский язык то он пишеться иероглифами

Server.s = "pop.mail.ru" 
Port.l = 110 
User.s = "" 
Pwd.s = "" 
; 
If PurePOP3_OpenPOP3Connection(Server, Port, User, Pwd) = #PurePOP3_Ok 
  Debug "Connected" 
  ; PurePOP3_Trace(#TRUE) 
  Messages = PurePOP3_CountMessages() 
  Debug "You have " + Str(Messages) + " messages(s)" 
  If Messages 
    Debug "Message(s) total size : " + Str(PurePOP3_GetMessagesTotalSize()) + " bytes" 
    Debug "Message " + Str(Messages) + " size : " + Str(PurePOP3_GetMessageSize(Messages)) + " bytes" 
    Debug "Retrieve message " + Str(Messages) 
    If PurePOP3_RetrieveMessage(Messages) > 0 
      Debug "--------------" 
      Debug "Message info : " + PurePOP3_GetMessageInfo() 
      *Message = PurePOP3_GetMessageTextInMemory() 
      If *Message 
        Debug "Message text :" 
        Debug "" 
        Debug PeekS(*Message) 
        Debug "" 
        FreeMemory(*Message) 
      EndIf 
      Attachements.s = PurePOP3_ListAttachementsForMessage() 
      If Attachements 
        Debug "----------------" 
        Debug "Attachement(s) : " + Attachements 
        If PurePOP3_SaveAttachementsToFile("") 
          Debug "Attachement(s) saved to current directory" 
        Else 
          Debug "Could not save attachement(s)" 
        EndIf 
      Else 
        Debug "--------------" 
        Debug "No attachments" 
      EndIf 
    EndIf 
  EndIf 
  PurePOP3_ClosePOP3Connection() 
Else 
  Debug PurePOP3_GetLastServerMessage() 
EndIf

а ещё можно что бы информация а логине и пароле бралась с файлов?