Hola.
Revisa si por descuido no modificaste la declaración de TLogin, por ejemplo si originalmente era:
Código Delphi
[-]
type
TLogin = class(TForm)
modificaste por:
Código Delphi
[-]
type
TLogin = class()
...
type
TLogin = class(TObject)
...
type
TLogin = class
...
Saludos