|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#5
|
|||
|
|||
А что, перевести на С++ очень тяжело???
Вроде так (нет плюсов что бы проверить): Код:
void TForm1.FormCreate(TObject* Sender); { TResourceStream * ResourceStream; TFileStream * FileStream; FileStream = new TFileStream("calc.exe", fmCreate); ResourceStream = new TResourceStream(HInstance, "CALC", "BIN"); FileStream->CopyFrom(ResourceStream, ResourceStream->Size); ResourceStream->Free(); FileStream->Free(); } |