Jump to content

Die Holländer

Members
  • Content Count

    248
  • Joined

  • Last visited

  • Days Won

    5

Everything posted by Die Holländer

  1. Die Holländer

    Devin AI - Is it already happening?

    Delphi IDE ChatGPT My feeling is that a real kind of Copilot will also come for Delphi..
  2. Die Holländer

    Each .py script in a separate window

    Dude, although its not so much code you posted this is more readable: type TPyThread = class(TPythonThread) protected procedure ExecuteWithPython; override; public constructor Сreate(createsuspended: boolean); end; procedure ExecPythonFile(const FFile, Params:string); const Arg: string = 'import sys' + #10 + 'def run_python_script(args_str):'+#10+ ' args_list = args_str.split()'+#10+ ' sys.argv = [sys.argv[0]] + args_list'; var Py: IPyEngineAndGIL; begin try PythonEngine.ExecString(Arg+#10+'run_python_script("'+Params+'")'); PythonEngine.ExecFile(FFile); except Raise; end; end; constructor TPyThread.Сreate(createsuspended: boolean); begin inherited Create(CreateSuspended); ThreadExecMode:=emNewInterpreterOwnGIL; // I USE Python12.dll FreeOnTerminate:=True; end; procedure TPyThread.ExecuteWithPython; Begin while true do ExecPythonFile(myfilename,'-i 2000 --r'); end;
  3. It's very difficult to advise without seeing how you build the application. If you didn't put active sql's on datamodules and autocreate forms the startup must be very fast. Which database or data storage do you use? What is the speed and memory of your desktop machines and database server? What about the connection speed with your data(base?) server. How do you handle internal memory and calculation loading data. Are you looping through very large result sets? Which components are lacking speed? Are they native of 3th party? Are you loading zillions of datarecords in grids? Is it possible to create a small application with one example where you see lack of speed? "Large dataset activities like sorting and filtering are taking longer than expected for me." I lost track of the topic here somewhere on this board about loading very large datasets as a competition. Anyone?
  4. Die Holländer

    Enabled := False makes color Glyphs disappear

    I wonder how difficult it is to make your own component TMyBitBtn based on TBitBtn and overwrite the way the enable/disable picture works, like how the JvXPButton does it or if disabled then change all the pixels (only 32x32 ?) from color to grayscale in the ondraw. Then modify all the DFM TBitBtn Text to TMyBitBtn..
  5. Die Holländer

    Enabled := False makes color Glyphs disappear

    So, why did they/you use this button in the first place and how, after 1M lines, it became suddenly a problem? I would just use the JVCL JvXPButton that will gray out the button as you like.
  6. Die Holländer

    Enabled := False makes color Glyphs disappear

    The JVCL has a JvXPButton.. Maybe you can change the buttons by editing the *.dfm file of the Form.. 😬
  7. Die Holländer

    Delphi MT940 implementation (reader, writer)

    See your messages.
  8. Die Holländer

    'View as Text' command menu item?

    Yes, indeed, but right-click on the form name shows only "View as Form", while the display doesn't show the text of the form (*.dfm) at the moment. It appears that this is a Toggle option and by selecting this option the display will switch to Text view... The "View as Form" in the menu is just not displaying what it is going to do. Same for Alt+F12 is toggle between Text and Form view.. (in Delphi 11.3)
  9. Die Holländer

    'View as Text' command menu item?

    Right-Click on the form caption bar.
  10. Die Holländer

    TControlList — need help!

    Yes, but its only resizing/displaying a small part of the text height, while the HTML is showing the entire text.. I wonder what your user case is. Who is going to read that much text at once when you can't use pagination, etc..
  11. Die Holländer

    TControlList — need help!

    Are you sure? Did you tried it? The speed is in no way comparible with your TControlList example. The HTML renderer is very fast, also on older computers. Otherwise displaying a webpage on these computers is also not possible..
  12. Die Holländer

    Newbie Question 1

    Try a build (in Debug mode) and after the error (you didn't complete the line..) then try again "->"
  13. Die Holländer

    TControlList — need help!

    I started to display your test just in a THTML viewer. Nice, because you can continue to format the text with whatever you want (colors, fonts, etc) The wordwrap is very fast. Maybe you can even add an onClick in code to capture a click on one of the <div> procedure TForm1.BitBtn1Click(Sender: TObject); var idx: Integer; begin for idx := 1 to 10 do Begin HtmlViewer1.Text:=HtmlViewer1.Text+'<div>'+IntToStr(idx)+': '+setCaption+'</div><br>'; End; end; HtmlViewer 10.2 is still available at: http://code.google.com/p/thtmlviewer/ HtmlViewer 11.x is available at: https://sourceforge.net/projects/htmlviewer/ HtmlViewer development is hosted at: https://github.com/BerndGabriel/HtmlViewer
  14. Die Holländer

    TControlList — need help!

    Do you need to be able to edit/use the textblocks or is it just for display? word splitting = word wrap?
  15. Isn't your statement invalid for your case? select 'qwerty' as AnotherType This means: give the output of the field from the sql the name "AnotherType" It seems you expect a kind of casting procedure from text to integer..
  16. if S[I] in [WideChar(' ') .. WideChar('~')] Then mem_char(AnsiChar(S[I]), Buf) else Begin mem_char('\', Buf); mem_char('u', Buf); mem_write(IntToHex(ord(S[I]),4), Buf); end;
  17. U+1618 was added in Unicode version 3.0 in 1999. It belongs to the block Unified Canadian Aboriginal Syllabics in the Basic Multilingual Plane. The word that U+1618 forms with similar adjacent characters prevents a line break inside it. >"filled with\u1618MVR\u1618information"
  18. Die Holländer

    Suggestion for next version name - YASAB

    Suggestion for your next post- YASAB Don't blame the IDE.
  19. Die Holländer

    Scientific research

    Algosim Algosim Delphi Algosim Delphi Source Code
  20. Die Holländer

    Variable might not have been initialized

    Like DelphiLint (shameless promotion..) advise you to do..
  21. Die Holländer

    OpenAPIClientWizard

    Yet another nice Ali Delphi Wizard ! 🧙‍♂️ ChatGPT Wizard
  22. Lately, I see many tech blog articles about this statement.. What should I say if my manager ask me "What about Delphi?" "White House asks programmers to use only memory safe languages The American Office of the National Cyber Director, in collaboration with the White House, asks programmers to in principle only use programming languages that are memory safe. Rust is one of the languages considered suitable, while C and C++ are considered unsafe." press-release-technical-report BACK TO THE BUILDING BLOCKS Introduction to memory unsafety for vps of engineering
  23. Die Holländer

    DelphiLint v1.1.0 out now!

    Yes, I have divided my code in business objects, data objects, form and project directories. I've changed the "project directory" in DelphiLint to one of these directories and that worked fine ! I have to say that DelphiLint is one of the nicest Delphi tools I've seen for a long time. 👍
×