Перейти к содержанию
Fire Monkey от А до Я

Alexey

Пользователи
  • Постов

    23
  • Зарегистрирован

  • Посещение

  • Победитель дней

    4

Сообщения, опубликованные Alexey

  1. И вот теперь, обязательны ключи:

     

    41<key>NSAppTransportSecurity</key>

    42<dict>

    43

    44  <key>NSAllowsArbitraryLoads</key>

    45      <true/>

    46</dict>

    для работы приложений с http, иначе будет возникать ошибка.

    Подскажите, пожалуйста, в какое место прописать эти ключи?

  2. Решил проблему так: 

    function insert_word(st1:string; edt:TEdit):string;
    var
    st2,st3:string;
    begin
    st2:=copy(edt.Text,edt.CaretPosition+1,Length(edt.Text)-edt.CaretPosition);
    st3:=copy(edt.Text,1,edt.CaretPosition);
    result:=st3+st1+st2;
    end;
    

    Где st1 - символ (фраза), который нужно вставить; edt - компонент Tedit, в который нужно вставить. 

  3. Для создания экранной клавиатуры на vcl использовал SendMessage(form1.edit1.Handle, WM_CHAR, Ord('A'), 0), но на firemonkey у компонента TEdit и Tmemo свойство handle отсутствует. Подскажите, пожалуйста, каким образом можно решить проблему? 

  4. Использую FMX.WebBrowserEx. Если в свойствах формы указать borderstyle-none, или fullscreen:=true, то появляется ошибка: raised exception class EOleexception with message 'неопознанная ошибка'. Подскажите, пожалуйста, как исправить.

    webbrowserex.zip

  5. Причина

    При  финальной сборке приложения для Application store в файле AndroidManifest.xml отсутствует разрешение для интернета (не смотря на то, что в разделе Uses Permissions разрешение для интернета стоит true), а при сборке Debug в файле AndroidManifest.xml это разрешение присутствует.

     

    Решение

    Проблема решилась следующим способом:  в разделе Uses Permissions разрешение для интернета ставим false, затем в файл AndroidManifest.template.xml.  вставляем строку:

    <uses-permission android:name="android.permission.INTERNET" />
    

    post-32-0-85593000-1395227606.jpg

  6. Здравствуйте. 

    В приложении android делаю проверку наличия интернет соединения:

    function CheckInternetConnection(Host: string='google.com'; Port: Integer = 80; Timeout: Integer = 5000): Boolean;
    var 
      TCP: TIdTCPClient;
    begin
      TCP := TIdTCPClient.Create(nil);
      try
        TCP.Host := Host;
        TCP.Port := Port;
        TCP.ConnectTimeout := Timeout;
        try
          TCP.Connect;
          Result := TCP.Connected;
        except
          Result := False;
        end;
      finally
        TCP.Free;
      end;
    end;
    

    В режиме Debug все работает нормально. В режиме Release функция перестает работать на строке:  

    TCP.Connect;
    

    В чем проблема?

  7. Проблема в следующем: Файл .ipa подписан не тем сертификатом. В разделе provision у тебя указан сертификат для разработки, а нужно указать сертификат для публикации. 

     

    post-32-0-81299800-1394809148_thumb.png

×
×
  • Создать...