H hanliu Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-21 #1 窗体form1和form2,当form1中的richedit1里的字被选中时(字的周围出现黑影),<br>此时点击一下form2,[?]怎样才能使richedit1中选中的字还处于被选中状态?[?]
H hanliu Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-21 #4 to:quejian<br>我不要太复杂的,你说值多少分,我给你,<br>我没多少分了!!我会给你多加分的!
R realLearning Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-21 #5 richedit1.hideselection := False;
T tycoonsl Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-21 #6 只需设置richedit的hideSelection属性为false就行了
Y yk46 Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-22 #11 好像不可能,<br>当form1.active=false时,<br>form1.control .setfocus=true<br>??
W wfzha Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-23 #13 你在Form2加上下面的代码,在Form1中的Richedit控件里选中一些内容,在点击Form2<br>当前顶端的窗口还是Form1,Richedit中选中的内容仍然选中<br>procedure TForm2.FormMouseDown(Sender: TObject; Button: TMouseButton;<br> Shift: TShiftState; X, Y: Integer);<br>begin<br> setactivewindow(form1.Handle);<br>end;<br>
你在Form2加上下面的代码,在Form1中的Richedit控件里选中一些内容,在点击Form2<br>当前顶端的窗口还是Form1,Richedit中选中的内容仍然选中<br>procedure TForm2.FormMouseDown(Sender: TObject; Button: TMouseButton;<br> Shift: TShiftState; X, Y: Integer);<br>begin<br> setactivewindow(form1.Handle);<br>end;<br>
L Laird Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-23 #14 把已经选中的数值放到变量里不行吗?<br>离开form1时写<br>进入时如果不为空就读