Перейти к содержанию

RADStudioDeveloper

Пользователи
  • Активность

    25
  • Зарегистрирован

  • Посещение

Сообщения, опубликованные RADStudioDeveloper


  1.  

    Krapotkin,  благодарю за отклик!

    Попробовал почти всё доступное!

    ComponentAce ZipForge, d7zip, SevenZipVCL

    Не работает с .iso!

    Необходима распаковка дистрибутива Microsoft SQL Server Express Edition для установки.

    Помогите, пожалуйста, с работающим решением для Embarcadero RAD Studio Delphi VCL/FMX с извлечением файлов из дистрибутива образа .iso

     

     


  2. Закрытие (падение) 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 не вызывает никаких проблем.

     

    Подскажите, пожалуйста, возможные причины и решение проблемы.

    Embarcadero RAD Studio for Windows не работает.JPG


  3. 12 часов назад, Yarpda сказал:

    Не знаю как раньше но в 10.4.1. прекрасно работает добавление через add нескольких элементов,  выделяя их с контролом.

    Это работает!

     

    Мне необходимо добавить пакетом (списком) в  существующий проект множества файлов (*.pas + *.dfm) в каталоге проекта содержащего  структуру вложенных каталогов с сохранением исходной структуры расположения добавляемых файлов в проект в этих каталогах!

    Может есть plugin к IDE?


  4. krapotkin Благодарю за отклик!

    Добавить через Add... - не работает - только один файл!

    Мне необходимо добавить много модулей пакетно в проект как они добавляются через Add  с сохранением исходной структуры файлов в каталогах и созданием дерева проекта.

     

     


  5. Только необходимо подумать как получить в разные каталоги как в современных версиях IDE Win32, Win64.

    Со службами очень интересно устроено - нигде не обнаружил примера Delphi для компонента TService для создания службы из приложения а не с командной строки.

    Ещё раз спасибо!

     

     


  6. Привет всем!

    Через компонент TService необходимо программно из приложения для Windows создать службу Windows (Windows NT Service).

    Установка службы через командную строку с помощью опций /Install /Silent  выполняется методом Vcl.SvcMgr.Application.Run

    Необходимо программно выполнить из приложения аналогичное действие ApplicationName.exe /Install /Silent по установке службы без повторного запуска самого приложения через исполняемый код Delphi по нажатию на кнопку в самом приложении.

    Подскажите, пожалуйста, решение.


  7. 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.


  8. 11 часов назад, OnePeople сказал:

    В данном случае имя файла в responseHeader     

    Location:https://updates.tdesktop.com/tsetup/tsetup.2.4.2.exe

    Благодарю за отклик!

    Абсолютно верно!

    Как получить в Delphi коде  responseHeader (https://updates.tdesktop.com/tsetup/tsetup.2.4.2.exe) используя NetHTTPClient?


  9. Привет всем!

    Загрузка с WEB сервера файла с помощью

    NetHTTPClient

    NetHTTPClient1.Get(URL, FS) - загрузка проходит хорошо.

    Вопрос как получить имя загружаемого файла?

    Есть реально работающее решение?

     

     


  10. Привет всем!

    Подскажите, пожалуйста, решение вопроса отправки сообщения 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 не работает.

    Пожалуйста, предложите работающее решение.


  11. Интересует вопрос интеграции CMS и REST Client проекта на Embarcadero RAD Studio

    Какие есть возможные решения с OAuth (OAuth2), компоненты и примеры исходного кода Delphi?

    В частности, интересует практическое решение интеграции   CMS Magento и REST Client-a.

    Пожалуйста, поделитесь решениями.

      


  12. Для доступа к SQL серверам из Android Embarcadero рекомендует использовать DataSnap.

    Есть ли примеры Delphi кода и какие требуются компоненты для работы с камерой и SQL сервером через WiFi на Android устройствах через DataSnap?


  13. Привет всем!

    Есть необходимость в проекте для Android Delphi FMX (RAD Studio 10.2.3 Tokyo / RAD Studio 10.3.1 Rio ) сохранять изображения с фотокамеры смартфона Android через WiFi соединение в удалённую базу данных Microsoft SQL сервера в поле BLOB.

     

    Подскажите, пожалуйста,  возможные решения, примеры Delphi кода и требуемые компоненты для работы с камерой и SQL сервером через WiFi на Android устройствах.


  14. 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

    Но решение не работает

×
×
  • Создать...