Скачать: CL | DM;

Можно ли переименовать класс окна?   Найти похожие ветки 

← →
Tack ©   (2008-08-13 21:43) [0]

Есть ли возможность на ходу переименовать класс окна приложения (который отображается в Spy++)? По умолчанию в делфи-программах класс окна соответствует имени Delphi-класса. А нужно, чтобы окно TForm1 показывалось в инспекторе как MYWINDOWCLASS например. Если возможно, то подскажите как.

---

← →
DVM ©   (2008-08-13 22:12) [1]


unit Unit1;

interface

uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs;

type
 TForm1 = class(TForm)
 private
   { Private declarations }
 public
   procedure CreateParams(var Params: TCreateParams); override;
 end;

var
 Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
 inherited;
 Params.WinClassName := "MYWINDOWCLASS";
end;

end.


---

← →
Tack ©   (2008-08-14 00:13) [2]

большое спасибо

---

← →
Германн ©   (2008-08-14 00:40) [3]

> Tack ©   (14.08.08 00:13) [2]
>
>

А причем тут инспектор?

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c