Jump to content

Lajos Juhász

Members
  • Content Count

    900
  • Joined

  • Last visited

  • Days Won

    12

Lajos Juhász last won the day on June 21

Lajos Juhász had the most liked content!

Community Reputation

264 Excellent

2 Followers

Technical Information

  • Delphi-Version
    Delphi 12 Athens

Recent Profile Visitors

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

  1. Lajos Juhász

    Add onClick event on TCanvas

    you cannot do add a property to a class that doesn't have it.
  2. Lajos Juhász

    Add onClick event on TCanvas

    It is TNotifyEvent = procedure(Sender: TObject) of object; To assign a value OnClick event you have to create a method with this signature. For example: type TForm1 = class(TForm) Image1: TImage; procedure FormCreate(Sender: TObject); procedure DoSomethingClick(Sender: TObject); // Event handler for an OnClick private { Private declarations } public { Public declarations } end; Then you can write in your code: procedure TForm1.FormCreate(Sender: TObject); begin Image1.OnClick:=DoSomethingClick; end;
  3. Lajos Juhász

    Devin AI - Is it already happening?

    Microsoft might or might not using Github for train AI. How can you be sure that when you send with a prompt a piece of code it is not going to be used for training the AI system. If that code contain some top secret detail. The owner of the source code could sue the developer. (I daily work on code bases that is owned by a client of the company I am working for)
  4. Lajos Juhász

    Devin AI - Is it already happening?

    Not in near future. Embarcadero made the decision to not integrate any AI yet due to possibility of security issues. Not every customer would be happy if an AI could see their source code. The code could hold sensitive data or proprietary code owned by the company or its client. The current AI systems anyway can help you only to write or check trivial code. You can achieve that using ide plugin or copy paste to AI.
  5. Lajos Juhász

    Delphi 12: MessageDlg doesn't show icons

    Create a new VCL application. Double click on the form to create the formcreate method and add the line to change the icon for mtInformation: procedure TForm1.FormCreate(Sender: TObject); begin MsgDlgIcons[TMsgDlgType.mtInformation]:=TMsgDlgIcon.mdiInformation; end; After the {$R *.dfm} line add: uses System.UITypes; Add a button to the form and create an onlick event: procedure TForm1.Button1Click(Sender: TObject); begin MessageDlg('test', TMsgDlgType.mtInformation, mbYesNo, 0) end;
  6. Lajos Juhász

    Delphi 12: MessageDlg doesn't show icons

    MsgDlgIcons is a global variable (array) defined in VCL.Dialogs. As with any global variables there is no guarantee that somebody somewhere in the code will not change the value (searching in VCL it is a "constant variable"). If you are sure that no library you are using is not changing the value of the array you can safely change somewhere where you initialize your application.
  7. There is no "general rule" against. However I have had a case where the developer have had a similair idea where an access unit was introduced that used the "smaller" units where various forms, features were implemented. Fast forward 20 years and this design resulted a hell of circular references. The best way to solve it is to not use the access unit but directly add everywhere the required units and use the classess and functions directly as needed having zero circular reference. This made the compiling more stable (less errors in the IDE), parallel to this I have had to kill unit scope names.
  8. Lajos Juhász

    Changing the DBGrid datasource changes its aspect

    I would bet it is the display format on the field of the query.
  9. Lajos Juhász

    Enabled := False makes color Glyphs disappear

    Sooner or later you will have to rewrite the UI to be more high-DPI friendly. Changing an image should not require a lot of testing. I did that for several "1M" line of code applications without a problem. Yes it requires time, but it is a must for an old application to be able to work on "modern monitors". (A TBitbtn style program I bet looks very outdated)
  10. Lajos Juhász

    How to use FireDAC TFDMetaInfoQuery component?

    In your example you are missing the ObjectName property it must contain the name of the table that you are querying the fields information.
  11. Lajos Juhász

    Anyone using Clever Components?

    That could explain that they are not present on FB (last post from 2022), YT last video is 3 years old.
  12. Lajos Juhász

    PyInstaller

    It is not a rocket science to combine two files: copy /b pythone_Fixed.7z.001+pythone_Fixed.7z.002 pythone_Fixed.7z Devd gave the reason why it is not a single zip "attach 7z have 2 splits, i can't upload split2. forum limit file only 4m+ sorry"
  13. Lajos Juhász

    PyInstaller

    7zFM from the screenshot is part of the 7zip.
  14. Lajos Juhász

    PyInstaller

    It is strange I can open it. Combine the two split files into a .7z and you open it using Windows Explorer.
  15. Lajos Juhász

    TControlList — need help!

    Here you can find out more https://docwiki.embarcadero.com/RADStudio/Sydney/en/Using_VCL_TControlList_Control.
×