Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Изменение свойств окна, В чужой программе 
:(
    Опции темы
valex13
Дата 8.4.2005, 07:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 243
Регистрация: 29.1.2003
Где: Иркук. область, г . Иркутск

Репутация: 1
Всего: 1



Господа!
Я хочу изменить свойства окна. Окно запущено из чужого приложения. hWND окна я определяю по заголовку, а вот изменить стиль не удается, однако, если указать заголовок своего окна - то пожалуйста. Один и тот же код. В чем может быть причина?
Код

Declare Function apiGetWindowLong Lib "user32" Alias _
         "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As _
         Long) As Long
         
Declare Function apiSetWindowLong Lib "user32" Alias _
      "SetWindowLongA" (ByVal hwnd As Long, _
      ByVal nIndex As Long, ByVal dwNewLong As Long) As Long


         L = apiGetWindowLong(hWnds(r), GWL_STYLE)
         L = WS_CAPTION Or WS_CHILDWINDOW Or WS_VISIBLE Or WS_SYSMENU Or WS_THICKFRAME Or             WS_CLIPSIBLINGS Or WS_OVERLAPPED
         L = apiSetWindowLong(hWnds(r), GWL_STYLE, L)

PM MAIL ICQ   Вверх
Exception
Дата 10.4.2005, 12:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 4525
Регистрация: 26.12.2004

Репутация: 7
Всего: 186



Ты ему ставишь абсолютно новый стиль? Точно не знаю, может надо
Код

L= L or 'все твои стили

PM   Вверх
Exception
Дата 11.4.2005, 17:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 4525
Регистрация: 26.12.2004

Репутация: 7
Всего: 186



Что за hWnds®? Полный код в студию smile
PM   Вверх
~FoX~
Дата 12.4.2005, 09:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


НЕ рыжий!!!
****


Профиль
Группа: Участник Клуба
Сообщений: 2819
Регистрация: 8.10.2003
Где: Зеленоград

Репутация: 10
Всего: 68



Попробуй
Код

SendMessage(hWnds(r), GWL_STYLE, L)

Только параметры могут по другому передоваться, порверить не могу Format c: smile

Это сообщение отредактировал(а) ~FoX~ - 12.4.2005, 09:14


--------------------
user posted image
…множественность никогда не следует полагать без необходимости…
PM MAIL WWW ICQ Jabber   Вверх
valex13
Дата 12.4.2005, 12:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 243
Регистрация: 29.1.2003
Где: Иркук. область, г . Иркутск

Репутация: 1
Всего: 1



Код

Static hWnds() As Integer


~FoX~ Я так пробовал

Код

         'L = L And Not (WS_MAXIMIZEBOX)
         'L = L And Not (WS_MINIMIZEBOX)
         Retval = SendMessage(hWnds(r), GWL_STYLE, L, 0)

Не выходит.

smile

Это сообщение отредактировал(а) valex13 - 12.4.2005, 12:51
PM MAIL ICQ   Вверх
valex13
Дата 12.4.2005, 13:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 243
Регистрация: 29.1.2003
Где: Иркук. область, г . Иркутск

Репутация: 1
Всего: 1



Но самое что удивительное. Если из приложения создать дочернее окно и попробовать изменить ее свойства, то меняется!
PM MAIL ICQ   Вверх
Exception
Дата 12.4.2005, 15:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 4525
Регистрация: 26.12.2004

Репутация: 7
Всего: 186



Может некоторые стили только для дочерних окон?
PM   Вверх
valex13
Дата 13.4.2005, 07:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 243
Регистрация: 29.1.2003
Где: Иркук. область, г . Иркутск

Репутация: 1
Всего: 1



А я пытаюсь изменить стиль дочернего окна , чужой программы.
PM MAIL ICQ   Вверх
~FoX~
Дата 13.4.2005, 08:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


НЕ рыжий!!!
****


Профиль
Группа: Участник Клуба
Сообщений: 2819
Регистрация: 8.10.2003
Где: Зеленоград

Репутация: 10
Всего: 68



valex13
А что за программа (которую меняешь) и что за форма?


--------------------
user posted image
…множественность никогда не следует полагать без необходимости…
PM MAIL WWW ICQ Jabber   Вверх
Exception
Дата 14.4.2005, 17:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 4525
Регистрация: 26.12.2004

Репутация: 7
Всего: 186



Может оно такого класса, для кот. один из твоих стилей не существует?
PM   Вверх
valex13
Дата 15.4.2005, 06:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 243
Регистрация: 29.1.2003
Где: Иркук. область, г . Иркутск

Репутация: 1
Всего: 1



А я прежде чем менять посмотрел стили окна Spy++ утилитой. И создал свое дочернее окно с такими же параметрами, а потом изменял сначало свое окно - изменилось. Потом окно другой программы. Нет. Не меняет. Более того. Я запустил две свои программы одновременно в каждой программе имеется дочернее окно. В одной из программе указал менять свойства. И именно в той программе, откуда я указывал изменилось дочернее окно, а должно было в обеих программах измениться. Может быть вообще не возможно изменить слиль окна чужо программы???
PM MAIL ICQ   Вверх
Exception
Дата 15.4.2005, 11:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 4525
Регистрация: 26.12.2004

Репутация: 7
Всего: 186



Цитата(valex13 @ 15.4.2005, 07:59)
Может быть вообще не возможно изменить слиль окна чужо программы???

возможно... ведь это окно принадлежит другому процессу...
PM   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »


 




[ Время генерации скрипта: 0.0552 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.