(UTC)
  1С++ users forum › 1С++ и прочие расширения v7 › 1С++, TurboMD и прочие вкусности › Вот бы на ПанельИнструментов формы добавить кнопок
(Группа Модераторов: 1c++ moderator)
‹ Предыдущая Тема | Следующая Тема ›
Переключение на Главную Страницу Страницы: [1] 2  ОтправитьПечать
Горячая тема (более 10 ответов) Вот бы на ПанельИнструментов формы добавить кнопок (число прочтений - 12055 )
dnp
Senior Member
****
Отсутствует


.

Сообщений: 479
Зарегистрирован: 26. Мая 2006
Пол: Мужской
Вот бы на ПанельИнструментов формы добавить кнопок
12. Июня 2006 :: 03:08
Печать  
А то столько места пропадает  Улыбка
  
Наверх
ICQ  
IP записан
 
jbond
Full Member
***
Отсутствует


1С++ Programmer

Сообщений: 140
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Вот бы на ПанельИнструментов формы добавить кн
Ответ #1 - 13. Июня 2006 :: 06:22
Печать  
Куда? Если форму - то скрыть стандартную панель и добавить ActiveX тулбар
  
Наверх
 
IP записан
 
artbear
1c++ developer
1c++ moderator
Отсутствует


Эх, дайте что-нибудь новенькое
да полезное потести

Сообщений: 6303
Местоположение: Москва
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Вот бы на ПанельИнструментов формы добавить кн
Ответ #2 - 13. Июня 2006 :: 06:56
Печать  
А пример подобного решения можешь выложить?
типа тестовой конфы Улыбка
  
OpenConf developer :: http://openconf.1cpp.ru&&FormEx developer :: http://formex.dorex.ru&&1C++ active developer && tester :: www.1cpp.ru
Наверх
GTalkSkype/VoIPICQ  
IP записан
 
jbond
Full Member
***
Отсутствует


1С++ Programmer

Сообщений: 140
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Вот бы на ПанельИнструментов формы добавить кн
Ответ #3 - 13. Июня 2006 :: 10:41
Печать  
     Атр = гРФорма.ПолучитьАтрибут("Тулбар");
     Атр.Видимость = 0;
     
     m_ptr = СоздатьОбъект("АктивИкс");
     m_ptr.УстановитьАтрибут(Форма, "Тулбар");
     m_ptr.СоздатьЭУ("MSComctlLib.Toolbar.2");
     гТулбар = m_ptr.Объект;
     
     гТулбар.Style = 1;
     гТулбар.BorderStyle = 0;
     гТулбар.Appearance = 0;
     гТулбар.AllowCustomize = 1;
     btnOpen = гТулбар.Buttons.Add(1,"","Открыть",0);
     btnOpen.ToolTipText = "Открыть данные из базы";
     btnSave = гТулбар.Buttons.Add(2,"","Сохранить",0);
     btnSave.ToolTipText = "Сохранить данные в базе";
     btnImport = гТулбар.Buttons.Add(3,"","Импорт",0);
     btnImport.ToolTipText = "Импорт данных из текстового файла";
     btnExport = гТулбар.Buttons.Add(4,"","Экспорт",0);
     btnExport.ToolTipText = "Экспорт данных в текстовый файл";
     btnPrint = гТулбар.Buttons.Add(5,"","Печать",0);
     btnPrint.ToolTipText = "Вывод печатной формы с данными";
     btnHelp = гТулбар.Buttons.Add(6,"","Помощь",0);
     btnHelp.ToolTipText = "Вывод справки по работе с обработкой";
     btnClose = гТулбар.Buttons.Add(7,"","Закрыть",0);
     
     гРФорма.ПослеОткрытия();
     Атр.Видимость = 1
  
Наверх
 
IP записан
 
Arta
1c++ power user
Отсутствует



Сообщений: 2537
Местоположение: Нижний Новгород
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Вот бы на ПанельИнструментов формы добавить кн
Ответ #4 - 13. Июня 2006 :: 10:49
Печать  
У меня этот ocx не работает как надо. Мучился месяц - плюнул. Почему то не прорисовываются кнопки, пока в них не ткнешь...
Не сталкивался?
  
Наверх
 
IP записан
 
jbond
Full Member
***
Отсутствует


1С++ Programmer

Сообщений: 140
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Вот бы на ПанельИнструментов формы добавить кн
Ответ #5 - 13. Июня 2006 :: 11:20
Печать  
Версия 6.0 SP6.
Сначала невидимым сделать.
Создать и заполнить кнопки.
А уж потом видимым.
Это особенности отображения на 1С-вской форме.

Зы Теперь еще иконки на тулбар сунуть.
  
Наверх
 
IP записан
 
Arta
1c++ power user
Отсутствует



Сообщений: 2537
Местоположение: Нижний Новгород
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Вот бы на ПанельИнструментов формы добавить кн
Ответ #6 - 13. Июня 2006 :: 16:37
Печать  
Хоть тресни - надписи и картинки на кнопке появляются (вернее сама кнопка прорисовывается) только при наведении на нее мышкой. До этого - голая форма.

Видимость убираю/ставлю - не помогает.


Замечу - ни с одним OCX у меня почти проблем не было. А чего только уже не стоит Улыбка

У меня стоит такой:

MSComctlLib.Toolbar.2
ProgID:      MSComctlLib.Toolbar.2
Version:      2.0
CLSID:      {66833FE6-8583-11D1-B16A-00C0F0283628}
TypeLib Name:      Microsoft Windows Common Controls 6.0 (SP6)
TypeLib:      {831FDD16-0C5C-11D2-A9FC-0000F8754DA1}
File Location:      C:\WINDOWS\system32\MSCOMCTL.OCX
Status:      File Exists
File Size:      1071088 Bytes
Created:      04/15/05 19:58:16
Last Modified:      04/15/05 19:58:16
Accessed:      04/15/05
File Description:      Windows Common Controls ActiveX Control DLL
Company Name:      Microsoft Corporation
File Version:      6.01.9786
Internal Name:      MSCOMCTL
Legal Copyright:      Copyright © 1987-2000 Microsoft Corp.
Original Filename:      MSCOMCTL.OCX
Product Name:      MSCOMCTL
Product Version:      6.01.9786



P.S. А гРФорма.ПослеОткрытия() это уже относится к привязке, я правильно понял?
  
Наверх
 
IP записан
 
jbond
Full Member
***
Отсутствует


1С++ Programmer

Сообщений: 140
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Вот бы на ПанельИнструментов формы добавить кн
Ответ #7 - 14. Июня 2006 :: 04:39
Печать  
Да. Правильно.
У меня тоже была проблема с прорисовкой.
Решил управлением видимостью.
Код в предопределенной процедуре ПослеОткрытия.
Установлена привязка:

// Предопределенная процедура
//
Процедура ПриОткрытии()      
     гРФорма = СоздатьОбъект("Общие.Форма.Привязка");
     гРФорма.Привязка("ТаблПоле","H","Форма","W","Форма");
     гРФорма.Привязка("Тулбар",,,"W","Форма")
КонецПроцедуры // ПослеОткрытия()
  
Наверх
 
IP записан
 
Z1
God Member
*****
Отсутствует


I Love YaBB 2!

Сообщений: 2906
Местоположение: Москва
Зарегистрирован: 26. Мая 2006
Пол: Мужской
Re: Вот бы на ПанельИнструментов формы добавить кн
Ответ #8 - 14. Июня 2006 :: 04:43
Печать  
(jbond) А может выложите md с одной работающей формой со своей Панелью.
А то шаг влешо шаг вправо и уже не работает.
  
Наверх
 
IP записан
 
jbond
Full Member
***
Отсутствует


1С++ Programmer

Сообщений: 140
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Вот бы на ПанельИнструментов формы добавить кн
Ответ #9 - 14. Июня 2006 :: 05:33
Печать  
Выкладываю как есть - отрываю от собственной конфигурации.
Некоторые вещи могут не работать, т.к. обработка пока не находится в эксплуатации (люди пока вносят данные в таблицы Моксель).
  
TablPole.zip ( 22 KB | Загрузки )
Наверх
 
IP записан
 
steban
1c++ developer
Отсутствует


#define sizeof(x) rand()

Сообщений: 787
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Вот бы на ПанельИнструментов формы добавить кн
Ответ #10 - 14. Июня 2006 :: 06:20
Печать  
Исправил баг с отрисовкой контрола при изменении размера.
Будет в ночной сборке от 15.06.06
  
int getRandomNumber()&&{&&  return 4; //chosen by fair dice roll&&         //guaranteed to be random&&}
Наверх
 
IP записан
 
Arta
1c++ power user
Отсутствует



Сообщений: 2537
Местоположение: Нижний Новгород
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Вот бы на ПанельИнструментов формы добавить кн
Ответ #11 - 14. Июня 2006 :: 06:21
Печать  
Уря!  Улыбка
  
Наверх
 
IP записан
 
dnp
Senior Member
****
Отсутствует


.

Сообщений: 479
Зарегистрирован: 26. Мая 2006
Пол: Мужской
Re: Вот бы на ПанельИнструментов формы добавить кн
Ответ #12 - 15. Июня 2006 :: 01:44
Печать  
а у меня тулбар вообще молчит (объект-носитель на форме никак не меняется), хотя объекты создаваемые в ПослеОткрытия() вполне себе правильные:
Сообщить(...) дает соответственно
АтрибутФормы
АктивИкс
OLE.IToolbar
OLE.IButton
---------
файл C:\WINDOWS\system32\MSCOMCTL.OCX, 1'077'336 байт
версия 6.01.9545
April 25, 2002
Система
WinXP pro, Версия 2002, SP2

1С++ 2.0.2.2

Виндовоз крутить?
  
Наверх
ICQ  
IP записан
 
steban
1c++ developer
Отсутствует


#define sizeof(x) rand()

Сообщений: 787
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Вот бы на ПанельИнструментов формы добавить кн
Ответ #13 - 15. Июня 2006 :: 07:27
Печать  
dnp писал(а) 15. Июня 2006 :: 01:44:
Виндовоз крутить?

Скачать ночную сборку здесь.
Или вежливо попросить fez'а пересобрать 2.0.2.2 (или собрать 2.0.2.3) с учетом багфиксов.
  
int getRandomNumber()&&{&&  return 4; //chosen by fair dice roll&&         //guaranteed to be random&&}
Наверх
 
IP записан
 
dnp
Senior Member
****
Отсутствует


.

Сообщений: 479
Зарегистрирован: 26. Мая 2006
Пол: Мужской
Re: Вот бы на ПанельИнструментов формы добавить кн
Ответ #14 - 16. Июня 2006 :: 16:36
Печать  
steban писал(а) 15. Июня 2006 :: 07:27:
Скачать ночную сборку здесь.
Или вежливо попросить fez'а...

Скачал ночную 2006-06-16, не помогло.
Кто в курсе - чья вообще эта активикса-то? Чтобы по новее поставить, может поможет.
И еще - может я не умею искать в инете, но нормальную доку на неё найти не смог, у кого нибудь есть ссылка или файло?
  
Наверх
ICQ  
IP записан
 
Переключение на Главную Страницу Страницы: [1] 2 
ОтправитьПечать
‹ Предыдущая Тема | Следующая Тема ›
 
  « Главная ‹ Раздел Вверх  



Valid RSS Valid XHTML Valid CSS Powered by Perl Source Forge