Добрый день! Кто может помочь пожалуйста с Архиватором

[THi4F]

Добрый день! Кто может подсказать и кому не трудно помочь с программным кодом, проблема встала с кодом не могу понять в чём проблема кода Архиватора. Если можно внесите изменения или если не трудно саму программу.

Заранее спасибо

[min@y™]

Посмотрел документ.
Это шутка, да?

[THi4F]

Почему шутка то?

[min@y™]

Почему шутка то?

Ну ты же не думаешь, что кто-то реально будет это разгребать, да?
Пошутил, типа.
Мы посмеялись и всё такое...

[Serge_Bliznykov]

THi4F, реально. Вы нашли где-то в "интернетах" чью-то работу (скорее всего реферат) по разработке программы-архиватора.
В формате документа MS Word.
Хорошо. Ладно. Допустимо.

И вот теперь Вы хотите, что бы кто-то, от нечего делать, потратил кучу времени и сил, чтобы воссоздать из этого готовый (и при этом рабочий) проект на Delphi ?
Просто так, от того, что ему нечем заняться?
Сомнительно.
А Вы сами почему этим не займётесь?

И что означает фраза:

проблема встала с кодом не могу понять в чём проблема кода Архиватора

?!
Какая у Вас проблема с кодом? Та, что у Вас этого кода нет? или какая?

[THi4F]

Вот такая ошибка выскакивает



если удаляю, не помогает и выскакивает уже ошибки на форм, а если не удаляю то опять она.

[min@y™]

Девки зовут на природу пиво пить и шашлыки жарить. А тут архиватор!

проблема, однако...

[TaLadno]

Однозначно в армию, а то еще получишь диплом атомщика или врача... ...(и все равно пылесосы будешь продавать)

type
  TForm1 = class(TForm)
    Button1: TButton;
    Memo1: TMemo;
    OpenDialog1: TOpenDialog;
    ProgressBar1: TProgressBar;
    Label2: TLabel;
    Label3: TLabel;
    ProgressBar3: TProgressBar;
    Label4: TLabel;
    OpenDialog2: TOpenDialog;
    Button2: TButton;
    ProgressBar2: TProgressBar;
    Label1: TLabel;
    Memo2: TMemo;
    Label5: TLabel;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

Ты хоть компонентики на форму положи, да обработчики поназначай