![]()  | 
	
 
  | 
		
			
  | 	
	
	
		
		|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны | 
![]()  | 
	
	
| 
		 | 
	Опции темы | Поиск в этой теме | Опции просмотра | 
| 
		 
			 
			#1  
			
			
			
			
		 
		
		
	 | 
|||
		
		
  | 
|||
| 
	
	
		
			
			 На форме 1 расположены TButton1 и TEdit1-для ввода имени пользователя, что нужно сделать для того чтобы при нажатии на TButton1 первая форма спряталась, открылась вторая форма и на ней было написано "Приветствую Вас (TEdit1-что пользователь ввёл) в игре.................", при нажатии TButton1(на 2 форме), 2 спряталась и на 3 форме вывелось: 
		
	
		
		
		
		
		
	
		
		
	
	
	"(TEdit1-что пользователь ввёл), если возникли трудности,пожалуйста....." Пожалуйста опишите подробно что куда вводить! заранее благодарен.  | 
| 
		 
			 
			#2  
			
			
			
			
		 
		
		
	 | 
|||
		
		
  | 
|||
| 
	
	
		
			
			 Во можно так))) Сразу камент: не люблю прекрещивающиеся ссылки, так что всегда пытаюсь избежать... 
		
	
		
		
		
		
		
	
		
		
	
	
	Код: 
	Unit1
uses
  Unit2, Unit3;
procedure TForm1.Button1Click(Sender: TObject);
begin
 Form2.Label1.Caption := Format('Приветствую Вас %s в игре...', [Edit1.Text]);
 Form3.Label1.Caption := Format('%s , если возникли трудности, пожалуйста...', [Edit1.Text]);
 Form1.Hide;
 Form2.Show;
end;
Unit2
uses
  Unit3;
procedure TForm2.Button1Click(Sender: TObject);
begin
 Form2.Hide;
 Form3.Show;
end; | 
| 
		 
			 
			#3  
			
			
			
			
		 
		
		
	 | 
|||
		
		
  | 
|||
	
	
		
			
			  Drozh   самое большое тебе спасибо  ![]()  |