Вверх ↑
Администрация
Ответов: 15295
Рейтинг: 1519
#1: 2008-06-11 10:39:00 ЛС | профиль | цитата
Galkov писал(а):
А подробности можно

как-то так наверно:

#hws
func init() // это выполняется вместо парсинга INI
if(_cur_compiler_ = "FPC")
error("This element can't support FPC compiler. Please install Delphi and try again")
return(0)
end

sys.addproperty('Name', data_string, '')
sys.addproperty('Caption', data_string, 'Label')
//.....
sys.addmethod('doTest', data_null)
sys.addevent('onTest', data_int)
//.....
end

func change(index, value) // при изменение св-ва в редакторе
switch(index)
case 0: // изменилось св-во Name
if(value = '')
return('Label')
end
end
return(value)
end

func comboClick(index) // перед вываливание выпадающего списка
// ...
end

func comand(cmdName) // выполнение команды контекстного меню списка св-тв
// ...
end
// и все такое прочее....

тип data_element можно бы было на 100% реализовать в одних скриптах, не залезая в среду
карма: 27
0