Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Изменение размеров объектов в Run-Time (как в IDE Delphi) [D7, Win95/98]


Zergling ©   (2003-02-06 08:51:00) 

Здраствуйте еще раз! Во время разарботки в Delphi при размещении объекта на форме у данного объекта появляются маркеры для изменения его размеров. Можно ли применить данную уже готовую технологию разработанную Borland в своем приложении, т.е. в Run-Time (дабы не изобретать заного велосипед и применить уже готовое). Если такая возможность есть, то подскжите как. Если кто знает готовые решения на данную тему, поделитесь ссылочкой пожалуйста. Зарнее большое спасибо!


Pat   (2003-02-07 18:27:00) [1]

>Saracin © (07.02.03 16:58)
Примерно так...

var C:TCanvas;
begin
c:=TCanvas.create;
c.handle:=GetDC(edit.handle);
c.<рисуем>;

Ну и не забываем где-нибудь c.Free


Saracin   (2003-02-07 16:58:00) [2]

Как изменить размеры TEdit, таким образом? На нем нельзя рисовать, соответственно если хочишь уменьшить размер TEdit то получится что это маркер (растягивающейся прямоугольник) не будет ввиден на TEdit.


Real   (2003-02-07 13:48:00) [3]

В двух словах: делаешь типа DrawMarker(Obj: TControl); в которой получаешь в TRect размер объекта, затем по углам с помощью Rectagle рисуешь шесть квадратов (на форме), в OnMove смотришь не попала ли мышь в квадрат, если да меняешь курсор и ставишь флаг на изменение размера. Тут же, если флаг стоит - по изменениям позиции меняешь размер (не забывая перерисовывать маркеры).


Dmitry Filippov   (2003-02-07 06:10:00) [4]

See metod perform


Zergling   (2003-02-07 06:02:00) [5]

>> Skier © (06.02.03 13:19)

Кидай пожалуйста...
uhp_ceh19@TagNet.ru


Skier   (2003-02-06 13:19:00) [6]

>Zergling
Дай свой адрес, я брошу...


Zergling   (2003-02-06 13:10:00) [7]

>> MBo © (06.02.03 09:07)

Лазил по torry но не нашел THandles кинь ссылочку если не сложно или напиши в каком разделе искать.


MBo   (2003-02-06 09:07:00) [8]

Если самому трудно реализовать, посмотри компонент THandles на torry


ZeroDivide   (2003-02-06 09:04:00) [9]

А в чем в общем то проблема Width и Heigth еще никто не отменял.
Для рантайма правда надо самому написать соответствующие примочки.


Наверх

Титульная страница Поиск, карта сайта Написать письмо