Ошибка в установке ApplicationLicenseKey в TInAppPurchase в Delphi XE6

Question

На основании документации embarcadero здесь http://docwiki.embarcadero.com/RADStudio/XE6/en/Adding_In-App_Payments_to_Your_Mobile_Apps я попытался назначить, но я получил заявку [DCC Error] MainFrm.pas(413): E2056 String literals may have at most 255 elements, Как я могу решить эту проблему?

Answer 1

Я нашел решение, что строковый литерал не может превышать 255 символов, поэтому я должен разбить его на маленькие кусочки (каждый из которых содержит менее 255 символов) и объединить их.

как это:

  InAppPurchase1.ApplicationLicenseKey := 
'MIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAqP'+
'+hksdEZkVWseD9aQoI5RzaMnj0Ep+VUjXnZmVpVNzAmjdw9tS+'+
'dHh3AcrEuUs9Hw9TtgaSCduBSiVuep5hM/UEnDVOnj8/ND8IJIOPj+'+
'Yezrpbt+9W92LSkN3lNcm3weOz5IW2rUaw0PLLZx13PyLXMpOFe+uJ3aW9hcGl/'+
'bDIMOeaFK9HWAGRTJGmmtfGUWQ0fe85mQXRwyrQncdoKLivHzKykzaR2wNuPBBLXpoHmEtIGGwnUFdAFUE8UqMQVepdtHVW9uNq/9e40lApkuQyoVKzZv31O56DF/'+
'jMkuIwHry+0ZoRrGA3oxeZAUy/iKsTMwz+v8G0qJ8eIDdmtQIDAQAB';

ps Дело в том, что я просто написал пример на сайте embarcadero.