firemonkey-fm3

How to show a secondary form on taskbar using FMX C++?

廉价感情. 提交于 2020-01-06 23:43:42
问题 I'm with a little problem when trying to show more than one form on taskbar on the same time. I found I need to use the following: WS_EX_APPWINDOW So I search a little bit more about and then found it: class TForm2 : public TForm { __published: // IDE-managed Components private: // User declarations public: // User declarations __fastcall TForm2(TComponent* Owner); void __fastcall CreateParams(Controls::TCreateParams &Params); }; void __fastcall TForm2::CreateParams(Controls::TCreateParams

How to show a secondary form on taskbar using FMX C++?

孤街醉人 提交于 2020-01-06 23:43:14
问题 I'm with a little problem when trying to show more than one form on taskbar on the same time. I found I need to use the following: WS_EX_APPWINDOW So I search a little bit more about and then found it: class TForm2 : public TForm { __published: // IDE-managed Components private: // User declarations public: // User declarations __fastcall TForm2(TComponent* Owner); void __fastcall CreateParams(Controls::TCreateParams &Params); }; void __fastcall TForm2::CreateParams(Controls::TCreateParams

How to show a secondary form on taskbar using FMX C++?

左心房为你撑大大i 提交于 2020-01-06 23:43:13
问题 I'm with a little problem when trying to show more than one form on taskbar on the same time. I found I need to use the following: WS_EX_APPWINDOW So I search a little bit more about and then found it: class TForm2 : public TForm { __published: // IDE-managed Components private: // User declarations public: // User declarations __fastcall TForm2(TComponent* Owner); void __fastcall CreateParams(Controls::TCreateParams &Params); }; void __fastcall TForm2::CreateParams(Controls::TCreateParams

scrolling vs selecting delphi XE6

徘徊边缘 提交于 2019-12-25 03:26:23
问题 I have a gridpanellayout that has about 16 rows and 5 columns. Each field has, for example a TRectangle set to TalignLayout.Client.. Each rectangle has an onclick event that performs an action ( e.g., highlighting the clicked rectangle by changing its color ). With 16 rows, my gridpanel exceeds the height of a user device such as an iPhone, and so i have the Grid placed on top of a VerticalScrollbox. What would be the best way to decipher between a user using a finger to scroll, vs using

Livebinding JSON objects and arrays

回眸只為那壹抹淺笑 提交于 2019-12-22 18:18:25
问题 Good evening all. I'm currently trying to get to grips with livebindings in Delphi as I'd like to refresh one of my current projects (complete rework from the base for the purpose of pushing to other platforms, optimizing performance and minimizing the code). I'm working with a web API which returns JSON data. The returned JSON format for one example call would look like this; { "response": { "ips": [ { "ip": "111.222.333.444", "classification": "regular", "hits": 134, "latitude": 0.0000,

How to make my own dialog component from Firemonkey TPopUp?

穿精又带淫゛_ 提交于 2019-12-12 02:50:20
问题 [Delphi XE5 Up2] I am trying to use TPopUp to inherit and create a component, following the same idea as exposed on the Flyouts demo for the CalendarFlyout. I will be not using the Calendar, but I want that space free so that I can place any other FMX component that I want. I have made the component using the new component wizard and added some controls: unit PopupTest; interface uses System.SysUtils, System.Classes, FMX.Types, FMX.Controls, FMX.Layouts, FMX.StdCtrls; type TPopupTest = class

Firemonkey iPad waiting icon

雨燕双飞 提交于 2019-12-11 18:12:44
问题 I've got two tabs on my application. Both of them have a table - one for input and one for output. When the tab for the output table is activated, a process is triggered which analyze the data and populated the output grid. The output grid takes a few seconds to render and I would like to display some animated icon. I have tried a TImage with a TFloat animation as well as the TAniIndicator. Both of them seems to freeze while the analyze process is running. 回答1: Sounds like you have single

Image canvas drawing ends up on form instead

二次信任 提交于 2019-12-11 05:28:21
问题 I'm trying to draw some custom shapes on the canvas of a TImage, but the output ends up on the TImage parent form's canvas instead. It appears I have to convert my points from local to absolute to make this work, but that causes problems too. See example: Does anyone know why Image.Canvas.DrawArc (etc) draws relative to the parent form instead of relative to the Image? If I go through the trouble of .LocalToAbsolute... why does the arc look so different? The project is simple: Firemonkey HD

Livebinding JSON objects and arrays

三世轮回 提交于 2019-12-06 08:40:04
Good evening all. I'm currently trying to get to grips with livebindings in Delphi as I'd like to refresh one of my current projects (complete rework from the base for the purpose of pushing to other platforms, optimizing performance and minimizing the code). I'm working with a web API which returns JSON data. The returned JSON format for one example call would look like this; { "response": { "ips": [ { "ip": "111.222.333.444", "classification": "regular", "hits": 134, "latitude": 0.0000, "longitude": 0.0000, "zone_name": "example.com" }, { "ip": "555.666.777.888", "classification": "regular",

How to convert strings to array of byte and back

ぃ、小莉子 提交于 2019-11-30 12:17:50
4I must write strings to a binary MIDI file. The standard requires one to know the length of the string in bytes. As I want to write for mobile as well I cannot use AnsiString, which was a good way to ensure that the string was a one-byte string. That simplified things. I tested the following code: TByte = array of Byte; function TForm3.convertSB (arg: string): TByte; var i: Int32; begin Label1.Text := (SizeOf (Char)); for i := Low (arg) to High (arg) do begin label1.Text := label1.Text + ' ' + IntToStr (Ord (arg [i])); end; end; // convert SB // convertSB ('MThd'); It returns 2 77 84 104 100