Переключение на Главную Страницу Страницы: 1 ОтправитьПечать
Горячая тема (более 10 ответов) Кто подскажет по ВК ? (число прочтений - 4541 )
PVR
God Member
*****
Отсутствует



Сообщений: 622
Зарегистрирован: 19. Ноября 2007
Пол: Мужской
Кто подскажет по ВК ?
03. Июля 2008 :: 15:14
Печать  
ВК на Delphi.
Для сохранения настроек ВК надо получить
в Init ИмяПользователя и ИмяБД ???
  
Наверх
 
IP записан
 
PVR
God Member
*****
Отсутствует



Сообщений: 622
Зарегистрирован: 19. Ноября 2007
Пол: Мужской
Re:  Кто подскажет по ВК ?
Ответ #1 - 03. Июля 2008 :: 17:02
Печать  
Пока через Ж...:

Код
Выбрать все
  Init := E_FAIL;
  //Получим путь настроек пользователя
  Reg   := TRegistry.Create;
  Reg.RootKey   := HKEY_CURRENT_USER;
  if not Reg.OpenKey('Software\1C\1Cv7\7.7\Defaults', False) then exit;
  StrBD:= Reg.ReadString('LastTitle');
  Reg.CloseKey;
  if not Reg.OpenKey('Software\1C\1Cv7\7.7\'+StrBD+'\StartUp', False) then exit;
  StrName:= Reg.ReadString('UserName');
  Reg.CloseKey;
  StrNastr:='Name Component\\'+StrBD+'\\'+StrName;
  
  iProfile.RegisterProfileAs(StrNastr); 


Работает, но могут возникнуть проблемы если пользователи один за другим входят Печаль
  
Наверх
 
IP записан
 
PVR
God Member
*****
Отсутствует



Сообщений: 622
Зарегистрирован: 19. Ноября 2007
Пол: Мужской
Re:  Кто подскажет по ВК ?
Ответ #2 - 03. Июля 2008 :: 17:12
Печать  
Может кто сможет на ASM этот код:

Код
Выбрать все
bstr_t(((CApp7*)AfxGetApp())->GetProps()->GetStringProp(0x0C)); // имя текущей ИБ в списке баз 



и

Код
Выбрать все
bstr_t(((CApp7*)AfxGetApp())->GetProps()->GetStringProp(0x0D)); // имя текущего пользователя 



Печаль
  
Наверх
 
IP записан
 
Chieftain
Senior Member
****
Отсутствует


___

Сообщений: 498
Местоположение: Тула
Зарегистрирован: 15. Февраля 2007
Пол: Мужской
Re:  Кто подскажет по ВК ?
Ответ #3 - 03. Июля 2008 :: 19:31
Печать  
PVR писал(а) 03. Июля 2008 :: 15:14:
ВК на Delphi.
Для сохранения настроек ВК надо получить
в Init ИмяПользователя и ИмяБД ???

А для чего такая принципиальность делать это в Init?
  
Наверх
ICQ  
IP записан
 
АЛьФ
FormEx developer
1c++ developer
Отсутствует



Сообщений: 1538
Местоположение: Санкт-Петербург
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re:  Кто подскажет по ВК ?
Ответ #4 - 03. Июля 2008 :: 19:36
Печать  
Достаточно прочно забыл уже и Дельфи, и штатную технологию создания ВК, но мне кажется, что копать надо в направлении вызова функция КаталогИБ() и ИмяПользователя() через диспатч. Или я чего не так понимаю?
  

FormEx developer
Наверх
www  
IP записан
 
PVR
God Member
*****
Отсутствует



Сообщений: 622
Зарегистрирован: 19. Ноября 2007
Пол: Мужской
Re:  Кто подскажет по ВК ?
Ответ #5 - 03. Июля 2008 :: 19:39
Печать  
Цитата:
Достаточно прочно забыл уже и Дельфи, и штатную технологию создания ВК, но мне кажется, что копать надо в направлении вызова функция КаталогИБ() и ИмяПользователя() через диспатч. Или я чего не так понимаю?

Они доступны по AppDispath только после Init.
ВК Начинает работать сразу после загрузки, без создатьОбъект!
  
Наверх
 
IP записан
 
PVR
God Member
*****
Отсутствует



Сообщений: 622
Зарегистрирован: 19. Ноября 2007
Пол: Мужской
Re:  Кто подскажет по ВК ?
Ответ #6 - 03. Июля 2008 :: 19:41
Печать  
Chieftain писал(а) 03. Июля 2008 :: 19:31:
А для чего такая принципиальность делать это в Init?

Для тогоже что и в 1С++, настройки для каждого пользователя свои, а не 1 для всех баз  Печаль
  
Наверх
 
IP записан
 
PVR
God Member
*****
Отсутствует



Сообщений: 622
Зарегистрирован: 19. Ноября 2007
Пол: Мужской
Re:  Кто подскажет по ВК ?
Ответ #7 - 03. Июля 2008 :: 20:01
Печать  
Может есть функции в dll 1C, экспортируемые наружу?
  
Наверх
 
IP записан
 
artbear
1c++ developer
1c++ moderator
Отсутствует


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

Сообщений: 6303
Местоположение: Москва
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re:  Кто подскажет по ВК ?
Ответ #8 - 04. Июля 2008 :: 03:38
Печать  
Ну попробуй сделать асинхронную развязку Улыбка
Т.е. в конце Инит сохраняй Диспатч, запускай таймер, который сработает уже после выполнения Инит, и в событии Таймера уже нормально работай с Диспатч Улыбка
  

OpenConf developer :: http://openconf.1cpp.ru&&FormEx developer :: http://formex.dorex.ru&&1C++ active developer && tester :: www.1cpp.ru
Наверх
GTalkSkype/VoIPICQ  
IP записан
 
PVR
God Member
*****
Отсутствует



Сообщений: 622
Зарегистрирован: 19. Ноября 2007
Пол: Мужской
Re:  Кто подскажет по ВК ?
Ответ #9 - 04. Июля 2008 :: 06:05
Печать  
artbear писал(а) 04. Июля 2008 :: 03:38:
Ну попробуй сделать асинхронную развязку Улыбка
Т.е. в конце Инит сохраняй Диспатч, запускай таймер, который сработает уже после выполнения Инит, и в событии Таймера уже нормально работай с Диспатч Улыбка

Спасибо, я тоже уже об этом подумал  Улыбка
  
Наверх
 
IP записан
 
PVR
God Member
*****
Отсутствует



Сообщений: 622
Зарегистрирован: 19. Ноября 2007
Пол: Мужской
Re:  Кто подскажет по ВК ?
Ответ #10 - 04. Июля 2008 :: 09:42
Печать  
Рано  Очень довольный

При использовании потока может возникнуть колизия доступа 1С  Нерешительный

Переделал все по технологии (используя метод запуска)  Подмигивание
« Последняя редакция: 04. Июля 2008 :: 15:08 - PVR »  
Наверх
 
IP записан
 
artbear
1c++ developer
1c++ moderator
Отсутствует


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

Сообщений: 6303
Местоположение: Москва
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re:  Кто подскажет по ВК ?
Ответ #11 - 11. Июля 2008 :: 18:56
Печать  
Я тебе не говорил о другом потоке, а говорил об обычном таймере, который выполняется в том же потоке, после выполнения основного кода.
Не путай разные понятия Улыбка
  

OpenConf developer :: http://openconf.1cpp.ru&&FormEx developer :: http://formex.dorex.ru&&1C++ active developer && tester :: www.1cpp.ru
Наверх
GTalkSkype/VoIPICQ  
IP записан
 
PVR
God Member
*****
Отсутствует



Сообщений: 622
Зарегистрирован: 19. Ноября 2007
Пол: Мужской
Re:  Кто подскажет по ВК ?
Ответ #12 - 11. Июля 2008 :: 20:14
Печать  
artbear писал(а) 11. Июля 2008 :: 18:56:
Я тебе не говорил о другом потоке, а говорил об обычном таймере, который выполняется в том же потоке, после выполнения основного кода.
Не путай разные понятия Улыбка

Обясни в чем разница, если таймер срабатывает когда работает код 1С(в глобальном модуле или ещё где), все равно может возникнуть черте что  Озадачен
Или винда сможет отработать код таймера из ВК только при простое 1С?
  
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: 1
ОтправитьПечать