Witam,
w jaki sposób skonwertować poniższą linijkę kodu, aby była kompatybilna z Android w FireMonkey, bo jak wiadomo ShortString nie jest wspierany w FMX?
Embarcadero sugeruję zmianę na tablicę bajtów: http://docwiki.embarcadero.com/RADStudio/Tokyo/en/Migrating_Delphi_Code_to_Mobile_from_Desktop, ale nie bardzo wiem jak można to zrobić na poniższym przykładzie.
function DajNazweKlasy (p_Obiekt : TObject) : RawByteString;
begin
Result := PShortString(PPointer(PByte(p_Obiekt.ClassType) + vmtClassName)^)^;
end;