У меня прога -для нее настройки, которые не надо прописывать в реестре и в файле txt т.е. чтобы настройка записывалась в саму прогу. Что можно сделать?

ищи тему по самоудалению ( так и называется ) только вместо удаления файла редактируй его...

Это довольно проблемно, и далеко не всем антивирусам это понравится.

_hunter а прокоментируй поподробнее... в смысле уделение заменой

Общий смысл в том, что, чтобы отредактировать файл, тебе нужно сделать сначала так, чтобы он не был запущен в данный момент.
Тогда другой программой ты сможешь внести в него изменения.
То есть общий принцип:
1. Из программы запускаем другую - которая будет делать изменения, и передаем ей необходимые данные.
2. Выходим из программы.
3. Программа, которую мы запустили, ждет, когда exeшник станет доступным для редактирования. Вносит изменения.
4. Снова запускает (при необходимости) главную программу и выходит.
Чтобы не держать 2 программы, можно сделать так:
1. Создаем копию нашей программы.
2. Вносим в копию изменения.
3. Создаем bat файл по образу и подобию примера о самоудалении (или лучше примера о самообновлении).
4. Запускаем bat файл. Выходим.
5. bat производит замену. Запускает снова основную программу (при необходимости). Самоуничтожается.

какое еще удаление заменой?
перед человеком, желающим писать в свой же ехе-шник ( запущенный ) стоит такая же проблема что и перед человеком, желающим свой ехе-шник удалить ( по закрытию ) -- во время работы доступа на запись к файлу нет. поэтому приходиться исхитряться -- пример -- самоудаление:
http://forum.vingrad.ru/index.php?showtopic=11951
делаеш все так же, но вместо куска, удаляющего файл пишеш свой кусок по записи настроек.

или тебя реализация записи интересует?

Вот пример кода, который заменяет текущий файл измененным:

Код

var       sl: TStringList;     begin       sl:=TStringList.Create;       sl.Add(':start');       sl.Add('del "'+ParamStr(0)+'" >nul');       sl.Add('if Exist "'+ParamStr(0)+'" goto start');       sl.Add('copy Новый_файл.exe "'+ParamStr(0)+'"');       sl.Add('"'+ParamStr(0)+'"');       sl.Add('del %0 >nul');       sl.SaveToFile('$$tmp$$.bat');       WinExec('$$tmp$$.bat',SW_HIDE);       Application.Terminate;     end;

А как внести измененния в ехе'шник если допустим он не запущен?

НАшел вот такой модуль правда для паскаля.

Присоединённый файл ( Кол-во скачиваний: 2 )
 exewrite.zip 1,32 Kb

проще всего писать _за файлом_ т.е. открыл на запись, сместился в конец и записал.
а как настройки хранить -- сам решай. можеш просто в по 4-ре байтп писать ( это если инты ) можеш а виде имя_параметра=значение_параметра и потом разбирать...

Код

var   fs: TFileStream; begin   try     fs:=TFileStream.Create('Новый_файл.exe',fmOpenReadWrite); // открываем файл     fs.Seek(fs.Size-$BF0,soFromBeginning); // Переходим к незадействованной области     fs.Write(...,...); // записываем все, что нам нужно   finally     fs.Free; // закрываем файл   end;

А уж чего и как ты будешь писать, это уж зависит только от тебя.
Читать аналогично, только не Write, а Read.
Естественно данный exe нельзя будет жать никаким упаковщиком.

Snowy
Большое спасибо тебе!