Re: combo
- Posted by martin.stachon at worldonline.cz May 30, 2001
- 370 views
This is a multi-part message in MIME format. ------=_NextPart_000_0067_01C0E924.FA4FC480 charset="koi8-r" >From win32lib : global procedure copy( integer id ) =20 -- send a copy request to a window VOID =3D sendMessage( id, WM_COPY, 0, 0 ) =20 end procedure >From Win32 reference manual : When sent to a combo box, the WM_COPY message is handled by its edit = control. This message has no effect when sent to a combo box with the = CBS_DROPDOWNLIST style.=20 ----- Original Message -----=20 From: Victor Churikov=20 To: EUforum=20 Sent: Wednesday, May 30, 2001 6:21 PM Subject: combo Hi, everybody! I've written a simple code for copying selected text from one edit control to another. It perfectly works with MleText or EditText controls (see the code below), but if I replace the EditText1 by a Combo1 (combo control), the moving text fails. Does anyone know how to fix this? Thanks so much! Victor Churikov include Win32Lib.ew --(c) D.Cuny and Friends without warning constant Win =3D create( Window, "Window1", 0, Default, Default, 500, 350, 0 ) , MleText1 =3D create( MleText, "", Win, 32, 64, 328, 204, 0 ) , Button1 =3D create( PushButton, "Move", Win, 68, 20, 90, 30, 0 ) , EditText1 =3D create( EditText, "", Win, 200, 24, 148, 24, 0 ) procedure Button1_onClick() copy(EditText1) paste(MleText1) end procedure onClick[Button1] =3D routine_id("Button1_onClick") WinMain( Win, Normal ) =20 ------=_NextPart_000_0067_01C0E924.FA4FC480 Content-Type: text/html; charset="koi8-r" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Dkoi8-r" http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2614.3500" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3D"Arial CE" size=3D2>From win32lib :</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3D"Courier New" size=3D2>global procedure copy( integer = id=20 ) <BR> -- send a copy request to = a=20 window<BR> VOID =3D sendMessage( id, WM_COPY, 0, 0=20 ) <BR>end procedure</FONT></DIV> <DIV><FONT face=3D"Arial CE" size=3D2></FONT> </DIV> <DIV><FONT face=3D"Arial CE" size=3D2>From Win32 reference manual = :</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3D"Arial CE" size=3D2>When sent to a combo box, the = WM_COPY message=20 is handled by its edit control. This message has no effect when sent to = a combo=20 box with the CBS_DROPDOWNLIST style. </FONT></DIV> <BLOCKQUOTE=20 style=3D"BORDER-LEFT: #000000 2px solid; MARGIN-LEFT: 5px; MARGIN-RIGHT: = 0px; PADDING-LEFT: 5px; PADDING-RIGHT: 0px"> <DIV style=3D"FONT: 10pt arial CE">----- Original Message ----- </DIV> <DIV=20 style=3D"BACKGROUND: #e4e4e4; FONT: 10pt arial CE; font-color: = black"><B>From:</B>=20 <A href=3D"mailto:phyvmc at ccunix.ccu.edu.tw"=20 title=3Dphyvmc at ccunix.ccu.edu.tw>Victor Churikov</A> </DIV> <DIV style=3D"FONT: 10pt arial CE"><B>To:</B> <A=20 href=3D"mailto:EUforum at topica.com" = title=3DEUforum at topica.com>EUforum</A> </DIV> <DIV style=3D"FONT: 10pt arial CE"><B>Sent:</B> Wednesday, May 30, = 2001 6:21=20 PM</DIV> <DIV style=3D"FONT: 10pt arial CE"><B>Subject:</B> combo</DIV> <A = replace the EditText1 by a Combo1 (combo = control),<BR>the<BR>moving text=20 fails.</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>Does anyone know how to fix = this?</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>Thanks so much!</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>Victor Churikov</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>include Win32Lib.ew --(c) D.Cuny and=20 Friends<BR>without warning</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> constant Win =3D create( = Window, "Window1",=20 0, Default, Default, 500,<BR>350, 0 ) ,<BR> MleText1 =3D create( = MleText,=20 "", Win, 32, 64, 328, 204, 0 ) ,<BR> Button1 =3D create( = PushButton,=20 "Move", Win, 68, 20, 90, 30, 0 ) ,<BR> EditText1 =3D create( = EditText, "",=20 Win, 200, 24, 148, 24, 0 )</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>procedure=20 Button1_onClick()<BR>copy(EditText1)<BR>paste(MleText1)<BR>end=20 procedure<BR>onClick[Button1] =3D = routine_id("Button1_onClick")</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>WinMain( Win, Normal )</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial = size=3D2></FONT> </DIV><PRE>=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D Get your FREE online credit report from ConsumerInfo.Com! ConsumerInfo.Com makes staying on top of your credit history fast and easy. Gain peace of mind and take control of the accuracy of your credit report today! <A = Or send an email To: EUforum-unsubscribe at topica.com This email was sent to: martin.stachon at worldonline.cz <A = ------=_NextPart_000_0067_01C0E924.FA4FC480--