Jump to content

Attila Kovacs

Members
  • Content Count

    1936
  • Joined

  • Last visited

  • Days Won

    25

Everything posted by Attila Kovacs

  1. Attila Kovacs

    Select the entire procedure/function?

    https://youtu.be/SbZXiDE6GO4?t=48
  2. Attila Kovacs

    Thinfinity VirtualUI - cloud-based conversion

    Yeah that's me, and I have a touch screen which I think the problem is. I tried my phone, Chrome on a S23 Ultra, it loads, but the GUI is unusable on that small display.
  3. Attila Kovacs

    Thinfinity VirtualUI - cloud-based conversion

    I've tried both, chrome and IE, the same, (they are actually the same nowadays anyway) I managed to get it working once, but the same error has occurred again. However, it wasn't functioning properly. I couldn't see the entire forms and such... ike there's no HDPI support.
  4. Attila Kovacs

    Thinfinity VirtualUI - cloud-based conversion

    now it's working, no HDPI support?
  5. Attila Kovacs

    Thinfinity VirtualUI - cloud-based conversion

    <o> yes, then I log in and I'm getting an empty site
  6. Attila Kovacs

    Thinfinity VirtualUI - cloud-based conversion

    just an empty page, do I need something on the client side?
  7. Attila Kovacs

    Delphi and "Use only memory safe languages"

    Doesn't matter. It was an example.
  8. Attila Kovacs

    Delphi and "Use only memory safe languages"

    TStringList has 4 other constructors with parameters. This would just pollute the code and cause traffic jams everywhere.
  9. question is, if dfm's are affected too
  10. Report them as false positive, include the exe.
  11. Attila Kovacs

    Delphi Low-code No-code?

    For those who prefer designing an application visually rather than coding it, this could be useful.
  12. Attila Kovacs

    Delphi 12.1 is available

    sorry, not Sherlock but @Rollo62 https://embt.atlassian.net/servicedesk/customer/portal/1/RSS-441 still laughing? 🙂
  13. Attila Kovacs

    Delphi 12.1 is available

    Thanks Lars, that did the trick indeed. I'm still not satisfied with the new system. It's similar as the "new forum" was = lame AF.
  14. Attila Kovacs

    Delphi 12.1 is available

    well, at the end it's an April Fools' Joke indeed.
  15. Attila Kovacs

    Delphi 12.1 is available

    Is this an April 1 joke?
  16. Attila Kovacs

    Delphi 12.1 is available

    I'm rather concerned about how the multiple windows will interact with older plugins and all of my stuff.
  17. Attila Kovacs

    Delphi 12.1 is available

    Wow, from now on, you can open the same file multiple times. That's going to be interesting.
  18. Attila Kovacs

    Delphi 12.1 is available

    that's quite a list
  19. Attila Kovacs

    Regression - Delphi 12 - IsZero()

    I read something in so from you but I can't find it, it was about the whole rtl float handling is rubbish or something like that. Not sure about the details.
  20. Attila Kovacs

    Regression - Delphi 12 - IsZero()

    You wanted to make your math lib available for the public, back in the days. Still waiting 😛
  21. var c : currency; begin c := Wert * 10; .... should make it calculating the same on all platforms, but I'm AFK at the moment.
  22. I do it this way: function TDSH3Visualizer.GetReplacementValue(const Expression, TypeName, EvalResult: string): string; begin ... if MatchText(TypeName, ['TFInteger', 'TFLargeInt', 'TFBit']) then DefExpr := Expression + '.AsInteger'; ... Eval(DefExpr, '', Result); end; Edit: you can also Eval() private fields like FIsNull FIsUndefind etc. very fast methods are slower, exceptions are very slow in the Eval() function TXYZVisualizer.Eval(const Expr: string; const FormatSpecifiers: string; var EvalResult: string): Boolean; var Done: Boolean; ResultStr: array [0 .. 255] of Char; ResultAddr, ResultSize, ResultVal: LongWord; EvalRes: TOTAEvaluateResult; CanModify: Boolean; begin Result := False; EvalResult := 'XYZ Visualizer error'; repeat Done := True; EvalRes := FCurThread.Evaluate(Expr, @ResultStr, Length(ResultStr), CanModify, eseAll, PAnsiChar(AnsiString(FormatSpecifiers)), ResultAddr, ResultSize, ResultVal, '', 0); case EvalRes of TOTAEvaluateResult.erOK: begin EvalResult := ResultStr; Result := True; end; TOTAEvaluateResult.erDeferred: begin FCompleted := False; FDeferredResult := ''; FNotifierIndex := FCurThread.AddNotifier(Self); try while not FCompleted do FDebugSvcs.ProcessDebugEvents; finally FCurThread.RemoveNotifier(FNotifierIndex); end; FNotifierIndex := -1; if FDeferredResult <> '' then EvalResult := FDeferredResult; Result := True; end; TOTAEvaluateResult.erBusy: begin FDebugSvcs.ProcessDebugEvents; Done := False; end; TOTAEvaluateResult.erError: begin Result := False; end; end; until Done; end;
  23. Attila Kovacs

    Delphi and "Use only memory safe languages"

    As an additional note to this "safety" topic. Just yesterday, it happened to me that the type of a form event parameter was defined under the same name in another unit as well, and the IDE didn't alert me, nor did the form load signal any issues during loading. Thus, the resulting code was completely wrong. The stack got shifted, and the event was returned to a garbage address. Originally, the parameter type was a class which was overridden in the other unit by a record. It was really fun trying to find the problem.
  24. Attila Kovacs

    Assign Null value to date mySQL

    FieldByName('STAT_CLOSED_DATE').Clear;
  25. Attila Kovacs

    wuppdi Welcome Page for Delphi 11 Alexandria?

    It's possible that older IDE's work differently. You can make that button optional if you have some settings already.
×