Перемещение окна мышью за поверхность формы
Автор: Aleksey 
Tweet
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
const SC_DRAGMOVE = $F012;
begin
ReleaseCapture;
Form1.Perform(WM_SYSCOMMAND, SC_DRAGMOVE, 0);
end;
Просмотров: 7994
|
2. Unnamed User
Ну если перемещать две формы одновременно, то надо сперва добавить обработчик перемещений для первой формы
... И в реализации этого метода написать procedure TForm1.OnFormMove(var Msg: TWMMove); |
Проститутки по адресу https://prostitutkinizhnegotagilawithin.net/ - воплощение страсти и сексуальности. | analniy-seks/passion.elitnye/.net - лучшие анальные удовольствия с эксклюзивными проститутками только на https://prostitutkisamarysoft.org/! | Не упускайте возможности испытать удовольствие с анальным сексом, доступном на https://prostitutkichitymix.info/. | Обращайтесь к профессионалам! Элитные проститутки с сайта https://prostitutkianapyhim.net/ поражают опытом и мастерством. | Анальный секс с проститутками Бийска доставит вам незабываемое удовольствие. | Анальные проститутки Иркутска - специалисты в анальном сексе, готовые исполнять ваши самые сокровенные желания. | Недорогие проститутки Брянска - доступное удовольствие для всех желающих. | Ищите проверенные проститутки? Заходите на https://prostitutkikrasnoyarskasex.org/proverennye/ и выбирайте из лучших девушек с отличной репутацией. | Анкеты проституток Дзержинска - для особого удовольствия!. | Ищете недорогие услуги? Дешевые проститутки Орла рады предложить вам свои интимные услуги по доступным ценам. | Проститутки индивидуалки Орла: здесь найдется выбор для каждого. | Чтобы получить самые проверенные проститутки, посетите https://prostitutkinaberezhnyechelnygid.net/. | У нас на https://prostitutkinovorossiyskagid.com/ только дешевые проститутки, которые будут удивительно наполнять ваш вечер. | https://prostitutkismolenskaact.net/ - Встречайтесь с элитными девушками, которые готовы исполнить ваши самые сокровенные желания. | Хотите ощутить экономическое удовольствие? Посетите https://prostitutkiabakanabid.net/ и найдите доступных проституток. | Элитные проститутки в Ульяновске предлагают высококачественные услуги. | Анальные проститутки Астрахани - безграничное удовольствие доступно в вашем распоряжении!. | Дешевые проститутки Владивостока - удовольствие не затратное, но такое же сладкое!. | Анальные проститутки Саратова профессионально занимаются анальным сексом и приносят невероятное удовольствие. | Анальный секс с проститутками в Твери - это возможность испытать незабываемые ощущения.
Copyright © 2008 - 2018 Программирование на Delphi для начинающих и не только.
Полнота авторских прав на все материалы, опубликованные на сервере DelphiDevelop.ru принадлежит их авторам.
Перепечатка материалов разрешается с указанием авторства и гиперссылки на первоисточник информации.