Jump to content

Attila Kovacs

Members
  • Content Count

    2067
  • Joined

  • Last visited

  • Days Won

    27

Everything posted by Attila Kovacs

  1. Attila Kovacs

    TTreeNode leak when VCL styles are active

    I'm chanting since ages that VCL is practically abandoned by Emba.
  2. Attila Kovacs

    Remote desktop friendly

    RDP is a kind of a double buffering, do not use double buffering with RDP
  3. No, in berlin the same. The loop is converted to a repeat until and the debug info does not follow this transition.
  4. Attila Kovacs

    Are you successful with form factors?

    Don't forget that this is not just about screen sizes. On portable devices the screen is also the input device. It's not just about wrapping some controls but usability.
  5. wow, strange codegen, de debugger/debuginfo and the pas are out of sync
  6. Attila Kovacs

    Delphi webbroker handling large base64

    wow, I didn't know this trick: somestring > '' (Edit: I see, opcode is same as with <>) here you are decoding twice, you should optimize this, it hurts FileContent.write(TNetEncoding.Base64.DecodeStringToBytes(abase64), length(TNetEncoding.Base64.DecodeStringToBytes(abase64)) );
  7. Attila Kovacs

    I will be less active for a few weeks

    just got the footage per FedEx
  8. Attila Kovacs

    Edit code section in post

    doubleclick
  9. Attila Kovacs

    I will be less active for a few weeks

    Wish you a full recovery.
  10. Attila Kovacs

    Delphi and the new Apple M1 CPU

    https://www.extremetech.com/computing/318020-flaw-current-measurements-x86-versus-apple-m1-performance still impressive
  11. Attila Kovacs

    Refactor menu grayed out for Rename...

    a right click in the editor enables it again, old bug
  12. Attila Kovacs

    Possible D10.4.2 issue..

    Who by? It's a race condition, nothing to prove. Not to mention that those implementations could change.
  13. Attila Kovacs

    10.4.2 issue maybe

    I had similar phenomenon after reinstalling 10.2, though only for a moment then it went away. The freshly installed component wasn't loaded. The IDE decided to treat it as a "dynamic package" and loaded/unloaded it depending on the project.
  14. Attila Kovacs

    IDE Hang

    I have news regarding to IDE hang. I took the time (lot) to attach the frozen IDE to a debugger and find followings: there is a infinite message loop, affected are tlbEntityInsight NameBtn some child controls of NameBtn without any component name nor text TypeNameBtn some child controls of TypeNameBtn without any component name nor text the infinite message loop is a variation of these messages: 1328 TCM_ADJUSTRECT 46 WM_WINDOWPOSCHANGING 7c WM_STYLECHANGING 7d WM_STYLECHANGED 1328 will be triggered from: function TCustomTabControl.GetDisplayRect: TRect; Looks like this whole entity thingy is on: TAppBuilder->TEditorDockPanel->TEditWindow->TPanel Also, I have this EntityInsight turned off in the configuration. Actually I'm only using the open unit function from MMX. It happens rarely, especially on fast finger actions like formatting, saving quickly, and meanwhile the mouse is over an entity in the editor and tries to evaluate it. But then the IDE won't recover from this message loop. For the record, there is always a chance that other things are also playing a role, especially when we are debugging windows messages, so take this info as an observation, maybe it helps finding something.
  15. Attila Kovacs

    IDE Hang

    @FredS Oh, thx for saying, didn't know that there was a cut. I'll go with v14 too.
  16. Well, no pain, no gain. Used to I also stripped every RTTI because I was annoyed of the binary sizes, but once you get hooked with RTTI and its benefits, there is no back. I can remember watching those code snippets and conversations back to the days on G+ and always thought, man, for WTF do they need that, they are crazy.
  17. Attila Kovacs

    IDE Hang

    Well, after more than a week without MMX (removed) I can say that not just there is no more IDE Hang's but the IDE become faster. I suspect, that even after turning off the entityinsight, it sets itself to invisible but still working in the background for some reason. On the other hand I'm missing some functions very badly.
  18. Attila Kovacs

    Sql Server Filtered Index

    It's slightly offtopic but I can't just pass over it. Sql Server (from 2008 I think) offers indexes with a "WHERE" clause, for example if you want to rule out duplicate values but permit duplicate NULL's you can write: CREATE UNIQUE NONCLUSTERED INDEX [YourIndexName] ON [YourTableName] (YourFieldName) WHERE [YourFieldName] IS NOT NULL This is sensational. I should read more whatsnew.txt's.
  19. Attila Kovacs

    Sql Server Filtered Index

    Actually you don't need it if you put the data into a separate table, but I was a lazy dog and googled it up. Never ever used before. Not sure even if I can keep it this way until I finished implementing.
  20. Attila Kovacs

    Sql Server Filtered Index

    You know what? Now I know what will I do if I have some days off. I'll try to port my app to FB as it supports cte too. \o/
  21. Attila Kovacs

    Sql Server Filtered Index

    @Dany Marmur Actually they are right and this also makes sense! I'm happy you come up with FB, good to know even if I'm not using it. Maybe someone reads that.
  22. Attila Kovacs

    Can Delphi randomize string 'Delphi'?

    That was a waste of time and energy.. You should read more RTL code and the answers to your questions!!
  23. Attila Kovacs

    Can Delphi randomize string 'Delphi'?

    You could run this to check if Delphi's random() is able to generate the consecutive numbers of 29 4 11 15 7 8 which are the characters of 'Delphi' taken from the desired (zero based) set 'abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ'. It iterates 4.29 billion possibilities in only 20 seconds on my notebook. vRndString := ''; z := Low(integer); RandSeed := z; vSW := TStopWatch.StartNew; while z < MaxInt do begin if Random(52) = 29 then if Random(52) = 4 then if Random(52) = 11 then if Random(52) = 15 then if Random(52) = 7 then if Random(52) = 8 then begin vRndString := 'Delphi'; WriteLn(Format('%s found in %d ms with seed of %d', [vRndString, vSW.ElapsedMilliseconds, RandSeed])); Break; end; Inc(z); RandSeed := z; end; if vRndString = '' then WriteLn(Format('not found in %d ms', [vSW.ElapsedMilliseconds])); ReadLn; And as an example you could use 'VWXYZabcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTU' with a seed of -1929919901 to get 'Delphi'. for vPhrase in cPhrases do begin RandSeed := -1929919901; ...
  24. Attila Kovacs

    Can Delphi randomize string 'Delphi'?

    But they don't use random in bruteforcing as it has no benefits.
  25. I'm wondering if it has something to do with the try/except/finally tweak introduced in the new compiler and the debugger is lacking behind?
×