VPF::визуальный редактор - Форум программистов

mntek

Дата 15.8.2004, 02:53 (ссылка)

(нет голосов)

Загрузка ...

freakin_brain

Профиль
Группа: Участник
Сообщений: 57
Регистрация: 15.8.2004
Где: saint-petersburg

Репутация: нет
Всего: 1

hi all!

ни у кого нет примера визуального редактора - как в дельфи - чтобы можно было добавлять\убирать контролы, таскать их по форме в runtime? или хотя бы идей по поводу его реализации. в частности как большому числу компонентов назначить одну процедуру, в которой выбор етого компонента осуществляется по названию?

Viruser

Дата 15.8.2004, 21:49 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 4.8.2004
Где: Ukraine, Melitopo l

Репутация: нет
Всего: нет

Ну что бы например создать кнопку (API) можно написать

Код

BtnHandle:=CreateWindow('BUTTON','Button1',WS_CHILD or WS_VISIBLE,0,0,100,100 Handle,0,HInstance,nil);

Потом можно отлавливать сообщения посылаемые этой кнопке. Например:

Код

[b]while[/b] GetMessage(Msg) [b]do begin[/b]
[i](*Твой onClick*)[/i]
[b]end;[/b]

Чтобы тягать кнопку по форме в runtime, можно:

Код

GetCursorPos(p);
x1:=p.x-(form1.left+button1.left);
p.x:=p.x-x1;
y1:=p.y-(form1.top+button1.top);
p.y:=p.y-y1;
[b]while[/b] GetMessage(msg2) [b]do begin[/b]
[b]if[/b] msg2.Message = WM_MOUSEMOVE [b]then[/b]
[b]begin[/b]
     button1.left:=p.x;
     button1.top:=p.y;
[b]end;[/b]
[b]end;[/b]

Дерзай!

mntek_

Дата 16.8.2004, 13:53 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

а изменять ее размеры?

)

Medved

Дата 18.8.2004, 09:52 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 7209
Регистрация: 15.9.2002
Где: Kazakhstan, Astan a

Репутация: 14
Всего: 154

Посмотри исходники FastReport. Там все это реализовано... и не только это.

--------------------

http://extreme.sport-express.ru/
...и неважно сколько падал, важно сколько ты вставал...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »