![](https://en.delphipraxis.net/uploads/set_resources_2/84c1e40ea0e759e3f1505eb1788ddf3c_pattern.png)
![](https://en.delphipraxis.net/uploads/monthly_2020_09/L_member_3433.png)
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 ExcellentTechnical Information
-
Delphi-Version
Delphi 12 Athens
Recent Profile Visitors
The recent visitors block is disabled and is not being shown to other users.
-
Add onClick event on TCanvas
Lajos Juhász replied to direktor05's topic in Algorithms, Data Structures and Class Design
you cannot do add a property to a class that doesn't have it. -
Add onClick event on TCanvas
Lajos Juhász replied to direktor05's topic in Algorithms, Data Structures and Class Design
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; -
Devin AI - Is it already happening?
Lajos Juhász replied to FreeDelphiPascal's topic in General Help
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) -
Devin AI - Is it already happening?
Lajos Juhász replied to FreeDelphiPascal's topic in General Help
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. -
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;
-
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.
-
“Transitive” type redefinitions in interface section
Lajos Juhász replied to Dmitry Onoshko's topic in Algorithms, Data Structures and Class Design
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. -
I would bet it is the display format on the field of the query.
-
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)
-
In your example you are missing the ObjectName property it must contain the name of the table that you are querying the fields information.
-
That could explain that they are not present on FB (last post from 2022), YT last video is 3 years old.
-
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"
-
7zFM from the screenshot is part of the 7zip.
-
It is strange I can open it. Combine the two split files into a .7z and you open it using Windows Explorer.
-
Here you can find out more https://docwiki.embarcadero.com/RADStudio/Sydney/en/Using_VCL_TControlList_Control.