Вопрос Перемещение формы инсталлятора без рамки

Статус
В этой теме нельзя размещать новые ответы.

Le9ent

Новичок
Доброго времени суток уважаемые пользователи, хотел у вас узнать следующий момент:
Есть окно инсталлятора, оно без рамки и его фон выполнен с помощью картинки.

Код:
WizardForm.BorderStyle:=bsNone;
Т.к. стандартная рамка убрана окно нельзя переместить по площади экрана.
В поиске нашел пример использования одной процедуры:

Код:
function ReleaseCapture: Longint; external 'ReleaseCapture@user32.dll stdcall';
procedure LabelOnMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  ReleaseCapture;
  SendMessage(WizardForm.Handle,$0112,$F012,0);
end;
Но проблема в том , что данная процедура работает для изображений (для лейблов и на обычной версии работает процедура) только в расширенной версии компилятора Inno Setup, по некоторым причинам я не хочу его использовать (банально во многих случаях различные антивирусы ругаются на скомпилированный файл и на саму расширенную версию от restools).

Так вот есть ли альтернативный способ или процедура которая могла бы заставить двигать элементы окна (в моем случае изображение) который бы работал для стандартной версии компилятора?
 

Вложения

Shegorat

Lord of Madness
Администратор
Le9ent
Ну как вариант так
Код
 
Последнее редактирование:
Статус
В этой теме нельзя размещать новые ответы.
Сверху