Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Потеря ActiveControl'а.... / 11 сообщений из 11, страница 1 из 1
17.07.2008, 09:31
    #35435623
bodrox
bodrox
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Потеря ActiveControl'а....
Есть класс VCX. Тама объект - TextBox+CommandButton. На пустую форму кидаю этот объект. В его Valid делаю проверку. В методе юзается Thisform.ActiveControl. Но там пусто :(. Если положить просто TextBox - то усё окей - Thisform.ActiveControl - не пуст.
WTF?
--------------
Новичок в VFOX
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.07.2008, 10:02
    #35435705
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Потеря ActiveControl'а....
bodrox... На пустую форму кидаю этот объект. В его Valid делаю проверку. В методе юзается Thisform.ActiveControl....
А This чем не устроил? вместо Thisform.ActiveControl
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.07.2008, 10:15
    #35435751
12345вышелзайчикпогулять
12345вышелзайчикпогулять
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Потеря ActiveControl'а....
в методе объекта
св-ва себя-же смотрят
через this


если необходимо по каким-то причинам
опред-ть текущий активный контрол, то поступают так
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
local loControl
try
    loControl= thisform.ActiveControl
catch
endtry	
if vartype(loControl)='O'
   .....
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.07.2008, 10:29
    #35435815
XAndy
XAndy
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Потеря ActiveControl'а....
Код: plaintext
type("thisform.ActiveControl")<>"O" and !isnull(thisform.ActiveControl)

но в методе самого класса конечно this надо пользовать, как Дима указал
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.07.2008, 10:30
    #35435819
XAndy
XAndy
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Потеря ActiveControl'а....
Сорри, <> поменять на == конечно :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.07.2008, 11:04
    #35435955
bodrox
bodrox
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Потеря ActiveControl'а....
Юзаю Ballon tooltip из класса CTL32. Чтобы показать балун на объекте, требуется ActiveControl. Иначе он выводится около курсора мыши или на форме в левом верхнем углу.
This не помогло. Балуну нужно ActiveControl....
Будем искать.
--------------
Новичок в VFOX
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.07.2008, 11:05
    #35435959
bodrox
bodrox
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Потеря ActiveControl'а....
Да, если что http://www.ctl32.com.ar/
--------------
Новичок в VFOX
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.07.2008, 11:13
    #35435996
12345вышелзайчикпогулять
12345вышелзайчикпогулять
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Потеря ActiveControl'а....
авторБалуну нужно ActiveControl

если Вы ищите контрол из метода класса-балуна,
то да

если звать метод балуна из самого контрола,
то в метод балуна можно заслать ссылку на контрол


покажите минимальный пример Вашего реш-я
сделайте форму + необх.дидл-ки - и положите сюда пример
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.07.2008, 11:14
    #35435999
проходящий.
проходящий.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Потеря ActiveControl'а....
This можно и параметром передеать.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.07.2008, 11:18
    #35436018
bodrox
bodrox
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Потеря ActiveControl'а....
проходящий.This можно и параметром передеать.- bodroxThis не помогло.передавал параметром.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.07.2008, 11:24
    #35436039
12345вышелзайчикпогулять
12345вышелзайчикпогулять
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Потеря ActiveControl'а....
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
PUBLIC oform1

oform1=createobject("form1")
oform1.Show
RETURN

DEFINE CLASS form1 AS form

	Caption = "Form1"
	Name = "Form1"

	ADD OBJECT command1 AS cmd WITH ;
		Top =  108 , ;
		Left =  132 , ;
		Height =  27 , ;
		Width =  84 , ;
		Caption = "Command1", ;
		Name = "Command1"

ENDDEFINE

DEFINE CLASS cmd AS commandbutton

	procedure click
		ttttt(this, thisform)

enddefine


procedure ttttt
lparameters toControl, toForm
toControl.Caption = 'ffvt4v'
toForm.Backcolor =  455555


твой баллун по принципам программирования, передачи ссылок и приему параметров
ничем не отличается от этого примера

авторThis не помогло.

клади сюда пример - будем посмотреть
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Потеря ActiveControl'а.... / 11 сообщений из 11, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 399ms
Закрыть
start [/forum/topic.php?fid=41&mobile=1&tid=1587520]:
 0ms
get settings:
 9ms
get forum list:
 17ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 34ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 56ms
get tp. blocked users:
 2ms
others: 264ms
total:  399ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]