Как воссоздать форму?

← →
гончий (2002-09-20 11:46) [0]

Я запихнул dfm-ку в виде байтового массива в exe-файл, есть адрес этого массива, как теперь из него создать форму?

← →
qube © (2002-09-20 11:54) [1]

попробуй запихнуть байтовый массив в поток, потом создаешь форму методом CreateNew и читаешь из потока ReadComponent

← →
гончий (2002-09-20 11:55) [2]

Хорошая идея сейчас попробую!

← →
Кот Бегемот © (2002-09-20 11:56) [3]

Посмотри Help > TCustomForm.CreateNew()

← →
гончий (2002-09-20 11:58) [4]

А как поток ассоциировать с моим массивом, через Memory?

← →
qube © (2002-09-20 12:05) [5]

TCustomMemoryStream.SetPointer
procedure SetPointer(Ptr: Pointer; Size: Longint);

никогда не пробовал, но, похоже, это оно.

← →
гончий (2002-09-20 12:06) [6]

CreateNew - не то...То но не совсем, тут меня интересует как в поток запихнуть мой массив, неужели все методом Write? Да и беда в том что я не знаю размер этого массива!

← →
ЮЮ © (2002-09-20 12:07) [7]

А не прощё в Uses прописать? И dfm-ка сама прилинкуется, и создать можно одним Create?

← →
гончий (2002-09-20 12:10) [8]

Это очень просто! про такое я бы и не спрашивал, но тут ситуация, что нужно именно так!

← →
qube © (2002-09-20 12:13) [9]

Как это не знаешь размер массива? High и Low не пробовал?

← →
Anatoly Podgoretsky © (2002-09-20 12:19) [10]

еще и SizeOf существует

← →
гончий (2002-09-20 12:19) [11]

Это asm - всавка!

← →
гончий (2002-09-20 12:22) [12]

Это простой кусок данных в процедуре:

procedure SaveDfm;
asm
DW 1456
DW 15
...
end;

адрес данных:
buffer := @SaveDfm;

любишь сложности? :)

← →
гончий (2002-09-20 12:29) [14]

люблю их создавать для других (догадываетесь я о ком?)

> люблю их создавать для других (догадываетесь я о ком?)

о пользователях? :)

← →
гончий (2002-09-20 12:34) [16]

Это не для пользователей, это для Робин Гудов :)))

Как воссоздать форму? Найти похожие ветки