Jump to content


  • Content Count

  • Joined

  • Last visited

  • Days Won


Fritzew last won the day on July 10

Fritzew had the most liked content!

Community Reputation

40 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

    Sourcetrail support for Delphi

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

    Code formatter in CnPack

    There could be done a lot in the language: In Elements: case myControl of Button: writeln("Looks like a button!"); CheckBox: writeln("This one's a checkbox"); else writeLn("No ide what this is!?"); end; or something like: var i: Integer; var s := case i of 0: 'none'; 1: 'one'; 2: 'two'; 3..5 : 'a few'; else 'many'; end; I like it. If somebody is interested in what can be done look at https://docs.elementscompiler.com/Oxygene/Language/ Using Elements a lot these days, it is always a shock come back to Delphi.... Not speaking about Lambdas..... Delphi: for item in List.Where( function(part : TPart): boolean begin result := part.isVisible; end ) do; Elements: for each item in List.Where(part -> part.isVisible) do;
  3. Fritzew

    With's the deal with "With"?

    Yes, please! proper namespacing like in Remobjects.Elements would be ...........
  4. Fritzew

    Spring4d and Rio

    It is in the master since sept 03 2018. Maybe you should update your clone?
  5. Fritzew

    Component Compatibility 10.3.2 vs. 10.3.1?

    For Devexpress it will work..... But if you want to go sure just use their installer and recompile
  6. Fritzew

    Overflow in Compile

    You are right and I I need a break for sure..... int32max := Int64(MaxInt) + 1; // will work Shame on me
  7. Fritzew

    Overflow in Compile

    Delphi 10.3.2 This code will not compile! Stripped down from a TestSuite for our codebase. Can't believe it. program Project17; {$APPTYPE CONSOLE} {$R *.res} uses System.SysUtils; Procedure Test; var int32max: Int64; begin int32max := MaxInt + 1; //Error here writeLn(Format('Integer %20d', [int32max])); writeLn(Format('Integer %20u', [-int32max])); end; begin try Test; readln; except on E: Exception do writeLn(E.ClassName, ': ', E.Message); end; end. Error (in German) [dcc32 Fehler] Project17.dpr(13): E2099 Überlauf bei Konvertierung oder arithmetischer Operation
  8. There is a commit from yesterday on Bitbucket, so I think you should update......
  9. Fritzew

    On The Design Of Uses Clauses

    Yes this look like a nightmare, if you want to parse the source and not only create a AST
  10. Fritzew

    Funny Code in System.Types

    You are completely wrong here.... It will never work...... procedure TestSmall; var lPoint : TPoint; sPoint : TSmallPoint; begin sPoint := default(TSmallPoint); lpoint.x := 255; lpoint.y := 255; writeln('lPoint.x: '+lPoint.x.ToString+ ' lPoint.y: '+lPoint.y.ToString); sPoint := TSmallPoint(lpoint); writeln('sPoint.x: '+sPoint.x.ToString+ ' sPoint.y: '+sPoint.y.ToString); end; Compile and run.......
  11. Fritzew

    Funny Code in System.Types

    Thanks Remy, not only for this also of your work over all the years now
  12. Found today in System.Types........ class operator TPoint.Explicit(Value: TPoint): TSmallPoint; begin if Value.x < Low(SmallInt) then Result.x := Low(SmallInt) else if Value.x > High(SmallInt) then Result.x := High(SmallInt) else Result.x := SmallInt(Result.x); if Value.y < Low(SmallInt) then Result.y := Low(SmallInt) else if Value.y > High(SmallInt) then Result.y := High(SmallInt) else Result.y := SmallInt(Result.y); end; Useless and wrong Code...
  13. Fritzew

    FmxLinux bundling with Delphi and RAD Studio

    The funny thing is, there was a OpenGl Layer for Windows working really well at this time. (I'm also a lifetime customer, my "lifetime" was 4 or 5 month.....). After the purchase the OpenGl part was dropped, not longer usable, and older Delphi not more supported. It was one of the worth purchase i have ever done.
  14. Fritzew

    Bug in Delphi CODE INSIGHT?

    But all on the same day........
  15. If this is true, then Embarcadero is not anymore a Partner you can trust.