 
			
				15.05.2014, 19:12
			
			
			
		  
	 | 
	
		
		
		
			  | 
			
			
				
				
				 Let Me Show You 
				
				
			 | 
			  | 
			
				
				
					Регистрация: 30.04.2010 
					Адрес: Северодвинск 
					
					Сообщения: 5,426
 
				Версия Delphi: 7, XE5 
					Репутация: 59586 
					    
				 
				
			 | 
		 
		 
		
	 | 
	
	
	
		
			
			
			 
			
		
		
		
		для рисования всегда dc нужен: 
	Код: 
	    WM_PAINT: begin
      dc:=BeginPaint(AWnd, ps);
      rct.Left:=10;
      rct.Top:=130;
      rct.Right:=110;
      rct.Bottom:=150;
      SetBkMode(dc, TRANSPARENT);
      DrawText(dc, 'Label2', -1, rct, DT_SINGLELINE);
      EndPaint(AWnd, ps);
      Result:=0;
    end; 
 
можно static control еще использовать:
 
	Код: 
	  CreateWindowEx(0, 'STATIC', 'Label1',
    WS_CHILD or WS_VISIBLE, 10, 100, 100, 25, AWnd, 0,
    HInstance, nil); 
 
но тут нужно другое сообщение обрабатывать:
 
	Код: 
	    WM_CTLCOLORSTATIC: begin
      SetBkMode(wParam, TRANSPARENT);
      Result:=GetStockObject(NULL_BRUSH);
    end; 
  
		
	
		
		
		
		
			
		
		
		
		
	
		
		
	
	
	 |