Jump to content

Cristian Peța

  • Content Count

  • Joined

  • Last visited

  • Days Won


Cristian Peța last won the day on December 11 2020

Cristian Peța had the most liked content!

Community Reputation

61 Excellent

Technical Information

  • Delphi-Version
    Delphi 10.4 Sydney

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. I prefer that changing the SQL to simply close the dataset. Then possibly I want to set some parameters. I will open it again when all is ready. But sincerely I always call Close before changing SQL. If this is a documented behavior then it's OK but otherwise this can change anytime. I voted for the last. It's closer to what I prefer.
  2. Cristian Peța

    Physically reduce jpeg image size??

    If you don't want to compromise quality there is https://www.jpegmini.com/ There are some ways for developers to automate this but you can also buy a standalone app for 59$ and do it manually (first extract images to a folder then back to database). I think that with a free trial you can see how much it helps in your case.
  3. Cristian Peța

    need code to receive low memory warning

    Set an event handler: if TPlatformServices.Current.SupportsPlatformService(IFMXApplicationEventService, IInterface(AppEventService)) then AppeventService.SetApplicationEventHandler(My_ApplicationEventHandler); And in that event you will receive the warning: function TFormMain.My_ApplicationEventHandler(AAppEvent: TApplicationEvent; AContext: TObject): Boolean; begin case AAppEvent of TApplicationEvent.LowMemory: ; end; end;
  4. Cristian Peța

    take a look to this REST API Server

    I don't see the point. Delphi app is used only to serve Angular pages? What are the advantages over Angular own embedded HTTP server?
  5. Cristian Peța

    Range check error.

    If Count is 0 then Str[1] will trow a range check.
  6. Cristian Peța

    Using VMWare: what files remain on host?

    I start a new VM for every major app version and I want old versions to be stable. In this case I prefer to keep the sources in VMs. I don't write 3rd party components and I need only one Delphi version per my app version. It is easier so. When I start a new version I do a copy of the VM and all is there.
  7. Cristian Peța

    Has anyone tried running Delphi on Windows ARM?

    From what I understand from the article it's "the Arm version of Windows". No emulator. But this Windows can run x86 code, like Delphi IDE, most probably using an emulator.
  8. Cristian Peța

    How to kick TDataset to filter record(s)

    Yes, whole dataset, but how match it takes? What do you want to optimize? Do you keep in memory more than some thousands records?
  9. Cristian Peța

    How to kick TDataset to filter record(s)

    DataSet.Filtered := False; DataSet.Filtered := True; Is working for me when using OnFilterRecord event.
  10. Cristian Peța

    Intraweb/MS SQL/FireDAC app Azure deployment problem...

    I use UniDAC and in such a case I would use DBMonitor to see what queries are send to the server. I don't know if FireDAC has something like this but from what I know, if I'm not mistaken, you can see failed queries also in Azure.
  11. Cristian Peța

    Trying to share a text file

    This "image/text/plain" is strange for me. You can try this. This will enable share for image and text. If you need only text delete the "image/* " This setType() will filter the applications that supports that type.
  12. Cristian Peța

    Several F2084 Internal Error on Delphi 10.4.2

    Then not the memory limit is the problem. I think I had something similar but long time ago I starter to avoid compile and use build almost every time. It is better to wait 10-15 seconds (in my case) than to fight with these issues. If I remember well this started for me about ten years ago when iOS was first introduced as a new platform.
  13. Cristian Peța

    Trying to share a text file

    And what if you omit this line? Intent.setPackage(StringToJString('com.whatsapp'))
  14. Cristian Peța

    Several F2084 Internal Error on Delphi 10.4.2

    If "Use MSBuild externally to compile" helps then probably you have reached the memory limit. You can see in Task Manager if Delphi is approaching 4 GB limit. I have for example 534 MB after a build of 330k LOC.
  15. To send text you could use this function. If the previous change fixed the issue I suppose this will also fix it without to change anything else. You could also store binary data in AnsiString but I would not do this. It's better to use TBytes for this. procedure TThermalPrinter.SendString(AValue: AnsiString); var SND: TBytes; begin SetLength(SND, Length(AValue)); CopyMemory(@SND[0], @AValue[1], Length(AValue)); LSockect.SendData(SND); // send data to the printer end; And better this in TThermalPrinter.DoPrintBitmap() vTempStr : AnsiString;