
RADStudioDeveloper
Пользователи-
Активность
25 -
Зарегистрирован
-
Посещение
Весь контент RADStudioDeveloper
-
Владимир, благодарю за идею! Существуют ли решения для извлечения файлов из ISO образа только в исходном коде Delphi без внешних DLL?
-
CLSID_CFormatIso Test d7zip-master for ISO CLSID_CFormatIso.rar
-
С zip работает а вот с .iso НЕТ! Не работает с x64 Application! Test d7zip for ISO.rar
-
Krapotkin, благодарю за отклик! Попробовал почти всё доступное! ComponentAce ZipForge, d7zip, SevenZipVCL Не работает с .iso! Необходима распаковка дистрибутива Microsoft SQL Server Express Edition для установки. Помогите, пожалуйста, с работающим решением для Embarcadero RAD Studio Delphi VCL/FMX с извлечением файлов из дистрибутива образа .iso
-
Необходимо извлечение файлов из образа .ISO приложением созданным Embarcadero RAD Studio Delphi VCL/FMX. Есть ли компоненты и исходный код для решения?
-
Закрытие (падение) IDE Embarcadero RAD Studio Delphi при открытии конкретного исходного модуля кода Delphi (.pas) как в составе проекта так и просто открытие редактором среды без проекта. Ситуация воспроизведена на IDE: Embarcadero RAD Studio Delphi 10.2.3 Tokyo Embarcadero RAD Studio Delphi 10.3.3 Rio Открытие этого файла в IDE Lazarus не вызывает никаких проблем. Подскажите, пожалуйста, возможные причины и решение проблемы.
-
Пока полностью не разобрался. Но пытаюсь А вообще, сразу виден Ваш хороший уровень разработчика!
-
Только необходимо подумать как получить в разные каталоги как в современных версиях IDE Win32, Win64. Со службами очень интересно устроено - нигде не обнаружил примера Delphi для компонента TService для создания службы из приложения а не с командной строки. Ещё раз спасибо!
-
Благодарю за ответ! Но я для добавления платформы поступил по другому - удалил текущий AMBackupBDSvc.dproj и открыл AMBackupBDSvc.dpr в результате появились все доступные платформы и был создан новый AMBackupBDSvc.dproj
-
Привет всем! Через компонент TService необходимо программно из приложения для Windows создать службу Windows (Windows NT Service). Установка службы через командную строку с помощью опций /Install /Silent выполняется методом Vcl.SvcMgr.Application.Run Необходимо программно выполнить из приложения аналогичное действие ApplicationName.exe /Install /Silent по установке службы без повторного запуска самого приложения через исполняемый код Delphi по нажатию на кнопку в самом приложении. Подскажите, пожалуйста, решение.
-
Krapotkin, благодарю за отклик! Пробовал многое, вот к примеру: работает, но редирект на загружаемый файл responseHeader (https://updates.tdesktop.com/tsetup/tsetup.2.4.2.exe) в коде MemHeaders.Lines.Add(Header.Name+': '+Header.Value); - не отображает. // https://webdelphi.ru/2019/02/http-client-api-v-delphi/#klass_tnethttpresponse_-_otvet Очень долгий ответ. procedure TForm.Button1Click(Sender: TObject); var MS: TMemoryStream; Resp: IHTTPResponse; Header: TNameValuePair; Cookie: TCookie; begin memHeaders.Lines.Clear; memCookies.Lines.Clear; memContent.Lines.Clear; MS:=TMemoryStream.Create; NetHTTPRequest1.ContentStream:=MS; NetHTTPRequest1.MethodString:='get'; NetHTTPRequest1.URL:=edURL.Text; Resp:=NetHTTPRequest1.Execute(); try //загружаем контент memContent.Lines.LoadFromStream(NetHTTPRequest1.ContentStream); //выводим заголовки for Header in Resp.Headers do MemHeaders.Lines.Add(Header.Name+': '+Header.Value); //выводим куки for Cookie in Resp.Cookies do memCookies.Lines.Add(Cookie.ToString); //выводим версию HTTP case Resp.Version of THTTPProtocolVersion.UNKNOWN_HTTP: lbHttpVer.Caption:='n/a'; THTTPProtocolVersion.HTTP_1_0: lbHttpVer.Caption:='1.0'; THTTPProtocolVersion.HTTP_1_1: lbHttpVer.Caption:='1.1'; THTTPProtocolVersion.HTTP_2_0: lbHttpVer.Caption:='2.0'; end; //выводим код статуса lbStatusCode.Caption:=Resp.StatusCode.ToString; finally FreeAndNil(MS) end; end; end.
-
Вопрос решён самостоятельно: необходимо определить используемые протоколы. Возможно, решение поможет для разработчиков взаимодействующих с Telegram
-
Привет всем! Подскажите, пожалуйста, решение вопроса отправки сообщения Telegram Bot с использованием компонента именно NetHTTPClient NetHTTPClient1.Post('https://api.telegram.org/bot<token>/sendMessage?chat_id=@UserName&text=MessageText',data).ContentAsString; Отправка запроса Telegram bot-у через браузер проходит, через приложение Delphi Embarcadero RAD Studio 10.3.3 Rio не работает. Пожалуйста, предложите работающее решение.
-
Интересует вопрос интеграции CMS и REST Client проекта на Embarcadero RAD Studio Какие есть возможные решения с OAuth (OAuth2), компоненты и примеры исходного кода Delphi? В частности, интересует практическое решение интеграции CMS Magento и REST Client-a. Пожалуйста, поделитесь решениями.
-
Привет всем! Есть необходимость в проекте для Android Delphi FMX (RAD Studio 10.2.3 Tokyo / RAD Studio 10.3.1 Rio ) сохранять изображения с фотокамеры смартфона Android через WiFi соединение в удалённую базу данных Microsoft SQL сервера в поле BLOB. Подскажите, пожалуйста, возможные решения, примеры Delphi кода и требуемые компоненты для работы с камерой и SQL сервером через WiFi на Android устройствах.
-
Embarcadero RAD Studio XE 10.1 Update 2 Berlin - Embarcadero RAD Studio XE 10.2 Update 2 Tokyo FMX FireDAC TGrid LiveBindings Column Decimal BCD - отобразить значение По какой причине при получении данных с SQL сервера в формате Decimal BCD вместо значения (цифр числа) в TGrig LiveBindings Column отображается (BCD) как в IDE так и в собраном проекте Delphi & C++ Builder? При использовании VCL FireDAC TGrid LiveBindings Column Decimal BCD - проблем нет - цифры числа отображены. Подскажите, пожалуйста, решение https://forums.embarcadero.com/message.jspa?messageID=830141 Но решение не работает