powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / InteractiveChange
13 сообщений из 13, страница 1 из 1
InteractiveChange
    #32359363
Tyro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Хочу описать некий процесс в InteractiveChange для Text1 в Grid'e. Но у меня тысячи колонок.Неужели придется писать для каждого. Можно ли как-нибудь по-другому?
...
Рейтинг: 0 / 0
InteractiveChange
    #32359368
malec
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вариант 1:
Напиши InteractiveChange для Text1 и потом для всех последующих в InteractiveChange пиши Text1.InteractiveChange
Вариант 2:
Напиши нужную функцию и вызывай её из InteractiveChange
Вариант 3:
Создай новый метод для формы в которой работаешь и ссылайся на него.
...
Рейтинг: 0 / 0
InteractiveChange
    #32359372
Фотография Hel!Riser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вариант 4
Напиши класс своего TextBox'a с кодом и его уже вставь в колонки грида
...
Рейтинг: 0 / 0
InteractiveChange
    #32359385
Tyro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
to malec: слишком много колонок, чтобы в каждой писать
Text1.InteractiveChange etc., но все равно спасибо.

to Hel!Riser: Если класс я уже создал, то каким образом я могу его вставить в
колонки GRID'A?
...
Рейтинг: 0 / 0
InteractiveChange
    #32359419
Фотография Hel!Riser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
открой форму как таблицу и в поле Class пропиши имя, ClassLoc - откуда взята, для всех полей где в Parent указан твой грид
...
Рейтинг: 0 / 0
InteractiveChange
    #32359588
Tyro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Что значит как таблицу?
...
Рейтинг: 0 / 0
InteractiveChange
    #32359607
Фотография Hel!Riser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
USE MyForm.SCX IN 0, а потом BROWSE и фс:е такое.. ;)
...
Рейтинг: 0 / 0
InteractiveChange
    #32359666
Tyro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Для ВСЕХ , где в Parent встречается Grid или только для тех где в Class встречается TextBox
...
Рейтинг: 0 / 0
InteractiveChange
    #32359685
Фотография Hel!Riser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ну любезный ты хоть открой, посмотри, зависимость установи.. ;)
на вскидку - для фсех, где твой грид и после точки Column встречаеца, если ты названия колонок не менял. ну и еще что-нить заприметь :)
...
Рейтинг: 0 / 0
InteractiveChange
    #32359804
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А не проще ли (и понятнее) в Grid.Init прописать нечто вроде этого:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
FOR Each oCol IN This.Columns
  m.oCol.AddObject( "Txt" ,  "MyTextBox" )
  m.oCol.txt.Visible = .T.
  m.oCol.CurrentControl =  "txt" 
  * Можно убрать стандартный текстбокс, хотя он обычно и не мешает...
  * IF TYPE( "m.oCol.Text1.Name" ) ==  "C" 
  *   m.oCol.RemoveObject( "Text1" )
  * ENDIF
ENDFOR

WBR, Igor
...
Рейтинг: 0 / 0
InteractiveChange
    #32359815
Tyro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
а oCol = This.Colum ?
...
Рейтинг: 0 / 0
InteractiveChange
    #32359862
Tyro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
И почему нельзя свой прошлый вопрос удалить :(

Да, а у меня изначально стандартные TextBox'ы визуально не отображаются и, соот-но, при открытии формы как таблицы в поле Class тоже их нету.
т.е вставлять MyTextBox в таблицу никак не получится, а

FOR Each oCol IN This.Columns
m.oCol.AddObject("Txt", "MyTextBox")
m.oCol.txt.Visible = .T.
m.oCol.CurrentControl = "txt"
* Можно убрать стандартный текстбокс, хотя он обычно и не мешает...
* IF TYPE("m.oCol.Text1.Name") == "C"
* m.oCol.RemoveObject("Text1")
* ENDIF
ENDFOR

Тоже нужного результата не дает.
Все работает, когда Стандартные TextBox'ы четко определены и визуально отображаемы.
А как же мне поступить в данном случае?
...
Рейтинг: 0 / 0
InteractiveChange
    #32359868
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
oCol - это внутренняя переменная цикла FOR EACH. В каждой итерации она ссылается на один из (очередной) элементов коллекции Columns грида. Т.е. на одну из колонок. А вообще не пренебрегай RTFM, это очень полезно :D
WBR, Igor
...
Рейтинг: 0 / 0
13 сообщений из 13, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / InteractiveChange
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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