Лидеры

В любом случае, вам придется вносить изменения в программу, т.к. 10.2 имеет новый подход к потокам в приложении. Вы можете либо изменить свой код, либо код fgActivityDialog. В вашем случае можно попробовать так: fgActivityDialog1.Message: = 'Проверка подключения к Интернету.'; fgActivityDialog1.Show; TTask.Run(procedure var result :string; begin try CM.DSRestConnection1.Host: = 'my.server.com'; // Пример CM.DSRestConnection1.TestConnection (); Result: = 'S'; except Result: = 'N'; End; tthread.synchronize(NIL, procedure begin F_Result := result; fgActivityDialog1.hide; end); end); F_Result - это поле формы

Обычно хватает XML.XMLDoc, XML.XMLIntf

Она встроена в существующий TXMLDocument.

в 10.2.2 поправили , но появилась или была проблема с перезаписью кук одни куки по несколько раз

var Reg:TRegistry; begin Reg:=TRegistry.Create; reg.RootKey:=HKEY_CURRENT_USER; reg.openKey('SOFTWARE\Microsoft\Windows\DWM',true); value:=reg.ReadInteger('ColorizationColor'); Reg.CloseKey; Reg.Free; TAlphaColorRec(Value).R:=Round(TAlphaColorRec(Value).R /100 *35); TAlphaColorRec(Value).G:=Round(TAlphaColorRec(Value).G /100 *35); TAlphaColorRec(Value).B:=Round(TAlphaColorRec(Value).B /100 *35); Color:=Value; Я делаю так!

Подумал и сделал более изящно - изменил метод Show. procedure TForm1.Button1Click(Sender: TObject); begin fgActivityDialog.Message := 'Teste'; fgActivityDialog.Show(3000); end; procedure TForm1.Button1Click(Sender: TObject); begin fgActivityDialog.Message := 'Teste'; fgActivityDialog.Cancellable:=True; fgActivityDialog.Show; end; Вот код :

Тогда в вашем случае проще доработать сам компонент fgActivityDialog. Я добавил метод fgActivityDialog.ShowWithAutoClose(3000) : procedure TForm1.Button1Click(Sender: TObject); begin fgActivityDialog.Message := 'Teste'; fgActivityDialog.ShowWithAutoClose(3000); end; Вот измененный исходный код unit FGX.ProgressDialog : Добавлен метод procedure ShowWithAutoClose(AAutoCloseTimer : Integer); и TTimer Прошу прощение у Ярослава, за топорное вмешательство в его код :-)

В Токио изменена логика работы приложения на Андроид - пользовательский интерфейс выполняется в основном потоке приложения, возможно проблема из за этого. Вот похожая тема

Например так: var path: TPathData; .......... Path:=TPathData.Create; Path.Clear; Path.MoveTo(PointF(x[0],y[0])); for i:=1 to N do Path.LineTo(PointF(x[i],y[i])); Path.ClosePath;

Хм, действительно. Так давно он у меня в проекте, что стал думать что он стандартный ) Однако он маленький и не требует установки, достаточно скопировать в свой проект. Вот он, если нужно.