Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Создание формы / 4 сообщений из 4, страница 1 из 1
24.08.2003, 10:53
    #32245544
Streammer
Streammer
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создание формы
Поясните мне пожалуйста, в чем разница между двумя кусками кода:

1) Application.CreateForm(TForm2, Form2);

2) Form2 := TForm2.Create(Application);

У меня Form1 - MDIForm, а все остальные (в т.ч. и Form2) - MDIChild.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.08.2003, 12:38
    #32245560
AndrewYr
AndrewYr
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создание формы
Ни в чем. В обоих случаях создается экземляр класса TForm2 (то есть объект), и ссылка на него сохраняется в переменной Form2.

В файле с расширением DPR находится модуль инициализирующий приложение.
В этом модуле генерируется код Application.CreateForm(TForm2, Form2) в тот момент, когда вы добавляете форму в проект.

Если у вас MDI-приложение, и дочерние формы должны возникать по какому-то событию, то удалите код Application.CreateForm(TForm2, Form2), и в обработчике события напишите Form2 := TForm2.Create(Application);
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.08.2003, 14:17
    #32245572
SiDen
SiDen
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создание формы
В этом
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
procedure TApplication.CreateForm(InstanceClass: TComponentClass; var Reference);
var
  Instance: TComponent;
begin
  Instance := TComponent(InstanceClass.NewInstance);
  TComponent(Reference) := Instance;
  try
    Instance.Create(Self);
  except
    TComponent(Reference) := nil;
    raise;
  end;
  if (FMainForm = nil) and (Instance is TForm) then
  begin
    TForm(Instance).HandleNeeded;
    FMainForm := TForm(Instance);
  end;
end;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.08.2003, 03:20
    #32246915
DenDer
DenDer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создание формы
Одинаково и то и другое (кто и как привык).
Я, допустим, пользуюсь Application.createForm........
Где мне нужно, там и создаю новую форму - всё работает
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Создание формы / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]