[Djsilver5]

Lo quite con todo lo que tenia
"type
TLogin = class(TForm)"
Y copie este:
type
TDataModule1 = class(TDataModule)
IBDatabase1: TIBDatabase;
IBTransaction1: TIBTransaction;
IBQPassword: TIBQuery;