| 
			
			 
			
				21.01.2014, 13:49
			
			
			
		 | 
	| 
		
			|  | Let Me Show You |  | 
					Регистрация: 30.04.2010 Адрес: Северодвинск Сообщения: 5,426
 Версия Delphi: 7, XE5 Репутация: 59586     |  | 
	| 
 
	Цитата: 
	
		| Сообщение от softvok Можно ли сделать так, чтобы вшить в прогу определенные имена компов, для которых возможен запуск? |  
можно
 
	Цитата: 
	
		| Сообщение от softvok Можно ли в статус баре выводить сразу имя пользователя (например "Никита")? |  
можно
 
	Код: var
  Buf: array [0..$3ff] of Char;
  Len: Cardinal;
begin
  Len:=Length(Buf);
  if GetComputerName(Buf, Len) then
    StatusBar1.Panels[0].Text:=Copy(Buf, 1, Len);
end; 
а можно на сервере общую папку закрыть для нежелательных  пользователей. |