Перейти к содержанию
Fire Monkey от А до Я

fsdb

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

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

  • Посещение

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

    3

fsdb стал победителем дня 29 октября 2016

fsdb имел наиболее популярный контент!

Посетители профиля

1 708 просмотров профиля

Достижения fsdb

  1. fsdb

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

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

    переход на tokio

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

    переход на tokio

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

    MQTT под Ubuntu Server

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

    Orange pi h5/h6 , Linux x64+Delphi?

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

    Orange pi h5/h6 , Linux x64+Delphi?

    Ребята подскажите на Orange pi h5 h6 - под Linux можно компилировать свои приложения? Марка процессора:Allwinner, CPU:H5 Quad-core Cortex-A53 64bit
  9. fsdb

    MQTT под Ubuntu Server

    ну ничего. шишки набивать надо. ото так вас послушать так если ничего не выходит то надо все бросить))) жалко ответа по существу не дали. ну ок
  10. 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.
  11. fsdb

    Linux платформа

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

    Linux платформа

    я смотрел это видео. как получилось добавить строчку Linux? или нужно выбрать консольное приложение а потом в нем можно добавить форму:???? объясните как повторить видео.? порядок?
  13. fsdb

    Linux платформа

    каким образом добавить Linux в список? (Multi device platform) в Target Platform нет . смотрел видео - где создавали прямо gui приложение.
  14. Не могу понять порядок действий/события которые нужно обрабатывать в Android. есть температура в значении Single и TrackBar . если температура еще не достигла определенного уровня то при попытке изменить значение в TrackBar - вывести предупреждение что есть опасность. Yes/Cancel что то такое. в каком событии обработать? какое событие срабатывает до того как еще пытаются только установить новое значение. не пойму как обработать
×
×
  • Создать...