Хочу добавить, что проблема в том, что данный контрол должен перемещатся по форме с помощью мыши. Я это делаю с помощью функций SendMessage и ReleaseCapture, но вот св-ва Left и Top остаются неизменными, а мне надо ограничить передвижение контрола на форме.

Ответить

Хочу добавить, что проблема в том, что данный контрол должен перемещатся по форме с помощью мыши. Я это делаю с помощью функций SendMessage и ReleaseCapture, но вот св-ва Left и Top остаются неизменными, а мне надо ограничить передвижение контрола на форме.

Ответить

Хочу добавить, что проблема в том, что данный контрол должен перемещатся по форме с помощью мыши. Я это делаю с помощью функций SendMessage и ReleaseCapture, но вот св-ва Left и Top остаются неизменными, а мне надо ограничить передвижение контрола на форме.

Ответить

Хочу добавить, что проблема в том, что данный контрол должен перемещатся по форме с помощью мыши. Я это делаю с помощью функций SendMessage и ReleaseCapture, но вот св-ва Left и Top остаются неизменными, а мне надо ограничить передвижение контрола на форме.

Ответить

Хочу добавить, что проблема в том, что данный контрол должен перемещатся по форме с помощью мыши. Я это делаю с помощью функций SendMessage и ReleaseCapture, но вот св-ва Left и Top остаются неизменными, а мне надо ограничить передвижение контрола на форме.

Ответить

Хочу добавить, что проблема в том, что данный контрол должен перемещатся по форме с помощью мыши. Я это делаю с помощью функций SendMessage и ReleaseCapture, но вот св-ва Left и Top остаются неизменными, а мне надо ограничить передвижение контрола на форме.

Ответить

Хочу добавить, что проблема в том, что данный контрол должен перемещатся по форме с помощью мыши. Я это делаю с помощью функций SendMessage и ReleaseCapture, но вот св-ва Left и Top остаются неизменными, а мне надо ограничить передвижение контрола на форме.

Ответить

Хочу добавить, что проблема в том, что данный контрол должен перемещатся по форме с помощью мыши. Я это делаю с помощью функций SendMessage и ReleaseCapture, но вот св-ва Left и Top остаются неизменными, а мне надо ограничить передвижение контрола на форме.

Ответить

Хочу добавить, что проблема в том, что данный контрол должен перемещатся по форме с помощью мыши. Я это делаю с помощью функций SendMessage и ReleaseCapture, но вот св-ва Left и Top остаются неизменными, а мне надо ограничить передвижение контрола на форме.

Ответить

Хочу добавить, что проблема в том, что данный контрол должен перемещатся по форме с помощью мыши. Я это делаю с помощью функций SendMessage и ReleaseCapture, но вот св-ва Left и Top остаются неизменными, а мне надо ограничить передвижение контрола на форме.

Ответить

Короче события делаешь так:

В GENERAL объявляешь:

Event Click()
Event MouseOut()
Event MouseDown(Button As Integer, Shift As Integer, x As Single, Y As Single)
Event MouseMove(Button As Integer, Shift As Integer, x As Single, Y As Single)
Event MouseUp(Button As Integer, Shift As Integer, x As Single, Y As Single)

Потом в какой - нить процедуре пишешь:

RaiseEvent MouseDown(Button, Shift, x, Y), например и будет у твоего контрола MouseDown!

Если чё пиши, на сайт мой заходи...

Ответить