luciano_f
Members-
Content Count
65 -
Joined
-
Last visited
Community Reputation
5 NeutralRecent Profile Visitors
The recent visitors block is disabled and is not being shown to other users.
-
When will we have a 64-bit IDE version ?
luciano_f replied to luciano_f's topic in Delphi IDE and APIs
but this is just the improved Copiler for 64 bits. Has anyone already installed this version and can you confirm if it is the 64-bit IDE ? -
Wrong Formatting with Anonymous Thread in "Code Formatter""
luciano_f replied to luciano_f's topic in GExperts
Hello everything is fine. Was my colleague able to analyze it ? I'm having to use Delphi's native Formated but it's very slow. -
How to change the TMainMenu ( Menu Designer ) editor ?
luciano_f replied to luciano_f's topic in Delphi IDE and APIs
Up -
How to change the TMainMenu ( Menu Designer ) editor ?
luciano_f replied to luciano_f's topic in Delphi IDE and APIs
How could it not be if I already did this with the help of people here on the forum. https://en.delphipraxis.net/topic/10246-how-to-change-the-tvirtualimagelist-editor/ -
How to change the TMainMenu ( Menu Designer ) editor ?
luciano_f posted a topic in Delphi IDE and APIs
I use it a lot but your editor is horrible, how could I generate a new bpl and make some changes including saving the size and position What is the pas file and the dfm? How could I reregister the editor when clicking on the component ? I want to do something similar to what I already did with -
Bug Does not display Code Complete when it has a "circular reference" in Delphi 12
luciano_f posted a topic in Delphi IDE and APIs
Attached is a demonstration project When pressing "CTRL + Space" twice the second time will not show "Procedure _Start;" Could this be an old bug ? How could I change this unit "LF.Funcao.pas" so this doesn't happen ? https://mega.nz/file/0yJnxCQC#u2pYiVzd_TIm9I50Kr4zB9Ub79fh4eoGFl05mdHrJEg Embarcadero® RAD Studio 12 Version 29.0.51511.6924 -
Wrong Formatting with Anonymous Thread in "Code Formatter""
luciano_f replied to luciano_f's topic in GExperts
https://sourceforge.net/p/gexperts/bugs/378/ -
See this example below. No configuration can solve this problem The problem is that the Procedure "P_LoopActive" has no margins and is glued to the left Procedure TForm_MenuPrincipal.P_ActiveUDPServer(Op: Integer); Var PortaUDP: Integer; Var fThread_UDPServer: TThread; Begin fThread_UDPServer := TThread.CreateAnonymousThread(Procedure Procedure P_LoopAtive; Var I: Integer; Begin PortaUDP := vPorta_Refresh; For I := 1 To Count_SessionWindows Do Begin Try Server_Refresh.Active := False; Server_Refresh.DefaultPort := PortaUDP; Server_Refresh.BroadcastEnabled := True; Server_Refresh.ThreadedEvent := False; Server_Refresh.Active := True; break; Except On E: Exception Do Begin // Não dar erro aleatorios no Terminal Server Inc(PortaUDP); FreeAndNil(Server_Refresh); Server_Refresh := TIdUDPServer.Create(self); Server_Refresh.OnUDPRead := Server_RefreshUDPRead; P_LogException(E); End; End; End; End; Begin If Op = 0 Then P_LoopAtive; If Op = 1 Then Begin Try Server_Refresh.Active := True; Except P_LoopAtive; End; End; End); fThread_UDPServer.FreeOnTerminate := True; fThread_UDPServer.Start; End;
-
Permanently the "Lock Controls" in IDE
luciano_f replied to luciano_f's topic in Delphi IDE and APIs
For those who want to fix the bug, the correction was made with CnPack https://github.com/cnpack/cnwizards/issues/181 -
For those who want to fix the bug, the correction was made with CnPack https://github.com/cnpack/cnwizards/issues/181
-
Help exemple IOTAModule.GetModuleFileEditor(0).AddNotifier. ?
-
Exactly my friend, that's right. However, I believe it is possible to solve this problem. I need to know how to create a BPL where I can detect when a Form is opened or active I need to know how to register this TMyFormNotifier = class(TNotifierObject, IOTANotifier, IOTAFormNotifier) protected procedure FormActivated; procedure FormSaving; procedure ComponentRenamed(ComponentHandle: TOTAHandle; const OldName, NewName: string); end;
-
Because I like to work with the controls locked so I don't accidentally click and move components unnecessarily I've been working for a long time, always blocking the components. But I'm tired of always having to deactivate and activate "Lock Controls" every time I open Form it.
-
Using the "Lock Controls" option in Delphi's "Edit" menu I can lock the components, but each Form I open I have to deactivate and activate. This way, I want to create a BPL where I can detect when a form is opened and automatically perform the procedure for deactivating and activating the "Lock Controls" option
-
How to detect when a Form is active in Designer Guys, I'm posting here because in this area I know that you are the experts in OTA I posted this topic in another area of the forum https://en.delphipraxis.net/topic/10262-permanently-the-lock-controls-in-ide/ When searching I found this link https://www.gexperts.org/open-tools-api-faq/ However, it does not have an example explaining how to register only that: IOTAModule.GetModuleFileEditor(0).AddNotifier TMyFormNotifier = class(TNotifierObject, IOTANotifier, IOTAFormNotifier) protected procedure FormActivated; procedure FormSaving; procedure ComponentRenamed(ComponentHandle: TOTAHandle; const OldName, NewName: string); end; I want to detect when the forms are opened and check if the Menu EditLockControlsItem it is activated and if it is activated I deactivate it and activate it again so I don't have to keep every form I open performing this action.