firemonkey

Delphi: How to Get All Images From Server Database by using App tethering?

有些话、适合烂在心里 提交于 2019-11-29 18:21:37
Hi, EveryBody! I've Client and Server . I'm using Delphi-xe8. App ->Multi-Device Application Both Client and Server are using App tethering, SQLite Database. When Server adding image to database, it's perfectly adding, but In a Client side when Client click "Get Image List" button . Client Recieve only one image [I want All images]. 1. Quation: How to get All images from Server Database to Client Database. by using App tethering[SendStream]? I think Problem with AResource.Value.AsStream need to Splite, How...??? 2. Quation: How to copy all Images From Server Database and save on Client Created

How to Get Images From Server using App Tethering

不打扰是莪最后的温柔 提交于 2019-11-29 17:32:51
I've 2 Apps Let's call Server And Client. I'm using Delphi-xe8. App ->Multi-Device Application In Both Side using: App tethering[tManager,tAProfile], SQLite Database. In Server SQLite Database I've 6 images. I would like to View that images In Client Side. In Client Side I've 6 [TImage]. When I Click Button 'Get Image List' I'm getting 6 images with the same view. I would like 6 images view differently.->[Get From Server Database] Client "Get Image List" button Code: procedure TForm1.GetImgLstClick(Sender: TObject); begin tAProfile.SendString(tManager.RemoteProfiles.First,'GetImages',''); end;

How to create splashscreen in FireMonkey?

隐身守侯 提交于 2019-11-29 15:22:57
I need to create a splashscreen while my FMX program is launching. The following code from VCL does not works anymore: SplashScreen := TSplashScreen.Create(Application); SplashScreen.Show; Application.Initialize; SplashScreen.Update; //No such function in FMX Application.Run; Problem is that in FMX forms are not created/repainted until Application.Run executed, as they use some FMX magic to repaint. Using VCL splashscreen is not an option since I need OSX support. How do I create a splashscreen in Delphi XE2 FireMonkey project? This works - the difference being that the Application isn't made

Firemonkey TControl subclass cannot draw on component

百般思念 提交于 2019-11-29 14:52:01
I want to try to create a firemonkey visual component and I have seen online that TControl gives the basic needs. This is what I have done so far: TMyTest = class(TControl) strict private //code... protected procedure Paint; override; public constructor Create(AOwner: TComponent); override; destructor Destroy; override; //code... end; I have looked at the source code of a FMX component called PlotGrid and I have copied what it does. My class descends from TControl (like PlotGrid) and it overrides Paint (like PlotGrid). Look at the code: constructor TMyTest.Create(AOwner: TComponent); begin

Firemonkey: Adding a font from resource to memory and using it

▼魔方 西西 提交于 2019-11-29 13:40:27
问题 In VCL , I could load a font from resource and without saving it I could use it from memory. Here is the code I use and it works in VCL : procedure TForm1.Button1Click(Sender: TObject); var ResStream : tResourceStream; FontsCount : DWORD; begin ResStream := tResourceStream.Create(hInstance, 'MyResourceName', RT_RCDATA); winapi.windows.AddFontMemResourceEx(ResStream.Memory, ResStream.Size, nil, @FontsCount); ResStream.Free(); button1.Font.name := 'MySavedFontNameInResource'; end; In Firemonkey

MessageDlg with custom button captions in Delphi FireMonkey

a 夏天 提交于 2019-11-29 12:56:26
With VCL you can use CreateMessageDialog to generate a message dialog with custom button captions . With FMX CreateMessageDialog does not seem to exist anymore (since XE3). Is there a way to customize the button captions with FireMonkey other than rebuilding the message dialog from scratch? What I would like to be able is to call a function as described here : MessageDlg( 'Really quit application ?', mtWarning, [ButtonInfo(mbNo, 'Do&n''t save'), ButtonInfo(mbCancel, '&Cancel'), ButtonInfo(mbYes,'&Save')], mbYes ); In short, no. You don't have access to the actual dialog, like you do in VCL.

FireMonkey Performance Issues

|▌冷眼眸甩不掉的悲伤 提交于 2019-11-29 09:27:57
问题 I am using Delphi XE2 with update 4 hotfix 1 My default FMX app is stating very slow and on event it is freezing for a while. Eg: when i click on a button, the whole application freezes for some seconds(but only for the first execution of that event). So i thought it might be a GPU problem and edited my default Dpr file as ; uses FMX.Forms, fmx.Types,.. {$R *.res} begin Application.Initialize; GlobalUseHWEffects := False ; GlobalUseDirect2D := False ; GlobalUseDirect2DSoftware := False ;

Best strategy for too many Elements in FireMoneky TListView Item [duplicate]

人走茶凉 提交于 2019-11-29 08:55:10
This question already has an answer here: Create a customized Item Appearance for ListView Delphi XE7 1 answer Believe me I did my homework before reaching out for help. I spent last 3 days searching and reading but I couldn't come to a solution. So any help will be highly appreciated. My task is to have a ListView connected to a Dataset where the ListView Item is of the following structure: Bear in mind that Elements 4, 6, & 8 are of fixed values & Color (i.e. labels) Colors of Elements 1 & 10 depends on values of Elements 5, 7, & 9 Best what I got is references to Delphi Standard Example

Delphi android application is raising issue in Lennova A5000 mobile

旧城冷巷雨未停 提交于 2019-11-29 07:56:14
I'm using Delphi 10 Seattle trail version for developing mobile application. And I tried to create new android mobile application which contains only TEditBox. And then compiled by setting the option as "Release". Then, generated the .apk file and then provided the file to the user. And when the user tried to click the edit box, the application raises the error message that " The Appname is not responding ". The user is using the Lennova A5000 and the Os is Android 5.0.2. And the same application is running in my Moto g2 (5.0.2) and Micromax Yureka. Please provide me is there any solution.

How to save a file on Android? (Firemonkey)

混江龙づ霸主 提交于 2019-11-29 06:18:28
How can I save a file locally on an Android device, using Delphi (XE5, Firemonkey)? Something as simple as Memo.Lines.SaveToFile('test.txt') does not seem to work. It results in the following error message: "Cannot create file "/test.txt". Not a directory." According to the document Creating an Android App , get the documents path like this: System.IOUtils.TPath.GetDocumentsPath + System.SysUtils.PathDelim + 'myfile'; user3015173 Instead of using System.SysUtils.PathDelim , you may use System.IOUtils.TPath.Combine(System.IOUtils.tpath.getdocumentspath,'test.txt'); Combine chooses between the