Есть класс, наследуемый от TForm. При создании TFormStayTop выскакивает сообщение: не найден ресурс формы. Как мне создать форму?

unit FormStayTop;

interface

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

type
 TFormStayTop = class(TForm)
 private
   { Private declarations }
 protected
   { Protected declarations }
 public
   { Public declarations }
   procedure Show;
 published
   { Published declarations }
 end;

procedure Register;

implementation
procedure Register;
begin
 RegisterComponents('Samples',[TFormStayTop]);
end;

procedure TFormStayTop.Show;
begin
 Visible := True;
 BringToFront;
 SetWindowLong(Handle, GWL_HWNDPARENT, GetDesktopWindow); // Устанавливаем родителем Desctop
 SetWindowPos(Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOSIZE or SWP_NOMOVE); // Перемещаем наверх
end;

end.

> aptuk87   (11.05.10 16:01)  

> выскакивает сообщение: не найден ресурс формы. Как мне создать
> форму?

CreateNew

Во-ще-то, формы принято в репозитарий ложить.

--
Regards, LVT.

или RegisterCustomModule