Jump to content

Cristian Peța

  • Content Count

  • Joined

  • Last visited

  • Days Won


Cristian Peța last won the day on December 2 2019

Cristian Peța had the most liked content!

Community Reputation

38 Excellent

Technical Information

  • Delphi-Version
    Delphi 10.3 Rio

Recent Profile Visitors

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

  1. Cristian Peța

    Detect Windows shutdown?

    Here is @David Heffernan's response: https://stackoverflow.com/questions/25536216/delphi-prevent-application-shutdown
  2. Cristian Peța

    Detect Windows shutdown?

    I must repeat: this is documented and is working "as designed" If you want an other behavior and don't want to do what documentation says the you need to find an other OS. Documentation says: "If your application must block or postpone system shutdown, use the ShutdownBlockReasonCreate function." Then when you are finished use ShutdownBlockReasonDestroy.
  3. Cristian Peța

    Detect Windows shutdown?

    This is not just a message. You are waiting for the user to press You or No. And in this time you are not returning to the OS. Then the OS will simply kill you app.
  4. Cristian Peța

    Detect Windows shutdown?

    This is documented here (read Remarks): https://docs.microsoft.com/en-us/windows/win32/shutdown/wm-queryendsession If you really need to stop the shutdown: "Each application should return TRUE or FALSE immediately upon receiving this message" So you must return immediately, not showing a message and wait... But... "Applications should respect the user's intentions and return TRUE" If possible it's better to save data in other place and next time you app is running again ask the user if he want to keep this data. Or even better, if you can, restore the app state exactly how it was at shutdown and you don't need to ask anything. The user will see your app exactly how it was at shutdown. That's how mobile app are supposed to work but it's nice also for desktop.
  5. Cristian Peța

    Mixed resources type 12

    You are right, I didn't noticed. I made this procedure in a hurry from my code and there I need to save to a stream.
  6. Cristian Peța

    Mixed resources type 12

    Then probably what I proposed (to adapt the component from FMX to VCL) is also too difficult for you. uses Vcl.Imaging.pngimage; procedure SaveBitmapToPNG(ABitmap: TBitmap; const AFileName: String; ACompresionLevel: Integer = 7); var img: TPngImage; strm: TFileStream; begin img := nil; strm := TFileStream.Create(AFileName, fmCreate); try img := TPngImage.Create; img.CompressionLevel := ACompresionLevel; img.Assign(ABitmap); img.SaveToStream(strm); finally strm.Free; img.Free; end; end; Here TBitmap is a Vcl.Graphics.TBitmap
  7. Cristian Peța

    Mixed resources type 12

    TCameraComponent is using FMX.Graphics.TCanvas and you should replace with Vcl.Graphics.TCanvas and so on. Look what TCameraComponent is doing and do the same using Vcl units. Some things are not the same but with some work I think it should be doable.
  8. Cristian Peța

    Mixed resources type 12

    Accessing camera has nothing to do with VCL or FMX. It should be feasible to copy what FMX.Media.TCameraComponent is basically doing (trimming all the FMX part) and make you own simple component for VCL. At least that's what I would do.
  9. Cristian Peța

    Difference between Pred and -1

    I would like to have List.High or List.HighIndex or List.LastIndex or whatever. Why to write every time -1 when you want the last index?
  10. Cristian Peța

    Random Access Violation?

    I don't understand. Have you reproduced this on your machine? Then you can debug and see the call stack. If not, then as @Lars Fosdal said: get MadExcept or EurekaLog and don't waste your time. I dot't know how EurekaLog is but with MadExcept you need only to install it and check the checkbox that you want it in your app. That's all. Then you will have a full call stack to see where this happens in your code.
  11. Cristian Peța

    Using Delphi in Virtual machine for a month

    I enabled out of curiosity the Hyper-V and shut myself in the foot because this enabled Credential Guard. VMware doesn't run with Credential Guard enabled. I lost an hour to turn it off.
  12. Cristian Peța

    Set a PC environment based on a Country name..

    Don't use date as string in SQL filters. Pass dates as parameters. That calendar component should give you the date as TDate or something, not string.
  13. Cristian Peța

    FastReports VCL 6 - worst ever installation experience

    It's easy with Web Installer. In menu Tools->Manage Platforms... Do you installed from ISO?
  14. Cristian Peța

    What is the best way LoadFromFile & Thread? (FMX)

    What if somewhere this BitmapListAnimation1 is used while you call LoadFromFile? We don't see your code so what advice do you expect?
  15. Cristian Peța

    JFF: FMX + FR + HTML

    I think to get rid of RTF so I can go cross-platform but from your website I don't see how much is subscription.