Forum: Object-Pascal / Delphi-Language
Delphi
by nat,
5. Jun 2009
und da hat er recht! :thumb:
:-D
Forum: Object-Pascal / Delphi-Language
Delphi
by nat,
4. Jun 2009
jojo, kein problem. wie gesagt, gibt noch ne menge optimierungsmöglichkeiten.
man könnte z.B. ganz ans ende (was dann als erstes ausgelesen wird) einen string
speichern um zu erkennen, ob überhaupt was angehängt ist, dann ein integer
wieviele dateien und dann halt für jede datei länge+inhalt.
naja, tüfftel dich da ma durch! :)
Forum: Object-Pascal / Delphi-Language
Delphi
by nat,
3. Jun 2009
so, wieder da... war eben etwas beschäftigt.
hab ma auf die schnelle n beispiel zusammen geklatscht.
das könnte man sicher noch optimieren (grade in bezug auf mehrere dateien
die angehängt werden sollen), aber ich denke um die grundlegende
vorgehensweise zu verdeutlichen sollte es ausreichen.
guck dir den source an und versuch ihn zu verstehen.
kannst dir in nem hex editor auch ma die...
Forum: Object-Pascal / Delphi-Language
Delphi
by nat,
3. Jun 2009
naja, ich war mir da nich so sicher. hatte in nem anderen thread von ihm was von "setup" gelesen.
da dachte ich, vll bastelt er ja an ner setup engine oder sowas.
deshalb wollt ich meinen senf halt auch dazu geben! ;)
Forum: Object-Pascal / Delphi-Language
Delphi
by nat,
3. Jun 2009
kommt halt immer auf den anwendungsfall an. wenn du ne feste datei in dein programm kompilieren willst sind ressourcen sicher besser.
soll dein programm aber viele verschiedene dateien angehängt bekommen (wie z.B. bei den schon angesprochenen selbstentpackenden archiven),
dann kannste da nich viel mit ressourcen machen.
kommt halt immer drauf an... wollte ja nur noch eine möglichkeit nennen......
Forum: Object-Pascal / Delphi-Language
Delphi
by nat,
3. Jun 2009
du liest die datei die du anhängen willst erstma in einen buffer ein z.B. so
var
FS: TFileStream;
Buffer: array of char;
begin
FS := TFileStream.Create('DateiDieIchAnhängenWill.exe', fmOpenRead);
try
setlength(Buffer, FS.size);
FS.ReadBuffer(Buffer, FS.size);
//die komplette datei ist nun binär in Buffer
Forum: Object-Pascal / Delphi-Language
Delphi
by nat,
3. Jun 2009
du könntest die dateien hinten an die exe-datei anhängen.
die exe sollte trotzdem lauffähig sein und kann zur laufzeit aus
sich selber die dateien auslesen. du müsstest nur mit speichern
wie groß die angehängte datei (oder wenn mehrere, wie groß jede
einzelne datei) ist, damit du sie auch wieder auslesen kannst.
so machen es meines wissen auch die selbstentpackenden
zip/rar/etc archive.