Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 15.10.2010, 14:19
Аватар для PaHaNjkee
PaHaNjkee PaHaNjkee вне форума
Начинающий
 
Регистрация: 13.10.2010
Адрес: Ульяновск
Сообщения: 115
Репутация: 10
По умолчанию Работа с Двумя формами

Здравствуйте! У меня такой вопрос как подключить к Форме1 Форму2?
Т.е Форма1 это сама программа а Форма2 окошко с ProgressBar'ом т.е сначало должна запускатца Форма2 а когда пройдет загрука Форма1. Заранее спасибо!

Везде читал даже у вас на форуме но выдает ошибку

[Ошибка] Unit1.pas(127): Undeclared identifier: 'form2'
[Фатальная Ошибка] Project1.dpr(6): Could not compile used unit 'Unit1.pas'
__________________
Начинающий Delphi
Помогаю за Спасибо!
Ответить с цитированием
  #2  
Старый 15.10.2010, 14:24
Аватар для dr. F.I.N.
dr. F.I.N. dr. F.I.N. вне форума
I Like it!
 
Регистрация: 12.12.2009
Адрес: Россия, г. Новосибирск
Сообщения: 663
Версия Delphi: D6/D7
Репутация: 26643
По умолчанию

Добавь в USES название модуля второй формы.

Код:
uses
  Unit2;
__________________
Грамотно поставленный вопрос содержит не менее 50% ответа.
Грамотно поставленная речь вызывает уважение, а у некоторых даже зависть.
Ответить с цитированием
  #3  
Старый 15.10.2010, 14:31
Аватар для PaHaNjkee
PaHaNjkee PaHaNjkee вне форума
Начинающий
 
Регистрация: 13.10.2010
Адрес: Ульяновск
Сообщения: 115
Репутация: 10
По умолчанию

спасибо БОЬШОЕ+)
__________________
Начинающий Delphi
Помогаю за Спасибо!
Ответить с цитированием
  #4  
Старый 15.10.2010, 14:32
Аватар для PaHaNjkee
PaHaNjkee PaHaNjkee вне форума
Начинающий
 
Регистрация: 13.10.2010
Адрес: Ульяновск
Сообщения: 115
Репутация: 10
По умолчанию

а как сделать чтобы сначала запускалась форма2 а потом форма1

и еще я подключил форму2 к форме1 все нормально. А потом хочу к форме2 подключить форму1 т.е в uses пишу Unit1 выводит вот такую ошибку

[Фатальная Ошибка] Unit1.pas(11): Circular unit reference to 'Unit1'
__________________
Начинающий Delphi
Помогаю за Спасибо!

Последний раз редактировалось PaHaNjkee, 15.10.2010 в 14:48.
Ответить с цитированием
  #5  
Старый 15.10.2010, 14:55
Аватар для v1s2222
v1s2222 v1s2222 вне форума
Продвинутый
 
Регистрация: 07.09.2010
Сообщения: 726
Репутация: 26711
По умолчанию

Если ты в форме 1 подключил форму 2, то чтоб подключить к форме 2, форму 1 надо после слова "implementation" написать Uses Unit1;
А чтобы форма 2 открывалась раньше 1, то удалил ее из авто запускаемых форм: Project-Option-Auto-CreateForm > Available forms.
После этого зайти в код проекта (Project-ViewSource) и там:
Код:
...
Application.Initialize;
  Form2 := TForm2.Create(Application);
  Form2.Show;
  Form2.Update;
  while Form2.Timer1.Enabled do
    Application.ProcessMessages;
  Application.CreateForm(TForm1, Form1);
  Form2.Hide;
  Form2.Free;
  Application.Run;

Это создание заставки (надо на форму 2 поставить таймер, и после того, как он выполниться, форма 2 автоматически закроется, и откроется форма 1).
__________________
Помогаю за Спасибо

Последний раз редактировалось v1s2222, 15.10.2010 в 14:59.
Ответить с цитированием
  #6  
Старый 15.10.2010, 15:49
Аватар для PaHaNjkee
PaHaNjkee PaHaNjkee вне форума
Начинающий
 
Регистрация: 13.10.2010
Адрес: Ульяновск
Сообщения: 115
Репутация: 10
По умолчанию

Спасибо можно еще один вопросик

Вот я сделал что вы сказали но при запуске программы у меня запускаются все формы как это исправить?
Мне по сути вот что нужно чтобы при открытии программы запускалась форма2 и в ней проходит прогресбар до конца форма2 закрывается и открывается форма1 (просто типа как загрузка в программе а потом сама программа)
И еще как сделать чтобы форма1 открылась т.е Form1.Close; - это закрылась а открылась как?
__________________
Начинающий Delphi
Помогаю за Спасибо!
Ответить с цитированием
  #7  
Старый 15.10.2010, 15:54
Аватар для v1s2222
v1s2222 v1s2222 вне форума
Продвинутый
 
Регистрация: 07.09.2010
Сообщения: 726
Репутация: 26711
По умолчанию

Вот, создание заставки (это и есть форма загрузки):
http://delphi-faq.zoxt.net/1596.htm

На счет 2 вопроса, Form1.Close - он закрывает полностью всю программу, если надо, чтоб программа просто скрылась, то Form1.Hide, показать - Form1.Show;
__________________
Помогаю за Спасибо
Ответить с цитированием
  #8  
Старый 15.10.2010, 16:45
Аватар для PaHaNjkee
PaHaNjkee PaHaNjkee вне форума
Начинающий
 
Регистрация: 13.10.2010
Адрес: Ульяновск
Сообщения: 115
Репутация: 10
По умолчанию

Спасибо большое но как удалить Форму2 полностью из программы что надо удалить?
__________________
Начинающий Delphi
Помогаю за Спасибо!
Ответить с цитированием
  #9  
Старый 15.10.2010, 17:14
Аватар для PaHaNjkee
PaHaNjkee PaHaNjkee вне форума
Начинающий
 
Регистрация: 13.10.2010
Адрес: Ульяновск
Сообщения: 115
Репутация: 10
По умолчанию

уже не надо спасибо огромное!
__________________
Начинающий Delphi
Помогаю за Спасибо!
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 05:42.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025