Создание метода программно | |
---|---|
YuriWhite Автор Сообщений: 558 Откуда: Челябинск Дата регистрации: 02.09.2000 |
Вот subj надо сделать - никогда не сталкивался с этим.
Возможно ли это и как. Спасибо. |
RE: Создание метода программно | |
---|---|
Игорь Ильин |
Вроде бы только через создание класса
Сначала define class MyClass as ... ... procedure MyProc *** твой метод *** ... endproc enddefine А потом oObjectWithMyMethod=createobject('MyClass') P.S. А тебе оно надо? ;) Может, проще обойтись обычной процедурой? |
RE: Создание метода программно | |
---|---|
Sergey Titow Сообщений: 2242 Дата регистрации: 12.09.2000 |
Прямого решения не нашел, а кривое выглядит примерно так:
define class Curve_solution as custom procedure Curve_Proc lpara pname, p1, p2, p3, p4..... if file(pname + ".prg") return eval(pname + "(p1, p2, p3, p4.....)") else return .NULL. endif endproc enddefine Затем программно создается файл и его имя отсылается параметром |
RE: Создание метода программно | |
---|---|
Sergey Titow Сообщений: 2242 Дата регистрации: 12.09.2000 |
Еще появилась мысль: если oObjectWithMyMethod из ответа Игоря Ильина сделать не просто переменной, а свойством объекта? Т.е работать примерно так:
obj.oObjectWithMyMethod = .NULL. set proc to Меняем описание класса set proc to [файл_с_классом] obj.oObjectWithMyMethod = createobject('MyClass') ?obj.oObjectWithMyMethod.MyProc() |
© 2000-2024 Fox Club  |