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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Не блокируется кнопка 
:(
    Опции темы
Linzer
Дата 10.10.2010, 09:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



По клику на кнопку блокируются (Enabled) две другие, и почему то одна блокируется, а вторая нет. А когда нажимаешь еще раз на кнопку, которая блокирует, то та которая не блочилась блокируется... В чем может быть косяк?
PM MAIL   Вверх
Akina
Дата 10.10.2010, 10:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

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



Цитата(Linzer @  10.10.2010,  10:30 Найти цитируемый пост)
В чем может быть косяк? 

В коде.
Код - в студию.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
iff
Дата 10.10.2010, 11:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Администратор
**


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

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



Код

Private Sub Command1_Click()
Command2.Enabled = False
Command3.Enabled = False
End Sub



--------------------
DOS... Синей пеленой экран заполнил чистый DOS 
Мышь... Стала вдруг квадратной, потеряла форму мышь... 
Я разбил окно, девяностопятое мастдайное окно, 
И поставил DOS, и тогда увидел: Это счастье, — вот оно.  
PM MAIL WWW   Вверх
Linzer
Дата 11.10.2010, 07:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Цитата(iff @ 10.10.2010,  11:32)
Код

Private Sub Command1_Click()
Command2.Enabled = False
Command3.Enabled = False
End Sub

именно так и написано, но одну блокирует сразу, а вторую со 2го раза
PM MAIL   Вверх
Akina
Дата 11.10.2010, 07:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

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



Linzer, Вам уже русским языком было сказано - код (а лучше проект - само собой всё лишнее из него удалить) в студию. 
Или шагайте на форум телепатов.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Linzer
Дата 11.10.2010, 21:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Код

Private Sub Command3_Click()
Load Form8
Form8.Show
Command1.Enabled = False
Command2.Enabled = False
Command3.Enabled = False
If Command1.Caption = "Îòîáðàòü" Then
    Command1.Caption = "Ïîèñê"
End If
ListView1.ListItems.Clear
obnovlenie
Text1.Text = ""
Combo1.Clear
updating_combo
End Sub

PM MAIL   Вверх
Akina
Дата 12.10.2010, 07:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

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



Итак Command3 блокируется только после второго нажатия?
1) Выполните всё то же, но в режиме трассировки, установив брейк на строке 4. Смотрите возникающие при этом вызовы и переходы.
2) Найдите по коду все прямые и косвенные присвоения Command3.Enabled = True, в т.ч. из таймерных процедур, модулей других форм, общих модулей и пр. Трассируйте, поставив на них брейки.
3) Поставьте условный брейк на изменение значения и смотрите, где происходит включение.
4) Отключите по одной вызов процедур (строки 11 и 14) и проверьте, что проблема не исчезает.
5) Что есть Form8? Влияет ли она на состояние контролов текущей формы? Исчезает ли проблема, если её открывать модально или не открывать вообще?


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Linzer
Дата 12.10.2010, 11:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Цитата(Akina @ 12.10.2010,  07:54)
Итак Command3 блокируется только после второго нажатия?
1) Выполните всё то же, но в режиме трассировки, установив брейк на строке 4. Смотрите возникающие при этом вызовы и переходы.
2) Найдите по коду все прямые и косвенные присвоения Command3.Enabled = True, в т.ч. из таймерных процедур, модулей других форм, общих модулей и пр. Трассируйте, поставив на них брейки.
3) Поставьте условный брейк на изменение значения и смотрите, где происходит включение.
4) Отключите по одной вызов процедур (строки 11 и 14) и проверьте, что проблема не исчезает.
5) Что есть Form8? Влияет ли она на состояние контролов текущей формы? Исчезает ли проблема, если её открывать модально или не открывать вообще?

Не блокируется command1. Пункты 4 и 5 не влияют, проверил. С остальным пока разбираюсь
PM MAIL   Вверх
Akina
Дата 12.10.2010, 11:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

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



Цитата(Linzer @  12.10.2010,  12:20 Найти цитируемый пост)
Не блокируется command1. 

Попробуйте переместить код изменения на ней надписи выше кода её блокирования. 
Хотя хрень это, конечно.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

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


Новичок



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

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



Цитата(Akina @ 12.10.2010,  11:23)
Цитата(Linzer @  12.10.2010,  12:20 Найти цитируемый пост)
Не блокируется command1. 

Попробуйте переместить код изменения на ней надписи выше кода её блокирования. 
Хотя хрень это, конечно.

Спасибо. Разобрался.
А с чем быстрее работать с коллекцией или с файлом? я так полагаю с коллекцией, да?
PM MAIL   Вверх
Akina
Дата 12.10.2010, 16:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

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



С коллекцией быстрее - она лежит в памяти и не требует обращения к диску.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

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


Новичок



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

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



Цитата(Akina @ 12.10.2010,  16:01)
С коллекцией быстрее - она лежит в памяти и не требует обращения к диску.

Спасибо Akina! smile 
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

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

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

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

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


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

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


 




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


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

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