![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Перетаскивание рисунка ;по форме при помощи мыши [D5, D6, Win95/98, Win2k]
KPY © (2002-10-21 07:53:00)какие события обрабатывать?
KSergey (2002-10-21 10:28:00) [1]посмотрите на королевстве статью "Жизнь и смерть в режиме run-time"
Qpwoe! (2002-10-21 08:02:00) [2]MouseMove, MouseDown и MouseUp
Смотри
var x:boolean;
procedure MouseDown;
begin
x:=true;
end;
procedure MouseUp
begin
x:=false;
end;
procedure MouseMove;
begin
with image1 do
begin
top:=x-height div 2;
left:=y -width div 2;
end;
end;
Заглавления процедур было в облом писать...