В Android API, у класса Vibrator есть метод
vibrate(long[] pattern, int repeat)
В Делфи, этот метод выглядит так
vibrate(pattern: TJavaArray<Int64>; repeat_: Integer);
на вход принимает два параметра:
- Массив "pattern" значений в миллисекундах. Чередование идёт в таком порядке [pause, vibrate, pause, ... , vibrate, pause]
- Флаг повтора "repeat_", "-1" значит не повторять, либо указывается индекс из массива "pattern", с этого индекса начнётся повторение.
Также вы можете почитать статью Используем вибрацию на Android устройствах
Или воспользоваться классом с гитхаба: https://github.com/AndrewEfimov/Android-API/tree/master/Vibrator
Есть ещё полезный форум по FMX, там также есть ответ http://fire-monkey.ru/
Update: Как создать массив "TJavaArray" (Требуется подключить юнит "Androidapi.JNIBridge")
function IntArrayToJArray(const OrigArray: array of Integer): TJavaArray<Int64>;
var
i: Integer;
begin
Result := TJavaArray<Int64>.Create(Length(OrigArray));
for i := Low(OrigArray) to High(OrigArray) do
Result.Items[i] := OrigArray[i];
end;
или так
function TForm2.CreateJavaLongArray(const ASource: TArray<string>): TJavaArray<Int64>;
var
i: Integer;
begin
Result := TJavaArray<Int64>.Create(Length(ASource));
for i := Low(ASource) to High(ASource) do
Result.Items[i] := ASource[i].ToInt64;
end;