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

lbName := Item.FindStyleResource('lbname') as TLabel; // Здесь получаю nil  

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;

проблема в том, что 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

вот это?
https://www.youtube.com/watch?v=eqrVYWZ8SPk

убрать [Ref]

наверное еще подключить нужно IPPeerClient

Как то так
Left := screen.Displays[1].BoundsRect.Left;

уже отвечали на этот вопрос

файл AndroidManifest.template.xml
 
блок activity должен иметь вот такой вид
<activity android:name="com.embarcadero.firemonkey.FMXNativeActivity" android:label="%activityLabel%" android:configChanges="orientation|keyboard|keyboardHidden|screenSize" android:launchMode="singleTask">

function idHttpGet(const aURL: string): string; // uses System.Net.HttpClient, System.Net.HttpClientComponent, System.Net.URLClient; var Resp: TStringStream; Return: IHTTPResponse; begin Result := ''; with TNetHTTPClient.Create(nil) do begin Resp := TStringStream.Create('', TEncoding.ANSI); Return := Get( { TURI.URLEncode } (aURL), Resp); Result := Resp.DataString; Resp.Free; Free; end; end; procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage(idHttpGet('http://airnav.tj/ru/online/utdd')); end; Держи

использовать такую конструкцию
//uses System.Threading; TTask.Run(      procedure      begin         // выполняем загрузку файла из интернета;         TThread.Synchronize(nil, procedure            begin               // выполняем действия связанные с визуальными компонентами            end); end); но помнить что из доп. потока нельзя запустить доп. поток

http://fire-monkey.ru/topic/1805-kompiliatciia-android-i-ios-prilozhenii-adaptatciia-versii/?p=11672

я пока так оставил, другого выхода не нашел, константы не помогли.
 
вот так у меня
$answer = '{"root":'.json_encode($rows, JSON_UNESCAPED_UNICODE | JSON_UNESCAPED_SLASHES).'}'; echo str_replace("\\\"","'", $answer);

idhttp1.Create(Application); - что это за бред?
IdHTTP - это откуда взялось?
никогда и никому этот код не показывай
 
берем файлик во вложении подключаем в проекте и пишем
with ListView1.Items.Add do begin   Text := 'Text';   Bitmap.LoadFromUrl('http://site.ru/icons/icon.png'); end; не проверял, но должно работать. не нужно пихать в поток, там итак уже используется
FMX.Features.Bitmap.Helpers.zip

на кнопки повешать
TTabControl.ActiveTab := TTabItem; убрать отображение вкладок
TTabControl.TabPosition := None;

что то типа того нужно сделать, посчитать грубо сколько Item'ов видно
Scrollbar1.Max := Value - Round(ListView1.Height / ListView1.ItemAppearance.ItemHeight);

посмотрите вот это
http://fire-monkey.ru/topic/2041-rx-fgx-opisanie-versii-07174/
 

1) paserver'a можно оставить два
2) в XCode загрузить SDK для IOS 8.4
3) а вот с миграцией будет жопа, приготовьтесь

что-то типа этого?

demoLV.zip

IDE-Project-Options-Version Info-label

вот так делается
self.Fill.Color:= TAlphaColorF.Create(255/Random(255), 255/Random(255), 255/Random(255), 255/Random(255)).toAlphaColor;

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

Обновите студию, с XE8+ можно под 5.x собирать

Переключите платформу на андроид например

вот тут наглядно показано