Поиск сообщества
Показаны результаты для тегов 'drag'.
Найдено: 3 результата
-
Здравствуйте! Если при перетаскивани контрола вывести мышь за пределы формы, то приложение и IDE зависает. Помогает только снять задачу в Диспетчере задач. После снятия задачи IDE начинает реагировать. Пробовал на разных проектах, в том числе и на экзампле с embarcadero. Подскажите, пожалуйста, что это и как с этим бороться? Эффект наблюдается если курсор перемещается за пределы формы и попадает на окно IDE из которого было запущено приложение.
-
Как сделать мозаику (drag/drop) ? Получается есть 2 прямоугольника (которые надо перетаскивать) и есть ещё 2 прямоугольника (которые должны принимать) и ещё есть кнопка проверки. При нажатии определяет правильно ли разместили прямоугольники.
-
Добрый день Помогите разобраться с перетаскиванием компонента, маленький простой пример как перемещать Button или Image по Panel или по любому другому компоненту. Нижеприведенный код работает для VCL, а вот как сделать тоже самое для FMX? procedure TForm1.FormDragOver(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean); begin if Source = Panel1 then Accept := True else Accept := False; end; procedure TForm1.FormDragDrop(Sender, Source: TObject; X, Y: Integer); begin Panel1.Left := X; Panel1.Top := Y; end;
