Ändra storlek på EXE-fil...

Är det storleken på den packade filen du vill åt?
Låter så i din beskrivning
Annars Definiera en variabel i Delphi programmet.
Eller vill du ändra i RunTime mod!

Ursäkta min dåliga beskrivning... Försöker vara mer tydlig nu...

1. Skapa en EXE-fil (500 kb)
2. Ändra storlek på den så att den blir större till kanske 2 mb (så att den tar så mycket plats på hårddisken)
3. Få samma EXE-fil att kunna minska från 2 mb tillbaka till 500 kb som den var på från början...

går det?

Du kan inte ändra innehållet i en fil som körs. Du måste använda en temporär fil och ersätta exe-filen med ett annat program vid omstart t.ex.

ExeMod på sidan nedan kanske kan hjälpa dig.
http://www.geocities.com/gacarpenter386/

Marcus E: Det enda jag vill är att kunna öka storleken på min egna exefil och sedan kunna minska tillbaka till den normala storleken. Har ingen betydelse om den startas om eller så...

jt: Jag har kollat på sidan och jag ser inte riktigt hur jag kan bara ändra storleken på exefilen bara lägga in saker i exefilen. Har mailat personen som gjort sidan och jag får se om jag får nåt svar på det...

Har inte använt exemod själv så jag vet inte om det är bra, men gjorde en snabb test vilket verkade funka.
Men jag kanske har missupfattat frågan.

uses
exeMod;

//Ökar storleken med 1000 bytes
procedure Ttest.Button1Click(Sender: TObject);
var
s: array[0..980] of char;
begin
FillChar(S, SizeOf(S), ord('x'));
Add2Exe('qwert', S);
AlterExe;
end;

//Återställer storleken
procedure Ttest.Button2Click(Sender: TObject);
begin
DelFromExe('qwert');
AlterExe;
end;

Mig veterligen kan man sista i en EXE fil lägga vad man vill, fylla ut den med hur mycket struntdata som man vill :)
Bara att öppna den för skrivning med något program och söka till slutet och börja skriva :)

/Viktor

jt: Tack så mycket, det fungerar utmärkt :)