PB EasySetup - Setup für eigenes Programm erstellen

[Thorsten1867]

Version 0.8.5e
Versuchsweise Integration von:
- Internet-Updater (von GPI)
- Vista Unterstützung (ungetestet)

[Knight_Rider_2000]

Jetzt kommt meine Meinung:
Also ich persönlich find das programm ganz nett aber ein paar Fragen hab ich dazu noch.
1. Hast du ein neuen Compiler erzeugt der dann die Installationsexe erstellt?
2. Kann man auch Cabinet Dateien einbinden?
(falls darüber auf einer Seite schon was steht, sagt es mir, ich hatte nicht die nötige Zeit alle 41 Seiten durchzublättern)

[Thorsten1867]

1. Hast du ein neuen Compiler erzeugt der dann die Installationsexe erstellt?

Ich habe ein Exe mit dem Installer und hänge die Archivdatei hinten dran.

2. Kann man auch Cabinet Dateien einbinden?

Alles was sich in dem Quellordner befindet, wird in ein Archiv gepackt. Wenn du also CAB-Dateien einbindest, musst du für das Entpacken dieser selber sorgen.

[Knight_Rider_2000]

Wie hast du das denn geschafft? dateien hinten anhängen darüber würd ich gern mehr wissen

[Thorsten1867]

Code: Alles auswählen

Procedure LinkToExe(ExeFile.s, ZipFile.s) 
  ; (c) TS-Soft
  Protected File.l, Pack.l, Size.l, *mem
  If OpenFile(0, ExeFile) 
    ReadFile(1, ZipFile) 
    Size = Lof(1) 
    *mem = AllocateMemory(Size) 
    If *mem 
      ReadData(1, *mem, Size) 
      CloseFile(1) 
      FileSeek(0, Lof(File)) 
      WriteData(0, *mem, Size) 
      CloseFile(0) 
      FreeMemory(*mem) 
      ProcedureReturn #True 
    EndIf 
  EndIf 
  ProcedureReturn #False 
EndProcedure

[ts-soft]

Wie hast du das denn geschafft? dateien hinten anhängen darüber würd ich gern mehr wissen

Ganz simple, hier das Grundschema:

Code: Alles auswählen

DataSection
  sfx: IncludeBinary "sfx.exe" : sfx_end
EndDataSection

File.l = CreateFile(#PB_Any, "mysetup.exe")

If File
  WriteData(File, ?sfx, ?sfx_end - ?sfx)
  
  WriteData(File, das anzuhängende gepackte Archiv, die grösse)
  CloseFile(File)
EndIf

Damit die sfx.exe später auf die Daten zugreifen kann, gibts auch versch.
Verfahren, z.B. indem man die grösse der sfx.exe hinten anhängt, so das
man weiß, wo die Daten anfangen.

Gruß
Thomas

// edit
In dem von Thorsten geposteten Code befindet sich ein
Declarations-Fehler, Mem wird deklariert und *Mem verwendet, vielleicht
die Strafe dafür das nicht beisteht, von wem der ist

[Thorsten1867]

Ich sehe, ich kann meine ZIP-Unterstützung noch verbessern.

In dem von Thorsten geposteten Code befindet sich ein
Declarations-Fehler, Mem wird deklariert und *Mem verwendet, vielleicht
die Strafe dafür das nicht beisteht, von wem der ist

Das mag daran liegen, dass ich ihn schnell mal aus meinem Programm herauskopiert habe und nicht die geringste Ahnung habe, von wem er stammt, nachdem kein Kommentar vom Autor im Orginal-Codeschnippsel dabei ist.

[ts-soft]

>> nachdem kein Kommentar vom Autor im Orginal-Codeschnippsel
Das Orginal (DBin_LinkToExe(DBinFile.s, ExeFile.s)) befindet sich in den
Examples zur PBOSL_Lib DBin! Als Autor des Examples hab ich mich nicht
vermerkt, stimmt, [ironie] ist ja eigentlich klar, das dieser Code nur von mir
stammen kann [/ironie], und enthält keinen Declarationsfehler!
Die für Dich angepaßte Version hab ich in einem, Deiner Forum-Threads,
gepostet, ich glaube im englischen Forum.

Gruß
Thomas

[Thorsten1867]

Habe eine Kommentar in die Procedure im Quellcode eingefügt, damit alles seine Ordnung hat.

[ts-soft]

Habe eine Kommentar in die Procedure im Quellcode eingefügt, damit alles seine Ordnung hat.

Wichtiger wäre es die Deklaration zu korrigieren