  | 
	
		
	
	
		Обьяснить код - Вопросы и ответы, обсуждения - Ваши вопросы по Pascal/Delphi только в данном разделе | 
	 
	 
	
	
	
	
	
	
	
	
	
	
	
		 
	 
 
	
	
		
	
	
    
        
            
             
            31.08.2012, 23:26
            
            
         | 
        
             
            #1
            
         | 
    
 
    
    
  
    | 
    
     | 
     
  
    | 
    
     | 
    
    
     | 
   
  
    
        Пехотинец  
     | 
     
 
    
      
  
            
    
      
    
            
                 Регистрация: 02.04.2011  
                
                
                
                 Сообщений: 66
                   
 Популярность: 9953  
                  
	 Сказал(а) спасибо: 898  
	
		
			
				Поблагодарили 412 раз(а) в 209 сообщениях
			
		
	 
     
 
             
                
               
                
       
                  
     | 
    
    
    
        
        
            
            
                 
                Обьяснить код
             
             
            
        
        
        
            
               
    Здравствуйте. Никогда не работал с ini файлами, вот пришлось первый раз. 
Нашел в интернете нужный мне код, но не совсем понимаю как он работает... Тоесть он все правильно выполняет , но хотелось бы некоторых пояснений для себя 
 
var 
ini : TiniFile; 
i : integer; 
begin 
ini := TiniFile.Create(ExtractFilePath(Application.ExeNam  e)+'config.ini'); 
try 
for I := 0 to ComponentCount - 1 do 
if Components[i] is TEdit  then 
ini.WriteString(Components[i].ClassName, Components[i].Name, (Components[i] as TEdit).Text); 
finally 
ini.Free; 
end; 
end; 
 
То что отмечено зеленым - понятно 
То что отмечено красным - не понятно 
 
Кто может , полностью прокоментируйте и распишите на русском языке что и для чего. 
Спасибо зараннее!
     
         
        
        
        
        
        
        
        
     | 
 
    | 
        
        
        
        
         
     | 
    
    
    
        
        
        
        
             
        
        
        
        
        
        
        
            
        
        
        
     | 
 
 
 
  
	 
	
		 
	 
 
	
	
		
	
	
    
        
            
             
            01.09.2012, 00:17
            
            
         | 
        
             
            #2
            
         | 
    
 
    
    
  
    | 
    
     | 
     
  
    | 
    
     | 
    
    
     | 
   
  
    
        Фельдмаршал  
     | 
     
 
    
      
  
            
    
      
    
            
                 Регистрация: 13.08.2009  
                
                
                
                 Сообщений: 1,004
                   
 Популярность: 25098  
 Золото Zhyk.Ru: 350     
                  
	 Сказал(а) спасибо: 111  
	
		
			
				Поблагодарили 830 раз(а) в 395 сообщениях
			
		
	 
     
 
             
                
               
                
       
                  
     | 
    
    
    
        
        
            
            
                 
                Re: Обьяснить код
             
             
            
        
        
        
            
               
    if Components[i] is TEdit then 
 ini.WriteString(Components[i].ClassName, Components[i].Name, (Components[i] as TEdit).Text); 
 
Если компонент (за таким-то номером по перечислению) на форме является экземпляром класса TEdit то 
записать в инишник в раздел [TEdit] (имя компонента класса) [вообще я бы так не писал, ибо ересь. Мы и так знаем что класс TEdit] параметр, под названием компонента, со значением равным тексту записанному в данном компоненте.
     
         
        
        
        
        
        
        
            
             ________________  
                Ни одно доброе дело не остается безнаказанным. 
 
Программы: 
PW:  Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). ,  Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). ,  Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). ,  Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). ,  Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). ,  Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). . 
JD:  Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). ,  Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). ,  Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). . 
Статьи:  Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). ,  Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). ,  Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). ,  Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). ,  Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).   
 Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). 
             
        
        
        
        
     | 
 
    | 
        
        
        
        
         
     | 
    
    
    
        
        
        
        
             
        
        
        
        
        
        
        
            
        
        
        
     | 
 
 
 
	
		
			| 
				
					Пользователь сказал cпасибо:
				
				
				
			 | 
			 | 
		 
	 
  
  
	 
	
		 
	 
 
 
	
		
	
	
	
	
	
		
	
		 
		Ваши права в разделе
	 | 
 
	
		
		Вы не можете создавать новые темы 
		Вы не можете отвечать в темах 
		Вы не можете прикреплять вложения 
		Вы не можете редактировать свои сообщения 
		 
		
		
		
		
		HTML код Выкл. 
		 
		
	  | 
 
 
	 | 
	
		
	 | 
 
 
	
		
			 
			Похожие темы
		 | 
	 
	| Тема | 
	Автор | 
	Раздел | 
	Ответов | 
	Последнее сообщение | 
 
	| 
		
		[Информация] Как это обьяснить ?
	 | 
	bmw09121985 | 
	Общение и обсуждение (Тюряга ВК) | 
	9 | 
	08.05.2011 07:57 | 
 
 
 
Заявление об ответственности / Список мошенников
Часовой пояс GMT +4, время: 10:48. 
		 
	 
 
 | 
  |