Равиль Зарипов (ZuBy)

пару дней назад на форум мог зайти только через Tor. Причина была в провайдере, но все же что такого в форуме, что на него не было доступа. хотя все соц сети и популярные сайты работали

а что это за компонент?

Апи не полное, не хватает файлов android.accounts.AuthenticatorDescription, android.accounts.AccountManagerFuture, android.accounts.AccountManagerCallback, android.content.ClipData, android.accounts.OnAccountsUpdateListener;

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

Это называется Scale

думаю как-то так function CheckInternet2: boolean; // uses System.Net.HttpClient, System.Net.HttpClientComponent var Resp: IHTTPResponse; begin Result := false; with TNetHTTPClient.Create(nil) do begin try Resp := Head('http://google.com'); Result := Resp.StatusCode < 400; except Result := false; end; Free; end; end; метод HEAD

function CheckInternet: Boolean; begin try with TIdTCPClient.Create(nil) do begin ReadTimeout := 2000; ConnectTimeout := 2000; Port := 80; Host := 'google.com'; Connect; Result := Connected; Disconnect; Free; end; except Result := false; end; end;

Это рейтинг поисковых запросов, JS на 8 месте, ага=) JS сейчас самый попсовый и востребованный язык. Лучше посмотреть на количество проектов на гите) также не показатель, многие не используют git. То что ищут и есть актуальное

вот так примерно будет выглядеть ваш код на indy function idHttpGet(const aURL: string): string; // uses idHttp var Resp: TBytesStream; begin Result := ''; with TidHTTP.Create(nil) do begin HandleRedirects := true; Resp := TBytesStream.Create; Get(aURL, Resp); // Resp.SaveToFile('sdcard/Android/data/test.html'); // сохранение Resp.Seek(0, 0); Result := StringOf(Resp.Bytes); Resp.Free; Free; end; end; а вот так на Net.HTTPClient function idHttpGet2(const aURL: string): string; // uses System.Net.HttpClient, System.Net.HttpClientComponent, System.Net.URLClient; var Resp: TBytesStream; begin Result := ''; with TNetHTTPClient.Create(nil) do begin Resp := TBytesStream.Create; Get(aURL, Resp); // Resp.SaveToFile('sdcard/Android/data/test.html'); // сохранение Resp.Seek(0, 0); Result := StringOf(Resp.Bytes); Resp.Free; Free; end; end;

бывают, но почти всегда есть адаптивный режим для планшетов. нужно помнить всегда что есть дисплей 3,2 дюйма и нужно чтобы туда все влезло. я пишу на 5 дюймах и приложения адекватно ведут себя на маленьких дисплеях, зато на больших если кнопка растянута до краёв это просто ужасно для мелких дисплеев подкладываю TVertScrollBox и контент туда пихаю, не включая Toolbar'ы и прочие элементы управления на 7 дюймах еще нормально, а на 10-ке нужно адаптировать в зависимости от ориентации

при обновлении картинки нужно еще вызвать перерисовку Item'a через ApplyStyleLookup

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

да, на андроид 6.0 не выйдет. нужно ждать пока индейцы допилят до boringSSL и собственно вопрос, что не понятно?

а что скриншот с телефона платная услуга?) что за сайт такой? http://www.mail.ru/?

Главный поток тормозить не будет? нет, для этого в хелпере создается свой доп. поток. все будет чётко. ссылку которую я давал, запустите оттуда демку и посмотрите как там всё устроено

Нельзя грузить в доп. потоке картинки!!! вынеси загрузку картинок отдельно в главный поток

так такое и нужно в первую очередь, я под линь на лазарусе писал. не удобно как-то. привык к делфовым примочкам

Уже миллион раз обсуждалось, нужно использовать Bitmap Helper в этой теме есть не надо так JSON := TJSONObject.ParseJSONValue(Browser.Get(Main_URL + 'base/get?client=' + Client)) as TJSONObject; exception словишь, если пустой или вернётся не json

1) Сервер Ваш? если да, то в php указать header('Content-Type: text/html; charset=utf-8'); 2) посмореть в хидерах или снифером что приходит. По умолчанию в Delphi под Windows кодировка по умолчанию ANSI, Остальные UTF-8 Проверьте этим кодом кодировку var Stream: TBytesStream; Size: Integer; Buffer: TBytes; Encoding: TEncoding; begin Stream := TBytesStream.Create; try Stream.LoadFromStream(ТУТ ВАШИ ДАННЫЕ); Buffer := Stream.Bytes; Size := TEncoding.GetBufferEncoding(Buffer, Encoding, TEncoding.Default); finally Freeandnil(Stream); end; ShowMessage(Encoding.EncodingName); end;

Незнаю, проверьте.

там как-то можно добавить именно Windows 7

проблема в том, что FMX сам регулирует какой стиль использовать, т.к. в программу закладываются сразу 3 стиля Windows7-8-10 unit FMX.Controls.Win; initialization THint.RegisterClass(TWindowsHint); TStyleManager.RegisterPlatformStyleResource(TOSPlatform.Windows, 'win7style'); TStyleManager.RegisterPlatformStyleResource(TOSPlatform.Windows, 'win8style'); TStyleManager.RegisterPlatformStyleResource(TOSPlatform.Windows, 'win10style'); TStyleManager.RegisterPlatformStyleSelection(TOSPlatform.Windows, WindowsStyleSelection); Попробуйте загрузить в StyleBook стиль Win-10 для Windows 7

Сотрите значит спецификацию манифест фалйа, только там такое может быть

А в чем проблема? Обычно в доп. потоках использую TStringStream пока проблем не было ни на одной платформе

Если получится не забудьте поделиться с сообществом