S>void AssignWin(TApplication* app, TWinControl* owner, TFrame** frame)
S>{
S>        // Здесь пропущено сохранение ?старого? указателя Application для 
S>последующего восстановления при выгрузке dll
S>        Application=app;
S>        (*frame)=new MyFrameClass(owner);
S>        (*frame)->Parent=owner;
S>}
S>