|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Мигает\мерцает загаловок формы
Доброе время суток!
Делаю панель запуска типа rocketdock. Всё на speedbutton`ах. Кнопки создаю в ран-тайме. Вот имею я кнопочки в ряд. Мне захотелось одну передвинуть, начинаю двигать, в это время форма мерцает, мигает, называйте как хотите... Двигаю кнопку так: Код:
procedure TForm1.SPBMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin if SPB_L_R = True then begin SPB[SensorTag].Left := Mouse.CursorPos.X -form1.Left ; end; Форма прилимает к верхнему краю экрана. На Загаловке описан путь и имя файла, появляются эти пути только при наведении на кнопку. При перетаскивании видать что-то происходит.... |
#2
|
||||
|
||||
Firemonkey в помощь.
— Как тебя понимать? — Понимать меня не обязательно. Обязательно меня любить и кормить вовремя. На Delphi, увы, больше не программирую. Рекомендуемая литература по программированию |
Этот пользователь сказал Спасибо M.A.D.M.A.N. за это полезное сообщение: | ||
Gareth (10.10.2017)
|
#3
|
|||
|
|||
Все-таки мне кажется, что тут имеет место косяк в коде при реализации либо отрисовки, либо самого перетаскивания. Не должно быть там мецаняи, ведь в дизайнере самой Дельфи когда ты таскаешь компоненты по форме ничего ведь не мерцает...
Ну а для начала я бы посмотрел бы что будет есть у формы выставить DoubleBuffered := True. |
#4
|
||||
|
||||
Открой окно файлового проводника Windows, и, зацепив мышью за левый край окна, попробуй изменять его размеры. За правый - всё красиво будет, а вот за левый... Не в самой ли ОС спрятан косяк с отрисовкой?
З.Ы. Win7 x64 максимальная, в/карта GeForce GTX 760, дрова разные пробовал - как "коробочные" (с диска), так и самые свежие с Инета. "Мерцание" (в виде заметного дёрганья правого края окна) проявляется независимо от установленной схемы (стиля окон). Последний раз редактировалось Guaho, 11.10.2017 в 07:20. |
#5
|
||||
|
||||
Цитата:
Пишу программы за еду. __________________ |
#6
|
|||
|
|||
Цитата:
только что проверил - ничего а проводнике не мерцает, за исключением правого края тулбара немного, но это, как я понимаю, проблема переразмеривания самого тулбара. Двигал и менял за все стороны... Win 7 x64 Pro |
#7
|
||||
|
||||
Ну да, "немного", миллиметр-полтора на экране (27" монитор). Можно сказать, что "ничего не мерцает", да.
|
#8
|
|||
|
|||
Я же уточнил - заголовок окна не мерцает. И тулбар не мерцает на самом деле, там явно видна двойная отрисовка, т.е. сначала отрисовывается в новорм размере окна старый тулбар, а потом он переразмеривается и отрисовывается снова. Т.е. визуально это проявляется как небольшая черная полоска справа от тулбара. Именно мерцания - нет.
|