Скачать: CL | DM;

Динамическое создание формы при HTTP-запросе   Найти похожие ветки 

← →
Pavel   (2010-03-29 11:33) [0]

Необходимо при HTTP-запросе динамически создавать форму.
Делаю так: запрос обрабатываю через IdHTTPServer1.
В обработчике IdHTTPServer1CommandGet пишу следующее:


procedure TForm1.IdHTTPServer1CommandGet(AContext: TIdContext;
 ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
begin
 Form2 := TForm2.Create(Application);
 Form2.Caption := "Form2";
 Form2.Show;
end;


В результате Form2 не отображается.

---

← →
Медвежонок Пятачок ©   (2010-03-29 11:37) [1]

И не должна отображаться. И хорошо что не отображается

---

← →
brother ©   (2010-03-29 11:40) [2]

> при HTTP-запросе динамически создавать форму

в коде запроса нету...

> В результате Form2 не отображается.


> Form2 := TForm2.Create(Application);

это что? не TForm?

---

← →
brother ©   (2010-03-29 11:51) [3]

зы: для начала - создай динамически форму без всяких запросов, а потом уж фантазируй дальше, имхо

---

← →
12 ©   (2010-03-29 11:58) [4]

причем тут http..

showmessage(""); - выскакивает?

Form2 := TForm2.Create(Application);
Form2.Caption := "Form2";
Form2.Show;

---

← →
Дмитрий Белькевич   (2010-03-30 12:51) [5]

Есть подозрение, что проблема из-за отсутствия синхронизации потоков. IdHTTPServer1CommandGet вызывается не в основном потоке, скорее всего.

---

← →
[true]TRIx ©   (2010-03-30 16:15) [6]

Скачай исходник http://www.ritlabs.com/en/products/tinyweb/

---

← →
[true]TRIx ©   (2010-03-30 16:29) [7]

имею ввиду TinyWeb

---

← →
Дмитрий Белькевич   (2010-03-30 16:43) [8]

Вообще - зачем такое поведение могло понадобиться - пока не ясно.

---

← →
Loginov Dmitry ©   (2010-03-30 23:52) [9]

> В результате Form2 не отображается.


Слава богу что не отображается. А если бы отобразилось, то было бы немало глюков.
Общаться с формой можно только из основного потока!

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.006 c