Packen und Entpacken von Dateien

[Johannes013]

Hi Leute,

ich möchte gerne eine Datei in eine EXE packen, die sich dann bei dem Ereignis OnClick entpackt.

Kann mir das einer Posten (Eventuell ohne Delphi Hilfe Thema, muss mir noch die Hilfe Datei runterladen.)

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
       // Entpacken von Passwort.ini
end;

end.

Johannes013