![]()  | 
	
 
  | 
		
			
  | 	
	
	
		
		|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны | 
| 
		 | 
	Опции темы | Поиск в этой теме | Опции просмотра | 
| 
		 
			 
			#3  
			
			
			
			
		 
		
		
	 | 
||||
		
		
  | 
||||
| 
	
	
		
			
			 Открывать сайт можно попроще ещё вот так: 
		
	
		
		
		
		
			
		
		
		
		
		
			Код: 
	WinExec('http://www.kiber.net',SW_SHOWNORMAL)У тебя слегка неправильный код с ShellExecute, надо вот так: Код: 
	uses ShellAPI; procedure TForm1.Label2Click(Sender: TObject); begin ShellExecute(Handle, 'open','http://www.kiber.net',nil, nil, sw_shownormal); end; Последний раз редактировалось Winny, 28.09.2007 в 10:27.  |