Статьи Королевства Дельфи


Преамбула:


Однажды мне захотелось перемещать панели разделенные TSplitter с клавиатуры. Не удобно, при большом вводе пользоваться еще и мышью. Первая мысль, что пришла в голову, это изменить размеры у панели при нажатии определенных клавиш. PanelLeft.Width:=PanelLeft.Width-20; Сделал быстро и ... В общем получилась гадость. Все прыгало, мигало, в общем одна жуть.
Ладно, решил пойти другой дорогой, т.е. другим методом. Решил сделать панель в виде полоски и ее перемещать. Форма изменялась как ей было и положено, но сама панель противно кривлялась. В общем тоже мало эстетичное зрелище.

Решил написать наследника от TSplitter, но уже с возможностью эмуляции клавиатуры. Поковырялся, поковырялся и решил, что за день я не управлюсь, тем более что возня с первыми заняла пол дня.
И вот тогда решил сэмулировать движения мышью. Решил что дело выеденного яйца не стоит и начал искать готовый пример и инете. И к своему великому удивлению - не нашел :(

Начал биться сам. В общем на все про все у меня ушел день на вариации, тестирование, поиск в инете + написание этой статьи. Для кого то может это и мало времени что бы разобраться с такой нестандартной ситуацией, а для меня очень и очень много. Поэтому и решил написать эту статью, что бы дорогие коллеги не тратили время на это, а писали бы много хороших программ и желательно фришных, хотя бы для USSR. :O)




Начало  Назад  Вперед