un borderstyle que no funciona

[elcigarra]

Creo un componente de tipo TCustomControl. Dentro de él, entre las variables privadas creo una (FEdit) de tipo TEdit. y dentro del constructor:

Código Delphi [-]
constructor Create(AOwner: TComponent);
 begin
   inherited create(AOwner);
   FEdit := TEdit.create(Self);
   FEdit.parent := Self;
   
   //esta es la linea problemática
   FEdit.BorderStyle := bsNone;
 end;

Esta ultima linea da un error en la compilación diciendo: "undeclared identifier "bsNone". Yo supongo que es porque piensa que el bsNone corresponde a "Self" que como es de tipo TCustomControl no estaría definido.

Alguien sabe como solucionar esto?

[dec]

Hola,

A ver si va a ser que tienes que añadir la unidad "Forms"...

[delphi.com.ar]

Empezado por elcigarra

Esta ultima linea da un error en la compilación diciendo: "undeclared identifier "bsNone". Yo supongo que es porque piensa que el bsNone corresponde a "Self" que como es de tipo TCustomControl no estaría definido.

Simplemente tienes que agregar en el uses la unit Forms que es donde esta definida bsNone.

Saludos!