Лидеры

Проблема актуальна

Всем привет!) Столкнулся с нуждой сделать произвольную форму в Delphi 7 с максимально четкой границей. Полез в гугл и нашел такое видео: Здесь показано, как сделать форму по заготовленной маске. И конечный результат вроде неплохой. Но моя Дельфи отказывается устанавливать компонент shapedform, пишет: Could not create output file ...'FormsChanging.bpl'Ну так вот, подскажите, как сделать сложную произвольную форму, чтоб ее окантовка не казалась пиксельной? Повторяю, форма сложная и сделать ее через такие программы типа "Регионы 7.0" не получится.

Спасибо, Все работает, код чуть-чуть подправил только) procedure TForm1.Timer1Timer(Sender: TObject);begin if (GetAsyncKeyState(VK_UP) <> 0) then begin // Тут код end;end;