var
targetX: single;
begin
targetX:=Self.ClientWidth - 200;
if (panel5.Position.X=targetX) then begin
FloatAnimation1.StartValue:= targetX;
FloatAnimation1.StopValue:= 0;
end
else
begin
FloatAnimation1.StartValue:= 0;
FloatAnimation1.StopValue:= targetX;
end;
FloatAnimation1.Start;
end;
Который отлично работает, и отодвигает позицию панели, а под панелью находится Listbox. т.е. своего рода создаю меню для приложения. Но проблема в том, что не могу адаптировать этот код для жестов. Чтобы позицию панели менялась согласно координатам положения пальца на экране. Если кто сталкивался, подскажите, как это реализовать? Спасибо.
Вопрос
zekelive
Доброй ночи товарищи!) Имеется такое код:
Который отлично работает, и отодвигает позицию панели, а под панелью находится Listbox. т.е. своего рода создаю меню для приложения. Но проблема в том, что не могу адаптировать этот код для жестов. Чтобы позицию панели менялась согласно координатам положения пальца на экране. Если кто сталкивался, подскажите, как это реализовать? Спасибо.
Ссылка на комментарий
9 ответов на этот вопрос
Рекомендуемые сообщения
Присоединяйтесь к обсуждению
Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.