Если бы его тут не забанили, я бы просто его упомянул )))

И так, господа - докладываю, Intent со совим экшном можно поймать из Java класса в своём приложении только с помощью наследника от JFMXBroadcastReceiverListener:D

👍 ) в манифесте надо шаманить?

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
 if Button <> mbLeft then exit;
 move := true;
end;

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
 if move then Cursor := crDrag;
end;

procedure TForm1.FormMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
 Move := false;
 Cursor := 0;
end;

Почему курсор не меняется? Что ж этой хрени надо?

Тока прописать свой экшн в intent-filters не забыв про категорию default

Сперва запомнить тот который был при нажатии, а потом вернуть на место.

Ну и да, Screen.Cursor

раскрою ответ про Screen.Cursor
ты меняешь курсор, который будет, когда указатель будет над ФОРМОЙ ) но у тебя форма вся закрыта, небось, другими компонентами )..

Ничего не понял

Курсор над формой

Форма пустая

Понял, достаточно Form.Cursor заменить на Screen.Cursor

Но почему Form.Cursor не работает - хрен его знает

Пример кода будет?

Спасибо

Господа, в чем смысл external-константы в FPC?

Имеется ввиду external ’lname’;  ?

Да