delphi 如何获取其他应该程序的登录用户名

由于公司的应用软件中，需要自己编写一些外挂程序，本人只属于自学+初学者，使用Delphi7写了一两个查询程序。因为不同的查询需要对不同的人员使用，所以就需要对程序作权限管理，造成每支程序都需要设置登录窗口，才可以获取用户名，判断他的使用权限！这样就很麻烦了!问题：可否在自己开发的程序中获取公司的应用软件本身登录时的账户编号？如何获取？