firemonkey

Android and Application.ProcessMessages

*爱你&永不变心* 提交于 2021-02-19 06:34:05
问题 i have application where I'm using form as message box, in this "message box" i run thread that changing messages on it and after thread finish, on message box i show buttons, only after clicking on button code can continue var FStart: TFStart; VariableX:Boolean; implementation uses UApp,UMess; {$R *.fmx} procedure TFStart.Button2Click(Sender: TObject); begin VariableX:=false; { There i show window and start thread after finish thread set VariableX as true and close form } // There i need to

How to make an edit control in fmx transparent and hide its border?

柔情痞子 提交于 2021-02-18 17:12:42
问题 How can I make an edit control in fmx transparent and at the same time hide the borders of the control, so it will blend into the control in the back? What I am trying to do is to make a small Notes program where, when I double-click a tabitem, it shows an edit control to change the text of the tabitem. 回答1: Right click the edit control (let's say Edit1) and click 'Edit Custom Style'. Expand 'edit1style1'. Click background:TActiveStyleObject. Clear the SourceLookup property. 来源: https:/

How to make an edit control in fmx transparent and hide its border?

我们两清 提交于 2021-02-18 17:11:05
问题 How can I make an edit control in fmx transparent and at the same time hide the borders of the control, so it will blend into the control in the back? What I am trying to do is to make a small Notes program where, when I double-click a tabitem, it shows an edit control to change the text of the tabitem. 回答1: Right click the edit control (let's say Edit1) and click 'Edit Custom Style'. Expand 'edit1style1'. Click background:TActiveStyleObject. Clear the SourceLookup property. 来源: https:/

Get the Middle/Beginning/End arabic char in string

有些话、适合烂在心里 提交于 2021-02-16 05:29:51
问题 Most of the Arabic letters have multiple contextual forms for example the latter ب has general unicode 0628 . But if latter come in the beginning of word will take this form بـ‎ unicode FE91 . Middle = ـبـ‎ unicode FE92 . End of the word = ـب‎‎ unicode FE90 . I'm trying to get the char code but i always get the general unicode. procedure TfMain.btn2Click(Sender: TObject); const Str = 'يبداء'; Ch = 'ب'; begin ShowMessage(IntToHex(Ord(Ch), 4)); // return 0628 - Correct ShowMessage(IntToHex(Ord

How to use 3rd party framework depends from dylib for IOS in Delphi Firemonkey

荒凉一梦 提交于 2021-02-11 07:16:51
问题 I'm using 3rd-party SDK, presented as libXXX.a, that needs libstdc++.dylib libz.dylib 15/05/2017 ANSWER. Finally I have found a time to write down my solution. If your 3rd party SDK depends from some dynamic libraries, do this: For example dynamic library is called as "libSuperLibrary.dylib". For example 3rd party SDK is called as "SuperFramework.framework". Go to "Project - Options - Delphi Compilier - Framework Search Path" Fill the field by path to your framework like "C:\path\to\my

Custom grid in firemonkey

孤街醉人 提交于 2021-02-11 07:10:40
问题 We are merging current vcl applications to Firemonkey. The current biggest issue is to create a tgrid with some custom columns. I need a column with a combobox cells as well as a column with multiple check boxes in each cell. 回答1: Take a look at my post http://monkeystyler.com/blog/entry/firemonkey-grid-basics-custom-cells-and-columns which explains the basics of FireMonkey grids and how to create custom columns. And here's another post which uses generics to create a column for any component

Custom grid in firemonkey

戏子无情 提交于 2021-02-11 07:07:11
问题 We are merging current vcl applications to Firemonkey. The current biggest issue is to create a tgrid with some custom columns. I need a column with a combobox cells as well as a column with multiple check boxes in each cell. 回答1: Take a look at my post http://monkeystyler.com/blog/entry/firemonkey-grid-basics-custom-cells-and-columns which explains the basics of FireMonkey grids and how to create custom columns. And here's another post which uses generics to create a column for any component

Remove Android app border with FireMonkey

て烟熏妆下的殇ゞ 提交于 2021-02-11 06:22:57
问题 I create an Android app with FireMonkey (10.2.2), but I don't understand why I have a top and right white border. I never added that to my app. I started to create an example app, just a black form with a black TRectangle without sides. I don't have to code anything, just design. When I compile for Windows, it's OK. I have this border only on Android. I get this result: You can download the example project here : Click Here to Download 回答1: I was having the exact same problem when adding a

Delphi FMX TCheckbox/TRadiobutton Autosize

痞子三分冷 提交于 2021-02-10 06:46:26
问题 I want dynamically created Checkboxes and Radiobuttons (in FMX, not VCL) with a fixed Width to change their Heigth based on their containing text. My Checkboxes and Radiobuttons have WordWrap enabled. So I want to get something like the TLabel does, when AutoSize and WordWrap are enabled. I've already managed to get close to this: procedure TFMenu.Button1Click(Sender: TObject); var ctr: Integer; hostingComponent: TComponent; begin hostingComponent := Form1; { in my case a Frame or Panel or

Import IORegistryEntrySearchCFProperty from Macapi.IOKit in Delphi for OSX64

拥有回忆 提交于 2021-02-09 10:42:31
问题 I used this import definition in OSX32 successfully: uses MacApi.ObjectiveC, MacApi.Foundation, Macapi.CoreFoundation, Macapi.Mach, Macapi.IOKit; type io_iterator_t = io_object_t; io_name_t = array[0..127] of AnsiChar; function IORegistryEntrySearchCFProperty(entry: io_registry_entry_t; plane: io_name_t; key: CFStringRef; allocator: CFAllocatorRef; options: IOOptionBits): CFTypeRef; cdecl; external libIOKit name _PU + 'IORegistryEntrySearchCFProperty'; function IOServiceGetMatchingServices