Компиляция в программе

[mrbadge]

Такой вопрос:
Необходимо компилировать похожие программы из родительской. Раньше с таким никогда не сталкивался, поэтому даже не знаю с чего начать (посмотрел в гугле - нашел с использованием встроенного компилятора дельфи + три его библиотеки(минимум)). Есть ли возможность уменьшить этот набор до минимума? Какой самый простой способ такой компиляции?
Заранее спасибо

[p51x]

написать собственный компилятор

[mrbadge]

Спасибо, конечно, за содержательный ответ)возможно ли просто присоединить дельфийский компилятор и его библиотеки в ресурсы и использовать от туда?

[Пепел Феникса]

давайте разложим вашу задачу на составные: (+ что вы вроде как знаете, - что нет)
1)файл в ресурс -
2)распаковка файла из ресурса -
3)применение файла(компиля и тп) +
4)удаление файла +(ну я на это надеюсь)

ЗЫ: напрямую использовать компиль из ресурса не выйдет.

[CepbIu]

Сообщение от Пепел Феникса

давайте разложим вашу задачу на составные: (+ что вы вроде как знаете, - что нет)
1)файл в ресурс -
2)распаковка файла из ресурса -
3)применение файла(компиля и тп) +
4)удаление файла +(ну я на это надеюсь)

ЗЫ: напрямую использовать компиль из ресурса не выйдет.

если нужен будет пример по первым двум пунктам - выложу

а нельзя ли пойти другим путём:
те как я понимаю пишется так называемый "билдер", только нужно изменить значение пары констант? тогда можно просто извлекать файл из ресурса и патчить его

[Пепел Феникса]

такое можно сделать, рассказать как?

[Stilet]

и патчить его

Исполнимый файл?? Это не так просто. Да и потом, антивирусам это может не понравится...

[CepbIu]

Сообщение от Stilet

Исполнимый файл?? Это не так просто. Да и потом, антивирусам это может не понравится...

procedure PatchFile(Address: Cardinal; Bytes: Byte);
var
  F        : File of Byte;
  ChW      : Char;
  ChR      : Char;
begin
  inc(i);
  AssignFile(F, FileName);
  Reset(F);
  Seek(F, Address);
  BlockRead(F, ChR, 1);
  Seek(F, Address);
  ChW:=Char(Bytes);
  BlockWrite(F, ChW, 1);
  CloseFile(F);
end;

[Пепел Феникса]

Исполнимый файл?? Это не так просто. Да и потом, антивирусам это может не понравится...

1)почему не так просто?
2)чем антивиру не понравится то что я изменил то что извлек из самого себя?

[CepbIu]

Сообщение от Пепел Феникса

1)почему не так просто?
2)чем антивиру не понравится то что я изменил то что извлек из самого себя?

человек мог подумать что обсуждается написание джоинера и тд
а если как и сейчас, планируется изменить какую либо константу\надпись\etc, то
1) не знаю, всё очень легко
2) без понятия