slav_z

блин, рассмотрите мою кандидатуру....

повторил ваш код, у меня все работает (delphi 10.3.3): Нужен пример неработающего кода. Попробуйте сделать минимальное приложение со своими классами и выложить сюда.

Parent назначен? покажите код...

ну как так то? условная компиляция! посмотрите в исходных кодах дельфи... там куча примеров... КУЧА!!!

для начала попробуйте настроить подключение через мастер подключения в designtime... когда получится... откройте форму как текст (fmx) и посмотрите что там и как указано для подключения... повторите то же самое в runtime...

очень может быть что и так... жмите F9... ошибка? не беда... что за ошибка?

используйте другой перегруженный метод Post().. например так:

да

вот ответ на ваш вопрос а с визуальными элементами всегда работайте только из основного потока, иначе, в лучшем случае, будет работать через раз (в вашем TMemo текст то будет отображаться, то нет...) а под андроид вообще будет (должна) ошибка вываливаться...

+ uses FireDAC.Phys.ODBC, FireDAC.Phys.ODBCDef... скорее всего...

FDConnection1.Params.AddPair('ODBCAdvanced','123456'); я сам не пробовал... но вдруг получится..

вот типизированные: function TForm2.bdconected(s2: string; s1: TFDQuery; s: TFDConnection): string;

если бы были типизированные, то не пришлось бы делать это: if s is TFDConnection then begin TFDConnection(s).Params.DriverID:=

зачем у вас тут нетипизированные параметры? сделайте два разных метода и не будет такой каши. function bdconected(s2:string;s1,s{,sd}: TObject): string;

if Assigned(FHTTPClient) then FHTTPClient.Free; замените на просто FHTTPClient.Free

минимальный код: unit Unit1; interface uses System.SysUtils, System.Types, System.UITypes, System.UIConsts, System.Classes, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Objects, FMX.TextLayout; type TForm1 = class(TForm) Text1: TText; procedure Text1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Single); procedure Text1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Single); procedure Text1Painting(Sender: TObject; Canvas: TCanvas; const ARect: TRectF); procedure FormCreate(Sender: TObject); private Range: TTextRange; function TextLayout: TTextLayout; public function GetSelectedText: string; end; var Form1: TForm1; implementation {$R *.fmx} procedure TForm1.FormCreate(Sender: TObject); begin Text1.AutoCapture:=True; end; type TTextAccess = class(TText); function TForm1.TextLayout: TTextLayout; begin Result:=TTextAccess(Text1).Layout; end; function TForm1.GetSelectedText: string; begin Result:=Text1.Text.Substring(Range.Pos,Range.Length); end; procedure TForm1.Text1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Single); begin Range.Pos:=TextLayout.PositionAtPoint(PointF(X,Y)); Range.Length:=0; Text1.Repaint; end; procedure TForm1.Text1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Single); begin if Text1.Pressed then begin Range.Length:=TextLayout.PositionAtPoint(PointF(X,Y))-Range.Pos; Text1.Repaint; end; end; procedure TForm1.Text1Painting(Sender: TObject; Canvas: TCanvas; const ARect: TRectF); begin Canvas.Fill.Color:=claSilver; Canvas.Fill.Kind:=TBrushKind.Solid; for var R in TextLayout.RegionForRange(Range,False) do Canvas.FillRect(R,0,0,AllCorners,1); end; end. textselected.zip

https://fgx-native.com/ru/push-notifications.html это документация по fgx... но думаю без разницы... сам не пробовал...

спасибо, ща попробую разобраться...

спасибо.. но перед решением "в лоб"... хотелось бы узнать как поступают другие программы... написанные не на delphi....

для консольного приложения линукс можно указать версию (и прочее), но это не попадает в готовый файл... никто не знает? что можно сделать? чтобы программа смогла узнать свою версию.... (мои знания по линуксу - минимальные... гуглил - фигня какая то)

там не будет тормозов.... я на Java не пишу, но на Java очень много готового кода в интернете...

Formatter.zip 10.3.3

вроде правильно... только ошибки в английских словах исправьте (Catolog)... если тормоза есть - это уже fmx (еще очень далеко до совершенства)..... тут или смириться или искать собственные пути отображения списков...

загружаются стили в элементы списков (по-умолчанию они загружаются когда надо в первый раз нарисовать элемент...) попробуйте использовать BeginUpdate перед созданием и EndUpdate после... (вообще всегда используйте эти методы при создании списков на экране)

если кто не знает или лень искать, то пароль на хранилище ключей debug.keystore: android