| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > C++ Builder > Как всавить панель с кнопками в Builder/Visual C++ |
| Автор: Cyril 2.10.2007, 01:02 |
| Всем мужам великоинтеллектуальным-программерам - радоваться! 1. Какие у вас мысли, господа, по поводу: как вставить панельку с кнопочками в редактор Delphi/Builder/Visual C++? Может через OLE, может как-то можно через API или какие-нибудь еще средства? Дело в том, что с применением того же Builder есть возможость вставить панель только в майкросовтовские Word, WordPad, Excel, даже Paint, используя TOleContainer (точнее, выражаясь с позиции OLE: вставить объект (Word, Paint) в OleContainer). Для этого есть несколько вариантов: 1) Через диалоговое окно (вызов которого описан ниже) выбираем нужный файл, для которого загружается обрабатывающая его программа: //--------------------------------------------------------------------- AnsiString FName; void __fastcall TForm1::MOpenClick(TObject *Sender) { if (OpenDialog1->Execute()) { OleContainer1->LoadFromFile(OpenDialog1->FName); FName = OpenDialog1->FileName; OleContainer1->DoVerb(ovShow); // отображает окно } } //--------------------------------------------------------------------- Но при выборе в диалоговом окне файла, скажем, того же .СРР, соответствующая программа (Builder/Visual C++) не будет загружена (а при выборе, например, .BMP - запускается Paint, а в нем панелька). 2) Через диалоговое окно (вызов которого описан ниже) "Вставка объекта": //--------------------------------------------------------------------- AnsiString FName; void __fastcall TForm1::MNewClick(TObject *Sender) { if (OleContainer1->InsertObjectDialog()) { OleContainer1->DoVerb(ovShow); FName = OpenDialog1->FileName; OleContainer1->DoVerb(ovShow); // отображает окно } } //--------------------------------------------------------------------- Но, в списке объектов данного окна присутствуют только майкросовтовские объекты Word, Paint и т.п. Эх, если бы можно было как-то в список этого окошка запихнуть Builder/Visual C++... 3) Прямой вызов объекта (т.е. проги) через имя класса создаваемого объекта: OleContainer1->CreateObject("Excel.sheet", false); //загружается лист Excel OleContainer1->DoVerb(ovShow); или OleContainer1->CreateObject("Word.Document", false); // загружается документ Word OleContainer1->DoVerb(ovShow); OleContainer1->CreateObject("?.?"); OleContainer1->DoVerb(ovShow); А какое же имя класса у нашего Delphi/Builder/Visual C++? 2. И еще важно было бы знать как с другого приложения вставить данные в редактор того же активного окна Delphi/Builder/Visual C++? Наверное, как-нибудь через API? Вот такие вопросы стоят на повестке дня, господа. Какие у вас замечания/предложения? |