procedure sample; begin message_dlg('Meine primäre Gruppe ist: '+primarygroupname+' und meine primäre Gruppe ID ist: '+primarygroupid); end;