C++ Builder 将组件写入数据库，动态加载

C++ Builder`WriteComponentResFile`

```cpp
// 
void SaveFormToDatabase(TForm* Form, TDatabase* Database)
{
    // 
    TResourceStream* ResStream = new TResourceStream(HInstance, MAKEINTRESOURCE(101));

    try
    {
        // 
        Form->WriteComponentResFile(ResStream);

        // 
        TBlobField* BlobField = new TBlobField(NULL, ftBlob);
        BlobField->LoadFromStream(ResStream);
        Database->TableDefs->Add('FRME', BlobField);
    }
    __finally