Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
09.03.2007, 15:44
|
|||
|---|---|---|---|
|
|||
!! ВОПРОС |
|||
|
#18+
В Init формы пишу следующее: ThisForm.AddObject("Cmd1", "CommandButton") ThisForm.Cmd1.Caption="BUTTON" ThisForm.Cmd1.top=0 ThisForm.Cmd1.Left=450 ThisForm.Cmd1.Height=25 ThisForm.Cmd1.width=101 ThisForm.Cmd1.visible=.T. ThisForm.Cmd1.click _______________________________________ Вопрос? А где описывать теперь процедуру , например такую PROCEDURE click ??CHR(7) ENDPROC Имею ввиду - куда это вставлять Спасибо ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
09.03.2007, 15:46
|
|||
|---|---|---|---|
|
|||
!! ВОПРОС |
|||
|
#18+
Так не получится. Нужно создать класс кнопки, куда вставить в метод click нужное действие, а в addobject("cmd1","mycommandbutton") ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
09.03.2007, 15:50
|
|||
|---|---|---|---|
|
|||
!! ВОПРОС |
|||
|
#18+
так делать не нужно вфп - он визуальный. создайте новый проект на вкладке лайбрарис сделайте новую библиотеку там необходимо будет создать на основе базовых классов свои и описать свойства и методы пример только так как я с данными не работайте - это просто пример как классы с классами дружат, как поднимаются вообще нужно найти ветку, где я рассказывал по этапам как это делается ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
09.03.2007, 15:56
|
|||
|---|---|---|---|
|
|||
!! ВОПРОС |
|||
|
#18+
xxAlexx Имею ввиду - куда это вставлять Вставьте ее себе... в ухо... (с) А если серьезно, то надо различать процедуры-члены класса (=методы класса) и просто процедуры. Процедуру в том виде, в котором Вы ее описали, можно поместить в отдельный процедурный/программный файл (prg-файл). Если Вы имели в виду метод Click для кнопки конпки Cmd1, то необходимо в редакторе кода формы выбрать в левом ComboBox'е кнопку Cmd1, а в правом ComboBox'е метод Click и в основном окне написать команду ?? chr(7).... Затем сохраняем файлы, запускаем программу на исполнение и наслаждаемся полученным эффектом... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=41&mobile=1&tid=1589766]: |
0ms |
get settings: |
9ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
24ms |
get topic data: |
7ms |
get forum data: |
2ms |
get page messages: |
26ms |
get tp. blocked users: |
1ms |
| others: | 235ms |
| total: | 325ms |
| 0 / 0 |
