:: Visual Foxpro, Foxpro for DOS
перебор объектов на форме
Пашок

Сообщений: 706
Дата регистрации: 14.11.2001
Как можно обойти все кнопки на форме ?




------------------
Ratings: 0 negative/0 positive
Re: перебор объектов на форме
Aries

Сообщений: 4349
Откуда: Николаев
Дата регистрации: 24.12.2002
А поточнее?




------------------
Я бы переписал жизнь, но Бог не дает мне исходники (с)
==============================
Злостный линуксоид!
Ratings: 0 negative/0 positive
Re: перебор объектов на форме
Penner

Сообщений: 4102
Откуда: Muenster
Дата регистрации: 26.04.2002
thisform.controls
Ratings: 0 negative/0 positive
Re: перебор объектов на форме
Пашок

Сообщений: 706
Дата регистрации: 14.11.2001
FOR EACH oButton IN ThisForm.Controls
WAIT window oButton.name
NEXT obutton


Как указать ему только кнопки, а не все объекты ?




------------------
Ratings: 0 negative/0 positive
Re: перебор объектов на форме
Aries

Сообщений: 4349
Откуда: Николаев
Дата регистрации: 24.12.2002
FOR lnI=1 TO ALEN(THIS.Controls,1)
IF THIS.Controls(lnI).BaseClass=="CommandButton"
выполняем код
endIF
endFOR




------------------
Я бы переписал жизнь, но Бог не дает мне исходники (с)
==============================
Злостный линуксоид!
Ratings: 0 negative/0 positive
Re: перебор объектов на форме
Penner

Сообщений: 4102
Откуда: Muenster
Дата регистрации: 26.04.2002
ALEN(THIS.Controls,1) заменяем на THIS.ControlCount
Ratings: 0 negative/0 positive
Re: перебор объектов на форме
apodkorytov

Сообщений: 155
Откуда: Тюмень
Дата регистрации: 01.01.2005
А что
ThisForm.SetAll(...)
Не подходит
Ratings: 0 negative/0 positive
Re: перебор объектов на форме
Aries

Сообщений: 4349
Откуда: Николаев
Дата регистрации: 24.12.2002
SetAll устанавливает значение свойства.
А из вопроса неясно что надо конкретно.
Может ему метод вызвать надо, тода SetAll не катит




------------------
Я бы переписал жизнь, но Бог не дает мне исходники (с)
==============================
Злостный линуксоид!
Ratings: 0 negative/0 positive
Re: перебор объектов на форме
Пашок

Сообщений: 706
Дата регистрации: 14.11.2001
Нужно метод, все получилось, спасибо.




------------------
Ratings: 0 negative/0 positive
Re: перебор объектов на форме
Igor Korolyov
Автор

Сообщений: 34580
Дата регистрации: 28.05.2002
Hi Aries!

Катит. Ещё как катит - MyProp_Assign - и вперёд
Но можно конечно и перебором - для облегчения оного существует FFC класс SetAllX - ну и его расширение в "решениях"




------------------
WBR, Igor
Ratings: 0 negative/0 positive


Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 32 (Гостей: 32)

© 2000-2024 Fox Club 
Яндекс.Метрика