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

Фокус в MDI приложении.   Найти похожие ветки 

← →
Vovans   (2004-03-23 21:59) [0]

Народ, подскажите пожалуйста, как вернуть фокус в дочерние окошко после, скажем использования, ComboBox на главной форме.
Вот мой код, подскажите пожалуйста что не так.
procedure TForm1.ComboBox1Change(Sender: TObject);
var i:integer;
begin
if (activeMDIchild as Tform2)=nil then begin showmessage("Íè÷åãî íå çàãðóæåíî"); exit; end;
for I := MDIChildCount-1 downto 0 do
begin
(MDIchildren[i] as Tform2).richedit1.SelAttributes.name:=form1.ComboBox1.text;
end;
(MDIchildren[0] as Tform2).richedit1.setfocus;
end;

---

← →
Vovans   (2004-03-23 22:25) [1]

!!!!!!!!!!!ЛЮДИ!!!!!!!!!!!
Вы меня слышите?!?!?!!?!?!?

---

← →
Deflorator++   (2004-03-24 00:48) [2]

может и тупо, но я делаю так:
TMDIChild(MDIChildren[i]).BringToFront;
PostMessage(TMDIChild(ActiveMDIChild).RichEdit2.Handle, WM_LBUTTONDOWN, 0, 0);

---

← →
Diamond Cat ©   (2004-03-24 04:24) [3]

а прото setfocus не катит???

---

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

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



Память: 0.45 MB
Время: 0.037 c