-
Постов
2 517 -
Зарегистрирован
-
Посещение
-
Победитель дней
264
Весь контент Равиль Зарипов (ZuBy)
-
единственное что можно сделать, это скрыть его, но тут на вкус и цвет
-
обращайтесь)
-
там есть TBitmap.HandleAllocated, его нужно использовать
-
не понятно зачем это понадобилось? если менюшка показана, то у пользователя только один путь - тапнуть чтобы менюшка закрывалась по тапу вне области списка, нужно добавить один элемент со стилем aItem.Style := TfgActionStyle.Cancel;
-
чтобы прям кросс, думаю такой код подойдёт function StartGranted: boolean; // uses System.IOUtils begin Result := not TFile.Exists(TPath.Combine(TPath.GetDocumentsPath, 'IamStarted')); TFile.WriteAllText(TPath.Combine(TPath.GetDocumentsPath, 'IamStarted'), ''); end; в dpr пишем begin if StartGranted then begin Application.Initialize; Application.CreateForm(TForm2, Form2); Application.Run; end; end. ну и в дестрое главной формы procedure TForm2.FormDestroy(Sender: TObject); //uses System.IOUtils; begin TFile.Delete(TPath.Combine(TPath.GetDocumentsPath, 'IamStarted')); end; Но это не точно, может есть и аналог mutex'a в MacOS
-
нету, реестр есть только в Windows сохраняйте в файлы свои конфигурации
-
ага, посмотрел логом, думаю правильней будет так // ZuBy *** procedure TCustomWebBrowser.FormHandleCreated(const Sender: TObject; const Msg: TMessage); var WBService: IFMXWBService; begin if not(Sender.ClassNameIs('TCustomPopupForm')) then if not(csDesigning in ComponentState) and TPlatformServices.Current.SupportsPlatformService(IFMXWBService, WBService) then begin FWeb := WBService.CreateWebBrowser; FWeb.SetWebBrowserControl(Self); FWeb.UpdateContentFromControl; FWeb.URL := FURL; FWeb.Navigate; end; end; // *** ZuBy не реагировать на создание Попап окон, на формы это не влияет. Сильно не тестил, так что хз.
-
Если мне память не изменяет, хендл пересоздается при изменении стиля (sizeble, single, none...) Но какого черта Комбобокс отсылает подобное сообщение я не смотрел
-
вот залил https://yadi.sk/d/bLqs3l1V3H962e
-
не понял почему, но перезалил
-
нет такой проблемы, ваш код у меня отработал так uses System.Net.HTTPClient; procedure TForm2.Button1Click(Sender: TObject); var aHttp: THTTPClient; aStr: TStringStream; begin aHttp := THTTPClient.Create; aStr := TStringStream.Create('', TEncoding.UTF8); try aHttp.Get('http://www.cbr.ru/', aStr); Memo1.text := aStr.DataString; finally aHttp.Free; aStr.Free; end; end;
- 4 ответа
-
- THTTPClient
- кодировка
-
(и ещё 2 )
C тегом:
-
как то так наверное AutoSizeImage.rar
-
на винде только такое поведение? попробуй так WB_CB_Err.rar
-
0) то что в первой статье указано для IOS все сделала? 1) на чем тест проводишь? 2) CFBundleIdentifier в Version Info идентичен названию пакета в консоли?
- 64 ответа
-
- push
- notification
- (и ещё 5 )