Dear Sir, TMS Scripter product at version 7.1 has been represented LibraryBrowser tool.
Could you revise it to be able to use it by development of your own IDE?
Today it implemented form TForm component and "CreateParams" method were override for StayOnTop position at modal mode. If the tool will be inherit from TCustomTreeView - it would be very nice visual component for developers (as IDEMemo or IDEInspector). At current moment, developer which implements his custom IDE must create heir class with override CreateParams and call TCustomForm handler. This is violation of principles of OOP. Behind, an example of code, witch solves the problem with out refactoring of source code:
procedure TfmNoneDialogLibraryBrowser.CreateParams(var Params: TCreateParams);
type
TCreateParamsProc = procedure (var Params: TCreateParams) of object;
var
CreateParamsProc: TCreateParamsProc;
begin
with TMethod(CreateParamsProc) do
begin
Code := @TCustomForm.CreateParams;
Data := Self;
end;
CreateParamsProc(Params);
end;