/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Delphi

Выпуск № 1130
от 25.04.2008, 05:05

Вопрос № 132.925

Здравствуйте, уважаемые эксперты. Вот мой вопрос: Допустим, я создал новую форму, расположил на ней кнопку. Как показать на форме веб-страницу, а по нажатии на кнопку показать другую веб-страницу? (допустим, веб-страницы лежат в одной папке с проектом) Извиняюсь, если пояснил непонятно. Если что, то поправьте меня, или уточните. Заранее большое спасибо. Георгий.

Отправлен: 19.04.2008, 07:43 Вопрос задал: Чечин Георгий Александрович (статус: 3-ий класс) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 6)

Отвечает: Raptor3 Здравствуйте, Чечин Георгий Александрович! Для отображение веб страницы можно взять компонент TWebBrowser со вкладки Internet - одно из основных его свойств - Navigate . на onShow формы м onClick кнопки повесить WebBrowser1.Navigate('primer1.htm'); --------- Программист - это человек который решает проблему, о которой вы не знаете, способом который вы не понимаете

Ответ отправил: Raptor3 (статус: 7-ой класс) Ответ отправлен: 19.04.2008, 08:18 Оценка за ответ: 5 Комментарий оценки: Спасибо большое. Попробую. Вы пожалуйста завтра загляните в мини-форум. Может быть у меня еще появятся вопросы по этом поводу.

Вопрос № 132.947

Уважаемые эксперты, помогите чайнику. Если не сложно, объясните порядок установки компонентов DevExpress в BDS 2006.

Отправлен: 19.04.2008, 11:35 Вопрос задал: Рубцов Петр иванович (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Raptor3 Здравствуйте, Рубцов Петр иванович! Долго тоже парился с установкой девов на делфи - в конце концов выбрал такой алгоритм - там куча папок - начинаю ставить с одной папки - ругается на какой то модуль - ищу этот модуль в других папках - в которой нахожу - начинаю его ставить и т.п. Муторно конечно - но действенно --------- Программист - это человек который решает проблему, о которой вы не знаете, способом который вы не понимаете

Ответ отправил: Raptor3 (статус: 7-ой класс) Ответ отправлен: 19.04.2008, 14:41

Отвечает: Selya Здравствуйте, Рубцов Петр иванович! Пропишите пути к папкам с компонентами в "Library path" и "Browsing path": Tools->Options->Enviroment Options->Delphi Options->Library-Win32 Примерное содержимое в прил.1, только смотрите внимательно, какие компоненты у вас есть. Далее я создал группы проектов: 01ExpressQuantumGrid6&TreeList4.bdsgroup 02ExpressBars6&NavBar.bdsgroup 03ExpressVerticalGrid.bdsgroup (см. прил.2) Затем последовательно открывайте каждую Project Group и в Project Manager'е на самом первом bpl-проекте в группе щёлкайте правой кнопкой->Compile All From Here. Если пути прописаны правильно, то все проекты скопилируются без ошибок. Затем щёлкаете правой кнопкой на всех проектах, которые называются dclcx*.bpl->Install Приложение: Приложение 1 Library path: $(BDS)DevExpressXP Theme ManagerSources;$(BDS)DevExpressExpressCommon LibrarySources;$(BDS)DevExpressExpressLibrarySources;$(BDS)DevExpressExpressLibraryPackages;$(BDS)DevExpressExpressBars 6Sources;$(BDS)DevExpressExpressBars 6Packages;$(BDS)DevExpressExpressGDI+ LibrarySources;$(BDS)DevExpressExpressNavBarSources;$(BDS)DevExpressExpressDataControllerSources;$(BDS)DevExpressExpressEditors Library 5Sources;$(BDS)DevExpressExpressExport LibrarySources;$(BDS)DevExpressExpressExport LibraryPackages;$(BDS)DevExpressExpressPageControl 2Sources;$(BDS)DevExpressExpressQuantumGrid 6Sources;$(BDS)DevExpressExpressQuantumTreeList 4Sources;$(BDS)DevExpressExpressVerticalGridSources Browsing path: $(BDS)DevExpressXP Theme ManagerSources;$(BDS)DevExpressExpressCommon LibrarySources;$(BDS)DevExpressExpressLibrarySources;$(BDS)DevExpressExpressBars 6Sources;$(BDS)DevExpressExpressGDI+ LibrarySources;$(BDS)DevExpressExpressNavBarSources;$(BDS)DevExpressExpressDataControllerSources;$(BDS)DevExpressExpressEditors Library 5Sources;$(BDS)DevExpressExpressExport LibrarySources;$(BDS)DevExpressExpressExport LibraryPackages;$(BDS)DevExpressExpressPageControl 2Sources;$(BDS)DevExpressExpressQuantumGrid 6Sources;$(BDS)DevExpressExpressQuantumTreeList 4Sources;$(BDS)DevExpressExpressVerticalGridSources 01ExpressQuantumGrid6&TreeList4.bdsgroup <?xml version="1.0" encoding="utf-8"?> <BorlandProject> <PersonalityInfo> <Option> <Option Name="Personality">Default.Personality</Option> <Option Name="ProjectType"></Option> <Option Name="Version">1.0</Option> <Option Name="GUID">{27A1ACFE-396D-4CAB-B0D7-7936DF791DE7}</Option> </Option> </PersonalityInfo> <Default.Personality> <Projects> <Projects Name="dxThemeD10.bpl">XP Theme ManagerPackagesdxThemeD10.bdsproj</Projects> <Projects Name="dxGDIPlusD10.bpl">ExpressGDI+ LibraryPackagesdxGDIPlusD10.bdsproj</Projects> <Projects Name="cxDataD10.bpl">ExpressDataControllerPackagescxDataD10.bdsproj</Projects> <Projects Name="cxADOAdaptersD10.bpl">ExpressDataControllerPackagescxADOAdaptersD10.bdsproj</Projects> <Projects Name="cxBDEAdaptersD10.bpl">ExpressDataControllerPackagescxBDEAdaptersD10.bdsproj</Projects> <Projects Name="cxIBXAdaptersD10.bpl">ExpressDataControllerPackagescxIBXAdaptersD10.bdsproj</Projects> <Projects Name="cxLibraryD10.bpl">ExpressLibraryPackagescxLibraryD10.bdsproj</Projects> <Projects Name="dclcxLibraryD10.bpl">ExpressLibraryPackagesdclcxLibraryD10.bdsproj</Projects> <Projects Name="cxEditorsD10.bpl">ExpressEditors Library 5PackagescxEditorsD10.bdsproj</Projects> <Projects Name="dclcxEditorsD10.bpl">ExpressEditors Library 5PackagesdclcxEditorsD10.bdsproj</Projects> <Projects Name="cxExtEditorsD10.bpl">ExpressEditors Library 5PackagescxExtEditorsD10.bdsproj</Projects> <Projects Name="dclcxExtEditorsD10.bpl">ExpressEditors Library 5PackagesdclcxExtEditorsD10.bdsproj</Projects> <Projects Name="cxExportD10.bpl">ExpressExport LibraryPackagescxExportD10.bdsproj</Projects> <Projects Name="cxPageControlD10.bpl">ExpressPageControl 2PackagescxPageControlD10.bdsproj</Projects> <Projects Name="dclcxPageControlD10.bpl">ExpressPageControl 2PackagesdclcxPageControlD10.bdsproj</Projects> <Projects Name="cxGridD10.bpl">ExpressQuantumGrid 6PackagescxGridD10.bdsproj</Projects> <Projects Name="dclcxGridD10.bpl">ExpressQuantumGrid 6PackagesdclcxGridD10.bdsproj</Projects> <Projects Name="cxTreeListD10.bpl">ExpressQuantumTreeList 4PackagescxTreeListD10.bdsproj</Projects> <Projects Name="dclcxTreeListD10.bpl">ExpressQuantumTreeList 4PackagesdclcxTreeListD10.bdsproj</Projects> <Projects Name="Targets">dxThemeD10.bpl dxGDIPlusD10.bpl cxDataD10.bpl cxADOAdaptersD10.bpl cxBDEAdaptersD10.bpl cxIBXAdaptersD10.bpl cxLibraryD10.bpl dclcxLibraryD10.bpl cxEditorsD10.bpl dclcxEditorsD10.bpl cxExtEditorsD10.bpl dclcxExtEditorsD10.bpl cxExportD10.bpl cxPageControlD10.bpl dclcxPageControlD10.bpl cxGridD10.bpl dclcxGridD10.bpl cxTreeListD10.bpl dclcxTreeListD10.bpl</Projects> </Projects> <Dependencies/> </Default.Personality> </BorlandProject> 02ExpressBars6&NavBar.bdsgroup <?xml version="1.0" encoding="utf-8"?> <BorlandProject> <PersonalityInfo> <Option> <Option Name="Personality">Default.Personality</Option> <Option Name="ProjectType"></Option> <Option Name="Version">1.0</Option> <Option Name="GUID">{55ACF561-4E21-480C-8FCE-89FE8704FBFC}</Option> </Option> </PersonalityInfo> <Default.Personality> <Projects> <Projects Name="dxComnD10.bpl">ExpressCommon LibraryPackagesdxComnD10.bdsproj</Projects> <Projects Name="dxBarD10.bpl">ExpressBars 6PackagesdxBarD10.bdsproj</Projects> <Projects Name="dcldxBarD10.bpl">ExpressBars 6PackagesdcldxBarD10.bdsproj</Projects> <Projects Name="cxBarEditItemD10.bpl">ExpressBars 6PackagescxBarEditItemD10.bdsproj</Projects> <Projects Name="dclcxBarEditItemD10.bpl">ExpressBars 6PackagesdclcxBarEditItemD10.bdsproj</Projects> <Projects Name="dxBarDBNavD10.bpl">ExpressBars 6PackagesdxBarDBNavD10.bdsproj</Projects> <Projects Name="dcldxBarDBNavD10.bpl">ExpressBars 6PackagesdcldxBarDBNavD10.bdsproj</Projects> <Projects Name="dxBarExtItemsD10.bpl">ExpressBars 6PackagesdxBarExtItemsD10.bdsproj</Projects> <Projects Name="dcldxBarExtItemsD10.bpl">ExpressBars 6PackagesdcldxBarExtItemsD10.bdsproj</Projects> <Projects Name="dxBarExtDBItemsD10.bpl">ExpressBars 6PackagesdxBarExtDBItemsD10.bdsproj</Projects> <Projects Name="dcldxBarExtDBItemsD10.bpl">ExpressBars 6PackagesdcldxBarExtDBItemsD10.bdsproj</Projects> <Projects Name="dxRibbonD10.bpl">ExpressBars 6PackagesdxRibbonD10.bdsproj</Projects> <Projects Name="dcldxRibbonD10.bpl">ExpressBars 6PackagesdcldxRibbonD10.bdsproj</Projects> <Projects Name="dxDockingD10.bpl">ExpressBars 6PackagesdxDockingD10.bdsproj</Projects> <Projects Name="dcldxDockingD10.bpl">ExpressBars 6PackagesdcldxDockingD10.bdsproj</Projects> <Projects Name="dxSBD10.bpl">ExpressBars 6PackagesdxSBD10.bdsproj</Projects> <Projects Name="dcldxSBD10.bpl">ExpressBars 6PackagesdcldxSBD10.bdsproj</Projects> <Projects Name="dxNavBarD10.bpl">ExpressNavBarPackagesdxNavBarD10.bdsproj</Projects> <Projects Name="dcldxNavBarD10.bpl">ExpressNavBarPackagesdcldxNavBarD10.bdsproj</Projects> <Projects Name="Targets">dxComnD10.bpl dxBarD10.bpl dcldxBarD10.bpl cxBarEditItemD10.bpl dclcxBarEditItemD10.bpl dxBarDBNavD10.bpl dcldxBarDBNavD10.bpl dxBarExtItemsD10.bpl dcldxBarExtItemsD10.bpl dxBarExtDBItemsD10.bpl dcldxBarExtDBItemsD10.bpl dxRibbonD10.bpl dcldxRibbonD10.bpl dxDockingD10.bpl dcldxDockingD10.bpl dxSBD10.bpl dcldxSBD10.bpl dxNavBarD10.bpl dcldxNavBarD10.bpl</Projects> </Projects> <Dependencies/> </Default.Personality> </BorlandProject> 03ExpressVerticalGrid.bdsgroup <?xml version="1.0" encoding="utf-8"?> <BorlandProject> <PersonalityInfo> <Option> <Option Name="Personality">Default.Personality</Option> <Option Name="ProjectType"></Option> <Option Name="Version">1.0</Option> <Option Name="GUID">{13FEF64F-9003-49CD-A7C8-3BC7D8322779}</Option> </Option> </PersonalityInfo> <Default.Personality> <Projects> <Projects Name="cxVerticalGridD10.bpl">ExpressVerticalGridPackagescxVerticalGridD10.bdsproj</Projects> <Projects Name="dclcxVerticalGridD10.bpl">ExpressVerticalGridPackagesdclcxVerticalGridD10.bdsproj</Projects> <Projects Name="Targets">cxVerticalGridD10.bpl dclcxVerticalGridD10.bpl</Projects> </Projects> <Dependencies/> </Default.Personality> </BorlandProject>

Ответ отправил: Selya (статус: 10-ый класс) Ответ отправлен: 21.04.2008, 16:05

Вопрос № 133.047

Здраствуте ! Подскажите пожайлуста как зделать в ToolBar так что бы можно было добавлять большие иконки ? Или посоветуйте какойто другой компоннент с подобной ф-цией . Заранее спасибо !

Отправлен: 19.04.2008, 23:25 Вопрос задал: VaNuk (статус: 3-ий класс) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Louken Здравствуйте, VaNuk! Положите на форму TImageList, выставите Width и Height равными размерам Ваших иконок. Советую сначало преобразовать иконки в битмапы, т.к. TImageList может отказаться воспринимать иконки некоторых размеров. Двойным щелчком по TImageList откроется список картинок, там добавьте нужные картинки. Далее TToolBar'у присваиваем этот TImageList (свойство Images) и выставляем размеры для кнопок (свойства ButtonWidth и ButtonHeight) те же, что и у TImageList. Осталось добавить кнопок (правой кнопкой по TToolBar'у -> New Button) и выставить для них нужную картинку (свойство ImageIndex).

Ответ отправил: Louken (статус: Студент) Ответ отправлен: 20.04.2008, 19:26 Оценка за ответ: 5 Комментарий оценки: Спасибо большое помогло !

© 2001-2008, Портал RusFAQ.ru, Россия, Москва. Авторское право: ООО "Мастер-Эксперт Про" Техподдержка портала, тел.: +7 (926) 535-23-31 Хостинг: "Московский хостер" Поддержка: "Московский дизайнер" Авторские права | Реклама на портале ∙ Версия системы: 4.91 pre 5.0 RC1 от 13.04.2008
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru