Jump to content


  • Content Count

  • Joined

  • Last visited

  • Days Won


Fritzew last won the day on July 10 2019

Fritzew had the most liked content!

Community Reputation

44 Excellent

Technical Information

  • Delphi-Version
    Delphi 10.2 Tokyo

Recent Profile Visitors

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

  1. Fritzew

    VCL Handling of dpi changes - poor performance

    In short: Yes
  2. Fritzew

    Improving type safety

    Look at this: program Project20; {$APPTYPE CONSOLE} {$R *.res} uses System.SysUtils; type TVectorD3 = record x, y, z: Double; end; TDirection = type TVectorD3; {$WARN UNSAFE_CAST ON} procedure Test; var V: TVectorD3; D: TDirection; begin V := default (TVectorD3); D := TDirection(V); end; begin try Test; except on E: Exception do Writeln(E.ClassName, ': ', E.Message); end; end. Will also produce a Warning. So if you enable UNSAFE_CAST there will be a lot of Warnings. And every place surround with a {$WARN UNSAFE_CAST OFF} is a bad Idea But I'm with Stefan here. A new Warning for Pointer Assignment would be fine.
  3. Fritzew


    What is the usecase? sorry for asking, but I want to understand....
  4. I would declaree it all as types so t type Pmedia_track_t = libvlc_media_track_t^; PPmedia_track_t = ^Pmedia_track_t; and then function libvlc_media_tracks_get(p_md : libvlc_media_t_ptr; var tracks : PPmedia_track_t) : LongWord; cdecl; procedure libvlc_media_tracks_release(tracks : PPmedia_track_t; i_count : LongWord ); cdecl; use as: var LTracksPtr : PPmedia_track_t; LTrackUse : Pmedia_track_t; LTracks : libvlc_media_track_t; // a record LCount : int32; begin LCount := libvlc_media_tracks_get( FVLCMIntf, LTracksPtr ); // FVLCMIntf is just (an initialised) pointer LTrackUse := LTracksPtr^; LTracks := LTrackUse^ ; // The above will point to the first record you can increment for the following or use a Array[0..0] of Pmedia_track_t libvlc_media_tracks_release( LTracksPtr, LCount ); // should work end;
  5. Fritzew

    Delphi and Parallels for Mac

    with Parallels 16.1 and Big-Sure I don't see the problem anymore. But my Setup is a external Magic Trackpad and Keyboard. Settings for Keyboard and Mouse in Parallels id automatic Game detection
  6. Simply remove the keybinding in the MMX Settings.
  7. I'm using Spring4D all the time. Run the Test without debugger...... for me It is one of the best, correction, the best library for Delphi.
  8. Fritzew

    Delphi 10.4.1 and the IDE FIx Pack

    You have never worked with C++ ? I don't think we will see it before a CE
  9. Fritzew

    Analyze interbase slow queries

    I would recommend https://www.upscene.com Using it since years. Love it, but I see now I should really upgrade to the latest Version of the Workbench
  10. What are you smoking? Maybe you as technician should lern to read the docs? http://docwiki.embarcadero.com/Libraries/Rio/en/FMX.Grid.TStringGrid_Properties
  11. Why using a finally here and not an except block? Then you will only free it if there is a Exception.
  12. Yes, it was one of the best moves we have done. The Layout-Control is a amazing component. We have refactored a big application to it (around 300 Forms) and it that has solved all of the problems with High-DPI. But the best, all of the translations problems, length of text's in label's etc are gone now. We supporting 7 languages.
  13. Fritzew


    Hello all, is the a working actual modbus tcp implementation around? Got a new project to work on for a cnc. To be honest I have never used modbus myself so I'm don't know
  14. Fritzew

    Sourcetrail support for Delphi

    Wow, i was playing with this tool now for an hour or so, using a large c++ project. Amazing work