How to ORDER BY RANDOM() LIMIT 10

I try but I have a troble

This is my Service implementation

function TProductService.Product: TProduct;
var
//Declaro los objetos
Manager: TObjectManager;
oProduct: TProduct;
begin
// How to ORDER BY RANDOM() LIMIT 10
Manager := ObjectDataLab.GetManager;

try
// For test recovery record Id =1
Result := Manager.Find(1);

finally
Manager.Free;
end;

end;

Do you have some tips