fsdb

Пользователи
  • Публикаций

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

  • Посещение

  • Победитель дней

    3

Весь контент fsdb

  1. fsdb

    Trackbar глюк. только у меня?

    выбираю чистый проект Firemonkey под Android, кидаю на форму Trackbar, в свойствах ставлю traking=false пару раз на телефоне дергаю его в лево в право касанием, затем методом перетаскиванием(пальцем) и тут начинается нечто: я ставлю новое значение любым методом а он на секунду устанавливается и возвращается в прежнию позицию. колбасит его по полной. проверьте пожалуйста. тестировал на Tokio 10.2 и 10.2.2 вот сам apk https://yadi.sk/d/7rZtBiZv3Syxw4
  2. fsdb

    Orange pi h5/h6 , Linux x64+Delphi?

    Ребята подскажите на Orange pi h5 h6 - под Linux можно компилировать свои приложения? Марка процессора:Allwinner, CPU:H5 Quad-core Cortex-A53 64bit
  3. Пожалуйста подскажите на пальцах буквально. как сделать стиль кнопки как на втором скриншоте. не пойму почему они отличаются. тут ведь тоже нет никакого Stylebook, не понимаю просто.
  4. fsdb

    переход на tokio

    Добрый день. подскажите пожалуйста. Делаю приложение в firemonkey и раньше без проблем запускал приложение на Berlin, утсновкил Tokio и получаю сразу после компиляции. в приложении в основном использую StringGrid1, более ничего. как мне отловить - в чем проблема именно? я вышел за Range, каким то образом и не могу понять как и где. пытаюсь отловить дебагером но до него дело не доходит. сразу после компиляции эта ошибка.
  5. fsdb

    переход на tokio

    type all = record SettingStream: TObjectList<TControl>; // сам объект TypeName: TstringList; // тип объекта для создания (TButton, Timage и так далее) ActionList: TstringList; // закрепленные за объектом действия PropertList: TstringList; // дополнительные свойства объекта end; Возможно как то связано с TObjectList<TControl>, исключение всплывает в System.Generics.Collections
  6. fsdb

    Работа с СОМ портом в Linux

    да, тоже не компилируется хоть и лицензия с исходниками. извиняюсь
  7. fsdb

    MQTT под Ubuntu Server

    вот сделал, кое как. вот так я и хотел
  8. fsdb

    MQTT под Ubuntu Server

    Ребята подскажите /помогите. есть вот эта демка http://www.esegece.com/websockets/protocols/mqtt и использовал crossvcl-trial. получилось забавно (скриншот 1), но не совсем то что я хотел. GUI мне вообще никак не нужен. но в противном случае компоненты ведут себя странно если консольное приложение см скриншот 2. на топики не подписывается, т.е. подписка работает только если VCL и мы подписку в кнопке сделали, а не сразу после подключения к серверу(даже если добавить пазузу не помогает) (в кнсольном). не формируется GUID (скриншот 2) и вообще как то странно себя ведет ИМЕННО В КОНСОЛЬНОМ ПРИЛОЕЖЕНИИ хоть под линукс, хоть под Windows. только если VCL. как будто часть задач отрезали. ошибок не выводит,не понятно что происходит. код прилагаю. я не силен в дельфи- помогите. program LinuxMQTT; {$APPTYPE CONSOLE} {$R *.res} uses System.SysUtils, sgcWebSocket_Classes, sgcWebSocket_Client, sgcWebSocket, sgcWebSocket_Protocol_Base_Client, idGlobal, sgcWebSocket_Protocols, sgcWebSocket_Types, sgcWebSocket_Classes_Indy, sgcWebSocket_Protocol_MQTT_Client, sgcWebSocket_Protocol_MQTT_Message; Type OnMyPublish = Class procedure OnMQTTPublish(Connection: TsgcWSConnection; aTopic, aText: string); end; procedure OnMyPublish.OnMQTTPublish(Connection: TsgcWSConnection; aTopic: string; aText: string); begin writeln(aTopic+aText); end; var WSClient: TsgcWebSocketClient; MQTT:TsgcWSProtocol_MQTT_Client; MyPublish:OnMyPublish; begin WSClient:=TsgcWebSocketClient.Create(nil); WSClient.ConnectTimeout:=0; WSClient.TLS:=false; WSClient.Proxy.Enabled := false; WSClient.Proxy.Username := ''; WSClient.Proxy.Password := ''; WSClient.Proxy.Host := ''; WSClient.Port:=80; WSClient.Host :='192.168.1.40'; //40 WSClient.Authentication.Basic.Enabled:=false; WSClient.Authentication.Enabled:=false; WSClient.Authentication.User:=''; WSClient.Authentication.Password:=''; WSClient.Authentication.URL.Enabled:=true; WSClient.Authentication.Session.Enabled:=true; WSClient.Extensions.DeflateFrame.Enabled:=false; WSClient.Extensions.DeflateFrame.WindowBits:=15; WSClient.Extensions.PerMessage_Deflate.ClientMaxWindowBits:=15; WSClient.Extensions.PerMessage_Deflate.ClientNoContextTakeOver:=false; WSClient.Extensions.PerMessage_Deflate.Enabled:=false; WSClient.Extensions.PerMessage_Deflate.MemLevel:=1; WSClient.Extensions.PerMessage_Deflate.ServerMaxWindowBits:=15; WSClient.Extensions.PerMessage_Deflate.ServerNoContextTakeOver:=false; WSClient.ConnectTimeout:=0; WSClient.Extensions.DeflateFrame.Enabled:=false; WSClient.Extensions.DeflateFrame.WindowBits:=15; WSClient.NotifyEvents:=neAsynchronous; WSClient.IPVersion:=idGlobal.TIdIPVersion(Id_IPv4); WSClient.HeartBeat.Enabled:=false; WSClient.HeartBeat.Interval:=300; WSClient.HeartBeat.Timeout:=0; WSClient.NotifyEvents:=sgcWebSocket_Types.TwsNotifyEvent(neAsynchronous); WSClient.Options.FragmentedMessages:=frgOnlyBuffer; WSClient.Options.Origin:=''; WSClient.Options.Parameters:='/ws'; WSClient.Options.RaiseDisconnectExceptions:=True; WSClient.Specifications.Drafts.Hixie76:=false; WSClient.Specifications.RFC6455:=true; WSClient.ReadTimeout:=-1; WSClient.TLS:=false; MQTT:=TsgcWSPClient_MQTT.Create(nil); MyPublish:=OnMyPublish.Create; MQTT.OnMQTTPublish:=MyPublish.OnMQTTPublish; MQTT.Authentication.Enabled:=false; MQTT.Authentication.Password:=''; MQTT.Authentication.UserName:=''; MQTT.Client:=WSClient; MQTT.Guid:=''; MQTT.HeartBeat.Enabled:=true; MQTT.HeartBeat.Interval:=300; MQTT.Authentication.Enabled := false; MQTT.Authentication.UserName := ''; // requires username MQTT.Authentication.Password := ''; // requires username MQTT.LastWillTestament.Enabled:=false; MQTT.LastWillTestament.QoS:=mtqsAtMostOnce; MQTT.LastWillTestament.Retain:=false; MQTT.LastWillTestament.Text:=''; MQTT.LastWillTestament.Topic:=''; WSClient.Active := True; // MQTT.Connect; MQTT.Subscribe('tms/chat'); //получение инфы MQTT.Publish('tms/chat', '3333333', TmqttQoS(0), false); //раздача инфы end.
  9. fsdb

    Orange pi h5/h6 , Linux x64+Delphi?

    Ребята, извините. Я немного не точно написал. т.е. дельфи устанавливается под винду как обычно а просто уже подключаются через коннектор. я просто хочу понимать - удаленная отладка получится на этом процессоре? кто то писал что вот линукс отлаживать так нельзя, только андройд на ARM. а тут вроде другой процессор и хотелось бы понимать смогу ли я отлаживать. второй вопрос - а можно допустим отлаживать на виртуальной машине ,а готовый результат запускать на этом Orange pi h5 h6 ?
  10. fsdb

    MQTT под Ubuntu Server

    ну ничего. шишки набивать надо. ото так вас послушать так если ничего не выходит то надо все бросить))) жалко ответа по существу не дали. ну ок
  11. fsdb

    Linux платформа

    каким образом добавить Linux в список? (Multi device platform) в Target Platform нет . смотрел видео - где создавали прямо gui приложение.
  12. fsdb

    Linux платформа

    Vitaldj консольный режим на ubuntu server работает. значит дело за фреймоврком только?
  13. fsdb

    Linux платформа

    я смотрел это видео. как получилось добавить строчку Linux? или нужно выбрать консольное приложение а потом в нем можно добавить форму:???? объясните как повторить видео.? порядок?
  14. Не могу понять порядок действий/события которые нужно обрабатывать в Android. есть температура в значении Single и TrackBar . если температура еще не достигла определенного уровня то при попытке изменить значение в TrackBar - вывести предупреждение что есть опасность. Yes/Cancel что то такое. в каком событии обработать? какое событие срабатывает до того как еще пытаются только установить новое значение. не пойму как обработать
  15. fsdb

    пример отправки данных через USB

    Ребята, подскажите каким образом отправляются данные в USB. нужен пример рабочий. может где есть?
  16. Добрый день! Допустим я имеюследующую структуру как описана ниже, но не знаю заранее название тега - например firstName. как мне получить все названия тегов и их значения. спасибо { "firstName": "Александр", "lastName": "Юрьевич", "phoneNumbers": "812 123-1234" } g1:=0; while g1<=JS.Count-1 do begin body1:=JS.Pairs[g1].; //имя переменной //body2:=JS.GetValue(body1).Value; //значение переменной Synchronize(UpdateVariable); //передаем body1, body2 в тело функции inc(g1); end;
  17. fsdb

    MQTT на Android

    Ребята, нет ли у кого примера/информации по поводу MQTT клиента на Android. Спасибо.
  18. fsdb

    Как работать с Arduino по bluetooth?

    Добрый день. На андройде пытаюсь воять что нибудь что бы работало с моей arduino по bluetooch Со стороны ардуины проблем нет. я все спаял. как только подается питание - ардуина сразу шлет на блютух данные. моя задача принять их в андройде. я скачал для проверки из гугл плей маркета терминал и все ок- данные с ардуины в терминал чужого приложения идут. -hello word теперь пытаюсь сам что то сделать но я столкнулся с полным не пониманием как работает блютуз помогите хотя бы объяснить последовательность моих дествий. у меня есть включенный блютух на ардуине и его имя всегда hc-06. В настройках системы андройда я вбил пароль 1234 и все он показывается как сопряженное. теперь вопросы: 1. если я знаю имя блютуха (HC-06) то нужно ли мне в первый раз производить поиск этого устройства? 2. если я уже в настройках системы подключился к блютуху - нужно ли мне заново как бы в нутри моего приложения заново подключаться к нему? если да, то почему 3. как получать текст по блютузу с другого устройства? я понимаю например TCPIP/UP там есть onRead а тут.. не понятно. я смотрел примеры от стандартные по блютуху но они для меня оказались слишком сложными и ниодин из откомилированных примеров не смог получить данные с ардуино - (хотя чужое приложение с плей маркета смогло) помогите хотя бы псевдокодом. я не понимаю порядок моих действий. кто чем может. хелп.
  19. javac заменил на java -jar вроде бы и получил подробней текст ошибки. я могу ошибаться. уже не помню деталей
  20. у меня была проблема с явой. потом открыл гугл и оказывается именно с этой версией ничего не получалось. скачал другую
  21. Помогите! В Delphi 10.1 в проекте firemonkey пропало событие onDblClick в StringGrid, мне нужно что бы приложение в windows при двойном щелчке мышкой обработать событие. Дело в том что приложение под windows завязано особо с приложением под телефон и я не могу писать в VCL под windows
  22. понял что их перенесли. а как их восстановить только для приложения под windows 7 не совсем понимаю. подскажите пожалуйста.
  23. Добрый день! Не совсем понял - получается я заранее немогу что ли указать с каким паролем пытаться соединиться с bluetoch?? мне обязательно нужно вводить подтвержение????? Например у менять есть такой модуль от ардуины. я бы хотел скрытно подключиться к модулю с указанным паролем - передать ему цифру 1 и отсодениться.