Переместить форму

[jalols]

Как переместить FMX форму с мишкой, C++ Builder 10.1 Berlin

[Равиль Зарипов (ZuBy)]

23 минуты назад, jalols сказал:

Как переместить FMX форму с мишкой, C++ Builder 10.1 Berlin

использовать VCL'ный вариант например

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Single);
// uses WinApi.Windows, WinApi.Messages, FMX.Platform.Win
begin
  ReleaseCapture;
  SendMessage(FmxHandleToHWND(Handle), WM_SYSCOMMAND, $F012, 0);
end;

 

[jalols]

2 часа назад, ZuBy сказал:

использовать VCL'ный вариант например

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Single);
// uses WinApi.Windows, WinApi.Messages, FMX.Platform.Win
begin
  ReleaseCapture;
  SendMessage(FmxHandleToHWND(Handle), WM_SYSCOMMAND, $F012, 0);
end;

 

я попробовал этот пример, но у меня такая ошибка E2268 Call to undefined function 'FmxHandleToHWND'
  

[Vitaldj]

Мужики, простите, форму с каким мишкой?

[jalols]

  ReleaseCapture();
  SendMessage(Fmx::Platform::Win::FmxHandleToHWND(Handle), WM_SYSCOMMAND, 0xF012, 0);

спасибо ZuBy