Конференция VBStreets

**Unstat** » 24.10.2004 (Вс) 18:35

У меня есть вопросик. У меня на форме есть кнопка, если я на нее нажимаю она выделяется квадратиками(ну как в VB) и как мне сделать так чтоб когда я тянул за квадратики кнопка меняла размеры?

**GSerg** » 24.10.2004 (Вс) 19:43

Для начала, как ты сделал квадратики?

**Unstat** » 24.10.2004 (Вс) 20:09

Это 8 имэджов объединеные в массив от 0 до 7.

**GSerg** » 24.10.2004 (Вс) 20:12

Ну дык и обрабатывай mousemove по этим квадратикам...

**Unstat** » 24.10.2004 (Вс) 21:59

Вот как раз это то и не получается

**Andrew Sherd** » 25.10.2004 (Пн) 2:53

Попробуй для начала поместить в свой-во ToolTip какой-нить индентификатор (0 1 2 3, например), который будет обозначать квадратики с разных сторон кнопки 0 - для верха, 2 - для низа и т.д.
Потом смени свойство MousePointer на "Size N S" и обрабатывай событие имэйджа imgMove_MouseDown(...), изменяя прапорционально cmdExit.Top и cmdExit.Height кнопки. Чтобы ширилась только вверх и вниз, также поступаем и с "Левом-Правом"

Общий принцип прост: определись какие параметры кнопки меняются и правь их в соответствии с разницой в координатах мыши

**SHURUP** » 25.10.2004 (Пн) 12:39

Andrew Sherd писал(а):Попробуй для начала поместить в свой-во ToolTip какой-нить индентификатор (0 1 2 3, например), который будет обозначать квадратики с разных сторон кнопки 0 - для верха, 2 - для низа и т.д.

Всегда думал, что для єтих целей служит свойство tag :wink:

**SHURUP** » 25.10.2004 (Пн) 12:57

Вот токо-что наткнулся на статейку, там тоже маркеры обсуждаются хотя и для векторного редактора!
http://www.vbstreets.ru/VB/Articles/65536.aspx

**Unstat** » 25.10.2004 (Пн) 19:58

Я вот сделал ресайз для правого нижнего, нижнего центрального и правого центрального маркера, а вот с остальными у меня проблемы...запутался я...можт ченибудь подскажити

**SHURUP** » 25.10.2004 (Пн) 22:26

Код: Выделить всё: ' marker(0) - верхний левый Маркер ' marker(1) - нижний правый Маркер ' Command1 - кнопка, какую мы ресайзим Command1.Top = marker(0).Top + marker(0).Height Command1.Left = marker(0).Left + marker(0).Width Command1.Width = marker(1).Left - marker(0).Left - marker(0).Width Command1.Height = marker(1).Top - marker(0).Top - marker(0).Height

**Andrew Sherd** » 25.10.2004 (Пн) 22:45

Сорри, конечно протупил :oops:

Конечно Tag.

**Unstat** » 27.10.2004 (Ср) 8:48

Что то он не ресайЗит?

**Andrew Sherd** » 27.10.2004 (Ср) 9:02

А ты в какое событие это запихал???

**Oxygen** » 27.10.2004 (Ср) 9:09

Кинь код, посмотрим. Там вроде ничего сложного нет.

**Unstat** » 27.10.2004 (Ср) 9:27

Все маркеры объеденины в масив от 0 до 8 ( 0- верхний левый маркер). При зажатии левой кнопки мыши на маркеры я делую специально отведеную переменную md равной True. Потом в MouseMove если эта переменная True я прибавляю Width и Height . Как я говорил у меня получились только три маркера левый центральный, нижний центральный и нижний левый. Я остаюсь в догадках как сделать остальные. Для верхнего центрального при MouseMove изменять нужно Top и width в такой пропорции чтобы нижняя грань оставалась на месте вот увы у меня это и не получается.

**Oxygen** » 27.10.2004 (Ср) 10:03

Странно. Там на самом деле нет ничего сложного. Для верхнего центрального нужно изменять Top и Height на одинаковое количество единиц. Если используешь на форме пиксели, то и на кнопке используй их, а проще юзай твипы. Для правого центрального нужно менять только Width. Я бы кинула пример, но на работе нет VB.

**Unstat** » 27.10.2004 (Ср) 22:26

Ну я везде твипы использую. И я пишу какойто левый код что уменя все время ни так. А алгоритм то я понял какой.

**Oxygen** » 28.10.2004 (Чт) 19:39

Ну, ты сам код кинь, мы посмотрим, потестим. Если что не так, исправим.

**Unstat** » 28.10.2004 (Чт) 22:21

Я просто прошу помочь написать мне код для верхнего центрального и левого центрального маркера. У меня ни как не получается.

Конференция VBStreets

РесайЗ

РесайЗ

Кто сейчас на конференции