Вниз
Скачать: CL | DM;

demomodalvcl2koldll - вовсе и не модал   Найти похожие ветки 

 
parovoZZ ©   (2006-06-17 06:40) [0]

Собственно в демонстрационном примере есть такое
procedure CallKOLFormModal;
begin
 NewKOLForm1( KOLForm1, Applet );
 KOLForm1.Form.ShowModal;
 KOLForm1.Form.Free;
 KOLForm1 := nil;
end;

Проблема в том, что форма из длл вовсе и не модальная, а обыкновенная.


 
ECM ©   (2006-06-17 11:24) [1]

В пример вкралась неточность :)
Должно быть:
procedure CallKOLFormModal;
begin

 NewKOLForm1( KOLForm1, Applet );
 KOLForm1.Form.ShowModalEx;
 KOLForm1.Form.Free;
 KOLForm1 := nil;
end;
...
   function ShowModalEx: Integer;
   {* The same as ShowModal, but all the windows of current thread are
      disabled while showing form modal. This is useful if KOL form from
      a DLL is used modally in non-KOL application. }



 
parovoZZ ©   (2006-06-18 02:14) [2]

Ну а если у меня ехе кол? Будет работать первый вариант?

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


 
ECM ©   (2006-06-18 11:00) [3]

> у меня переводчик сдох,

Совет: учите английский - без него труба :)

> Ну а если у меня ехе кол?

Без разницы - ставьте ShowModalEx в любом случае


 
parovoZZ ©   (2006-06-20 02:16) [4]

А как при клике сделать звук и мигание модального окна?


 
ECM ©   (2006-06-20 11:02) [5]

> А как при клике сделать звук и мигание модального окна?

Громко пукнуть и немного поморгать глазом :)

В простейшем случае воспользоваться функциями MessageBeep(sndPlaySound),
FlashWindow(Ex). Только к KOL это отношения никакого не имеет. Да и задавать кучу разных вопросов не относящихся к теме ветки - глупо.
Создайте отдельную ветку - там и выясняйте - у Вас будет больше шансов получить правильный ответ...


 
parovoZZ ©   (2006-06-20 22:38) [6]

Ну почему же, на VCL это реализовано.



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

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



Память: 0.46 MB
Время: 0.027 c
15-1172171494
mdw
2007-02-22 22:11
2007.03.18
23 февраля


15-1171988437
vasIZmax
2007-02-20 19:20
2007.03.18
Вот давно хотел спросить...


2-1171876396
Прохожев Максим
2007-02-19 12:13
2007.03.18
Количество строк в проекте


3-1167045552
tytus
2006-12-25 14:19
2007.03.18
10g Express edition & DOA 4.0.7 - проблема с коннектом


15-1171614345
KSergey
2007-02-16 11:25
2007.03.18
Проверка перфоратора




   Наверх