luciano_f

Every form I open I have to deactivate and activate "Lock Control" again. Is there any tool or way to do this automatically ?

For those who want to fix the bug, the correction was made with CnPack https://github.com/cnpack/cnwizards/issues/181

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.

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

I have a version 10.2 license and I have problems with low memory when compiling a large application. I tested version 11.3 and the problem is the same. When will Embarcadero be ashamed and make a robust 64-Bit IDE? I'm already thinking seriously about Lazarus I already made this post Friends could also do the same thing, who knows, everyone asking for the same thing and giving could speed this up. https://quality.embarcadero.com/browse/RSP-42372

I wonder how much work a system of this size requires for 8 million lines of code. must be several programmers And as I say, Embarcadero had to think about these things because a system that generates 64-bit applications is comical and it itself isn't. Marco Cantu read my post see https://quality.embarcadero.com/browse/RSP-42372 I said harsh words to them

Does the friend have a website ? How did you manage to run in the Cloud ? Is it for Microsoft terminal server ?

I was curious because your project for me is gigantic. My project has 490 thousand lines in 350 forms and I already think it's too big Tell me what type of company is your project for? Do you have any website ?

Based on this link, I believe it is possible to create a BPL that can automatically Disable and Enable the "Lock Controls" for each form that is opened. https://github.com/DGH2112/DGH-IDE-Notifiers/blob/master/Source/DGHIDENotifiers.FormNotifier.pas

Yes

In Delphi there is an option in "Edit" -> "Lock Controls" but this option I have to disable and enable again for each form that opens, I would like to do this automatically once only and all the forms that I open are already locked I believe it must be something related to OTA but I don't know how to do it https://github.com/DGH2112/DGH-IDE-Notifiers/blob/master/Source/DGHIDENotifiers.FormNotifier.pas

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?

@Softacom Company Simply fantastic Last question for Master of Mages How did you extract the Form Components without having access to it ? file "ImageCollectionEditorForm.dfm"

Can you create an example for my understanding? Grateful.

I am very grateful I managed to place the Splitter, Maximize form button but the create is not triggered See how I did it constructor TMyImageCollectionEditorForm.Create(AOwner: TComponent); begin inherited; Showmessage('Test'); do not execute this message Self.BorderIcons := [biSystemMenu, biMaximize]; end; procedure TMyImageCollectionEditor.ExecuteVerb(Index: Integer); Var Splitter1: TSplitter; begin //here we implement action when someone click on our menu item inherited; case Index of 0: begin if Self.Component is TImageCollection then begin var xImCol := Self.Component as TImageCollection; var xMyEditor := TMyImageCollectionEditorForm.CreateEx(Nil, xImCol); try xMyEditor.BorderIcons := [biSystemMenu, biMaximize]; xMyEditor.GroupBox1.Margins.Top := 3; xMyEditor.GroupBox1.Margins.Bottom := 3; xMyEditor.GroupBox1.Margins.Left := 3; xMyEditor.GroupBox1.Margins.Right := 10; xMyEditor.GroupBox2.Margins.Top := 3; xMyEditor.GroupBox2.Margins.Bottom := 3; xMyEditor.GroupBox2.Margins.Left := 3; xMyEditor.GroupBox2.Margins.Right := 10; Splitter1 := TSplitter.Create(xMyEditor); Splitter1.Parent := xMyEditor; Splitter1.Visible := True; Splitter1.Align := alBottom; Splitter1.Height := 9; Splitter1.Color := clHighlight; Splitter1.Top := xMyEditor.GroupBox2.Top + xMyEditor.GroupBox2.Height; xMyEditor.ShowModal; finally xMyEditor.Free; end; end; end; end; end;

@Softacom Company Sorry for my ignorance, as I don't have enough knowledge to create and change components, could my colleague give me some help? How could I create a new form that inherits from "TImageCollectionEditorForm" and I can make changes to it? I tried but I couldn't and also how could I register this BPL, see attached what I did ImageListEdit Form.7z If I could have access to the form I would change more things, such as this huge image preview area, see attached.

@Softacom Company this doesn't compile Could you change this package for me ? ImageListEdit Change.7z

Could you explain to me then how I could use it? From the dcp?

Do you have this file on your machine ?

I don't understand your explanation because this file "ImageCollectionEditor" doesn't exist I downloaded the trial architect 11.3 version and couldn't find it Can you attach the file here on the forum please

I didn't find it and I looked on the web and there aren't even any references. Can you attach it here? Tell me will you do what I need ?