20.08.2009, 00:44
|
|
Познавший АНТИЧАТ
Регистрация: 29.04.2007
Сообщений: 1,189
С нами:
10018169
Репутация:
1680
|
|
У меня к вам следующий вопрос.
Пишу программу на API которая должна извлекать из .RES файла файл, и + прописывать его в автозагрузку.
Пока использую всем известную функцию:
Код:
procedure ExtractRes(ResType, ResName, ResNewName : String);
var
Res : TResourceStream;
begin
Res := TResourceStream.Create(Hinstance, Resname, Pchar(ResType));
Res.SavetoFile(ResNewName);
Res.Free;
end;
Проблемма в том, что извлекает он файл через TResourceStream, который требует подключённого модуля classes и из за этого вес программы доходит чуть не до 100 килобайт.
Подскажите плз как сделать рабочий код без использования classess чтобы программа мало весила. |
|
|