VPF::Не модальные формы в Dll - Форум программистов

Sanchezzz

Дата 21.4.2007, 23:25 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1670
Регистрация: 19.11.2006
Где: Voronezh

Репутация: 5
Всего: 60

как вызвать не модальную форму из DLL?
Кинти примерчик.

--------------------

Понравился ответ "+" по репе, не забываем закрывать тему, заказы в LS.

Yanis

Дата 21.4.2007, 23:40 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 72
Всего: 111

Так же как и модальную.

--------------------

*щёлк*

Sanchezzz

Дата 21.4.2007, 23:59 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1670
Регистрация: 19.11.2006
Где: Voronezh

Репутация: 5
Всего: 60

яб хотел увидеть ваш код...

--------------------

Понравился ответ "+" по репе, не забываем закрывать тему, заказы в LS.

MetalFan

Дата 22.4.2007, 11:22 (ссылка)

(нет голосов)

Загрузка ...

Аццкий Сотона

Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 62
Всего: 128

FormaIzDll.Show

--------------------

There are always someone smarter than you...

Guedda

Дата 22.4.2007, 11:54 (ссылка)

(нет голосов)

Загрузка ...

Подрывник

Профиль
Группа: Завсегдатай
Сообщений: 3137
Регистрация: 27.12.2005
Где: Ростов-на-Дону

Репутация: 14
Всего: 78

Создаёшь длл, в ней создаёшь новую форму. В теле длл пишешь:

Код


procedure ShowFormAA;
begin
  Form1 := TForm1.Create(Self);
  Form1.Show;
end;

exports
  ShowFormAA;

Потом присоединяешь длл к главному проекту, типа:

Код


procedure ShowFormAA; external 'mydll.dll';

и вызываешь там, где она нужна...

Код


procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowFormAA;
end;

Это сообщение отредактировал(а) Guedda - 22.4.2007, 11:55

--------------------

Ll 2

MetalFan

Дата 22.4.2007, 12:40 (ссылка)

(нет голосов)

Загрузка ...

Аццкий Сотона

Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 62
Всего: 128

а вообще формы в длл не рулят)

--------------------

There are always someone smarter than you...

Sanchezzz

Дата 23.4.2007, 19:28 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1670
Регистрация: 19.11.2006
Где: Voronezh

Репутация: 5
Всего: 60

как при офторном вызове чтоб он не создовал второе окно. мне нужно чтоб я имел доступ и к первой форме в програме и ко второй форме в длл.

Код


procedure ShowFormAA;
begin
  Form1 := TForm1.Create(Self);
  Form1.Show;
end;

self он не хочет компелировать лутше использовать:

Код


procedure ShowFormAA(AtHandle:Handle);
begin
Application.Handle := AеHandle;
Form1 := TForm1.Create(Application);
Form1.Show;
end;

Это сообщение отредактировал(а) Sanchezzz - 23.4.2007, 19:30

--------------------

Понравился ответ "+" по репе, не забываем закрывать тему, заказы в LS.

Yanis

Дата 23.4.2007, 19:40 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 72
Всего: 111

Цитата(Sanchezzz @ 23.4.2007, 20:28

)

Form1 := TForm1.Create(Self);

В данном случае Self совершенно неуместно.
По этой же ошибке совершенно ясно, что данная тема, на существующем уровне понимания, не подъёмна для тебя.

Добавлено через 4 минуты и 3 секунды

Цитата(Sanchezzz @ 23.4.2007, 20:28

)

Просто не надо давать возможность повторного вызова, если форма отображена.

--------------------

*щёлк*

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »