ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Создание метода
14 сообщений из 14, страница 1 из 1
Создание метода
    #33912910
Refox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Refox
Участник
Добрый день!
Подскажите, пожалуйста, как можно прописывать внутренность метода, например, AfterRowColChange ГРИДА не во время создания формы, а во время её выполнения

Заранее благодарю!
...
Рейтинг: 0 / 0
11.08.2006, 12:30
| Ответить | Цитировать | Написать  
Создание метода
    #33913050
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex11100
Гость
ну есть несколько подходов

1-й простой
execscript(lcCmd)
execscript(thisform.CmdOfGrdAfter...)

и начитываешь эту строку и он тупо всегда ее выполняет,но
это не есть хорошо

2-й
проще обернуть несколько раз класс
и написать хитрый метод
и в нем по-хитрому
переходить с пом. dodefault
и так
case this.Property = ...
...

3-й биндивент
...
Рейтинг: 0 / 0
11.08.2006, 13:05
| Ответить | Цитировать | Написать  
Создание метода
    #33913290
Проходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проходящий
Участник
Как все таки часто людям трудно хорошенько подумать и легче поискать способы модификации программы во время выполнения, то есть создать самомодифицируемую программу. Хотя бы подумали над тем, как потом такую программу отлаживать.
...
Рейтинг: 0 / 0
11.08.2006, 14:05
| Ответить | Цитировать | Написать  
Создание метода
    #33913300
Refox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Refox
Участник
А если:
есть объект формы poForm, в него добавляется Грид-объект oGrid
Как программно прописать у него внутренность метода AfterRowColChange

Приведите, пожалуйста, подробный пример
...
Рейтинг: 0 / 0
11.08.2006, 14:09
| Ответить | Цитировать | Написать  
Создание метода
    #33913351
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aleksey-K
Участник
Вам же ответили, что никак!!!
Создайте свой класс на основе GRID и пропишите в нем в событии AfterRowColChange свой код или вызовете в нем свой новый метод, который будете перегружать в объектах этого класса на этапе ДИЗАЙНА
Вы можете объяснить, зачем вам самомодифицирующий код?
С уважением, Алексей
...
Рейтинг: 0 / 0
11.08.2006, 14:23
| Ответить | Цитировать | Написать  
Создание метода
    #33913418
Refox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Refox
Участник
Aleksey-KВы можете объяснить, зачем вам самомодифицирующий код?
С уважением, Алексей

Я дописываю модули к комплексу, разработанного и написанного не мной
Требуется, чтобы сам комплекс был неизменённым, а в нём на основе класса создаётся форма и нужно в эту форму добавить закладку на которой будут грид и текстбох, чтобы при переходе в гриде с одной строчки на другую обновлялось поле текстбокс

Я все добавляю, могу указать свойства, а внутренность метод не могу, а нужно
...
Рейтинг: 0 / 0
11.08.2006, 14:39
| Ответить | Цитировать | Написать  
Создание метода
    #33913437
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aleksey-K
Участник
Для этого, как правило, достаточно в AfterRowColChange добавить THISFORM.Refresh()
С уважением, Алексей
...
Рейтинг: 0 / 0
11.08.2006, 14:46
| Ответить | Цитировать | Написать  
Создание метода
    #33913455
Refox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Refox
Участник
Aleksey-KДля этого, как правило, достаточно в AfterRowColChange добавить THISFORM.Refresh()
С уважением, Алексей
Вот и я же об этом, но так как закладка, поле и грид добавляются вручную, во время выполнения программы, нужно и код добавлять вручную. А как это сделать - внести в AfterRowColChange код THISFORM.Refresh()
...
Рейтинг: 0 / 0
11.08.2006, 14:49
| Ответить | Цитировать | Написать  
Создание метода
    #33913461
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aleksey-K
Участник
Так добавляете вручную GRID не базового класса, а своего
С уважением, Алексей
...
Рейтинг: 0 / 0
11.08.2006, 14:51
| Ответить | Цитировать | Написать  
Создание метода
    #33913509
Refox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Refox
Участник
Aleksey-KТак добавляете вручную GRID не базового класса, а своего
С уважением, Алексей

Я и сам так сначала думал, просто хотелось бы программно.
Но на нет и суда нет
Спасиб!
...
Рейтинг: 0 / 0
11.08.2006, 15:02
| Ответить | Цитировать | Написать  
Создание метода
    #33913616
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex11100
Гость
напиши в методе

Afterorcolchange грида

if file('c:\tt.tt')
local lcCmd
lcCmd=filetostr('c:\tt.tt')
execscript(lcCmd,thisform)
endif



создавай на диске файл
'c:\tt.tt'

lpara toForm
toForm.BackColor=0


запускай форму
пробуй дрыгаться по гриду
пробуй менять текст в 'c:\tt.tt'

вот также и с пропертями объектов чудить можно
...
Рейтинг: 0 / 0
11.08.2006, 15:29
| Ответить | Цитировать | Написать  
Создание метода
    #33915272
Kruchinin Pahan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kruchinin Pahan
Участник
Refox Aleksey-KТак добавляете вручную GRID не базового класса, а своего
С уважением, Алексей

Я и сам так сначала думал, просто хотелось бы программно.
Но на нет и суда нет
Спасиб!
Ну почему же совсем нет? Вам же предложили:
BINDEVENT(loGrdName, "AfterRowColChange", ThisForm, "MyWorkOnGrid")

Цепляешься на Event Grida и в методе формы отрабатываешь.
...
Рейтинг: 0 / 0
14.08.2006, 06:11
| Ответить | Цитировать | Написать  
Создание метода
    #33915356
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aleksey-K
Участник
Kruchinin Pahan Refox Aleksey-KТак добавляете вручную GRID не базового класса, а своего
С уважением, Алексей

Я и сам так сначала думал, просто хотелось бы программно.
Но на нет и суда нет
Спасиб!
Ну почему же совсем нет? Вам же предложили:
BINDEVENT(loGrdName, "AfterRowColChange", ThisForm, "MyWorkOnGrid")

Цепляешься на Event Grida и в методе формы отрабатываешь.
Ну и чем это отличается от перегрузки метода AfterRowColChange самого грида?
Код в метод THISFORM.MyWorkOnGrid вы как поместите в RUN-TIME?
С уважением, Алексей
...
Рейтинг: 0 / 0
14.08.2006, 08:22
| Ответить | Цитировать | Написать  
Создание метода
    #33915890
Kruchinin Pahan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kruchinin Pahan
Участник
Aleksey-K Kruchinin Pahan
Цепляешься на Event Grida и в методе формы отрабатываешь.
Ну и чем это отличается от перегрузки метода AfterRowColChange самого грида?
Код в метод THISFORM.MyWorkOnGrid вы как поместите в RUN-TIME?
С уважением, Алексей

Хмм... Я так понял из задачи, что необходимо только грид динамически бросать на форму. А от чего тогда зависит содержимое метода?

Aleksey-K
Я дописываю модули к комплексу, разработанного и написанного не мной
Требуется, чтобы сам комплекс был неизменённым, а в нём на основе класса создаётся форма и нужно в эту форму добавить закладку на которой будут грид и текстбох, чтобы при переходе в гриде с одной строчки на другую обновлялось поле текстбокс


LoForm.NewObject("GrdMain","Grid",...)
BINDEVENT(loForm.GrdMain, "AfterRowColChange", loForm, "Refresh")

Хмм... А так, плохо чтоли? Или создай класс на основе Custom, в котором ты повесишь обработчик событий формы и BIND на его методы те события, что тебе надо.
...
Рейтинг: 0 / 0
14.08.2006, 11:51
| Ответить | Цитировать | Написать  
14 сообщений из 14, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Создание метода
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&msg=33915356&tid=1590992]:
 0ms
get settings:
 7ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 131ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 32ms
get tp. blocked users:
 1ms
others: 211ms
total:  413ms
созд. / загр.: 413ms
x
x
Закрыть


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