Понятное дело переменную login где объявила? Видимо нигде...
Может лучше так...
Код:
procedure TForm1.FormActivate(Sender: TObject);
var
login : string;
begin
If login='User' then N2.Visible:=true
else n2.Visible:=false;
end;
Admin: Предупреждение по тегам.
__________________
В начале был Бит, потом Байт и только потом появилось Слово...
|