 
			
				11.09.2023, 08:40
			
			
			
		  
	 | 
	
		
		
		
			
			| 
			
				
				
				 Новичок 
				
				
			 | 
			  | 
			
				
				
					Регистрация: 18.03.2009 
					
					
					Сообщения: 82
 
				
					Репутация: 10 
					    
				 
				
			 | 
		 
		 
		
	 | 
	
	
	
		
			
			
				 
				123
			 
			 
			
		
		
		
		
	Код: 
	for i:=0 to dbgrid1.Columns.Count-1 do
begin
memo1.Visible:=true;
DBGrid1.Columns.FieldAddress('name');
memo1.Text:=DBGrid1.SelectedField.AsString;
Image1.Picture.Bitmap.Assign(TBlobField(SQLTable1.FieldByName(DBGrid1.SelectedField.AsString))); 
 
что то все печально    
		
	
		
		
		
		
		
	
		
		
	
	
	 |