[Black Raider]

Код:

if Edit1.Text<>'' then                    //  Проверка заполнения поля ввода
//можно и вот так
// if length(edit1.text)>0 then
       if Edit1.Text='315' then begin
        DataBase.DBGrid1.ReadOnly:=False;  //
        DataBase.DBGrid2.ReadOnly:=False;  //  Пароль введен правильно
        DataBase.Button8.visible:=true;    //
        DataBase.Button12.visible:=true;   //
        close; 
end;