-
Постов
69 -
Зарегистрирован
-
Посещение
-
Победитель дней
3
Весь контент Dmitry Stolyarov
-
не исключаю ошибки в формировании JSON.. (опыта нет) сам php: if ($DBResult = mysqli_query($DBLink, $query2)) { $ResultArray = array(); $Index = 0; while ($row = mysqli_fetch_array($DBResult, MYSQLI_ASSOC)){ $ResultArray[$Index] = $row; $Index++; } $ResultJSON = json_encode($ResultArray, JSON_PRETTY_PRINT | JSON_UNESCAPED_UNICODE); echo $ResultJSON; mysqli_free_result($DBResult); } if ($DBResult = mysqli_query($DBLink, $query3)) { $ResultArray = array(); $Index = 0; while ($row = mysqli_fetch_array($DBResult, MYSQLI_ASSOC)){ $ResultArray[$Index] = $row; $Index++; } $ResultJSON = json_encode($ResultArray, JSON_PRETTY_PRINT | JSON_UNESCAPED_UNICODE); echo $ResultJSON; mysqli_free_result($DBResult); } if ($DBResult = mysqli_query($DBLink, $query4)) { $ResultArray = array(); $Index = 0; while ($row = mysqli_fetch_array($DBResult, MYSQLI_ASSOC)){ $ResultArray[$Index] = $row; $Index++; } $ResultJSON = json_encode($ResultArray, JSON_PRETTY_PRINT | JSON_UNESCAPED_UNICODE); echo $ResultJSON; mysqli_free_result($DBResult); } на выходе дает указанный выше формат
-
Подскажите, пжл, ка разобрать такой JSON: [ { "cities_id": "1", "cities_idpartner": "2", "cities_name": "москва" }, { "cities_id": "2", "cities_idpartner": "2", "cities_name": "москва2" } ][ { "prices_id": "1", "prices_name": "полный прайс", "prices_idpartner": "2", "prices_rub": "1000.00" }, { "prices_id": "2", "prices_name": "многодетные", "prices_idpartner": "2", "prices_rub": "750.00" } ][ ... несколько подобных запрос с разных таблиц в одном JSON
-
так и не понял.. сертификат поможет или только ждать обновление разработчиков?
-
откат на xcode версии ниже поможет ?
-
Не могу скомпилировать пустое приложение под OSX Majave SDK 10.14. При компиляции вылетает ошибка и студия закрывается (10.2.2 Tokyo). Подскажите, пжл, как это победить??
-
ничего не могу понять.. стоял lockbox компилировался под osx. Переустановил.. сейчас только поддержка win32 или я чего не так делаю или качаю lockbox не тот.. подскажите пжл?
-
Да, решение - сразу сохранять обработанные изображения (с обрезанными углами)
-
Margins (4) выставлен 2. Нужно чтобы углов у image не было. То есть image “влилась» по рамке rectangle
-
У rectangle выставлено MustTop, у image Client, пробовал Content. Результат тот же..
-
Добавил TRectangle в стиль. Поместил Image в Rectangle. При выводе Image выходит за рамки Rectangle. Подскажите, пжл, что делаю не так?
-
Попробовал запустить демку Berlin 10.2, но получил ошибку : [dcc32 Fatal Error] FMX.ListView.pas(21): F2051 Unit FMX.ListView.Adapters.Base was compiled with a different version of FMX.ListView.Types.TListItem нужно еще какие-то манипуляции провести или я что-то не понял?
-
у меня не получилось воспроизвести mp4... где необходимо прописатьTMediaCodecManager::RegisterMediaCodecClass... ?
-
Сайт на Wordpress. Просто не могу найти пример для THTTPClient, хотя бы посмотреть каким образом можно передать параметры (логин и пароль)
-
имеется ввиду, что пользователь может скачать файл только если зарегистрирован на сайте. Т.е. как я понимаю, необходимо отправить запрос, в котором указаны логин и пароль, и если все ОК, то скачивается файл. Сейчас у меня реализовано простое скачивание без "авторизации". Использую THTTPClient
-
Кто-ть подскажет... можно как-то авторизоваться используя THTTPClient?
-
сейчас я использую THTTPClient. Необходимо полностью переписать код на TNetHTTPClient вместо THTTPClient ?
-
да, справку эту видел... но не понимаю как ее привязать.. делал так, но не работает. procedure TfmMain.NetHTTPClient2AuthEvent(const Sender: TObject; AnAuthTarget: TAuthTargetType; const ARealm, AURL: string; var AUserName, APassword: string; var AbortAuth: Boolean; var Persistence: TAuthPersistenceType); begin if AnAuthTarget = TAuthTargetType.Server then begin AUserName := 'stdimarik'; APassword := '123456'; end; end; ... FClient.AuthEvent:= NetHTTPClient2AuthEvent; ...
-
Скачиваю файл через THTTPClient (как реализовано в демке xe 10) ... FClient := THTTPClient.Create; FClient.OnReceiveData := ReceiveDataEvent; ... не могу найти пример с THTTPClient как добавить авторизацию на сайте перед скачиванием файла. подскажите, пжл...
-
странное поведение MediaPlayerControl ... есть Tabcontrol, на нем лежит MediaPlayerControl. листаю таб через SetActiveTabWithTransition. в итоге если вернутся обратно на вкладку, то на MediaPlayerControl отпечатки других компонентов, которые при перелистывании как бы проехали через него.
-
Коллеги, у кого-ть получилось воспроизвести MP4? строка: initialization TMediaCodecManager.RegisterMediaCodecClass('.mp4', 'Mpeg4 Files', TMediaType.Video, TWindowsMediaCodec); ничего не дает... ps: Берлин 10.2
-
т.к. нужна была статическая страница (по сути картинка) , то решил через скрины)
-
Выравнивание Image внутри Tab
Dmitry Stolyarov опубликовал вопрос в Выравнивание вложенных контролов
Не могу понять в чем дело.. динамически создаются Tabы и Image внутри табов.. for k := 0 to ... ... Img:= TImage.Create(tabcSlider.Tabs[k]); Img.Name:= 'Img'+IntToStr(k); Img.Parent := tabcSlider.Tabs[k]; Img.Align:= TAlignLayOut.Client; Img.WrapMode:= TImageWrapMode.Center; ... в результате Image вылазит за границы таба... смещается влево что не так? -
Добрый день, подскажите, пжл, возможно как-то убрать рамку вокруг twebbrowser ?