1. RE: getSelectedText and SortedLists
- Posted by Cassidy Napoli <gonzotek at yahoo.com> Nov 07, 2001
- 325 views
Is this any help? -- code generated by Win32Lib IDE v0.11.0 (with a bit of hand tweaking by Cassidy) include Win32lib.ew without warning ------------------------------ -- Window Window1 global constant Win = create( Window, "Win", 0, Default, Default, 400, 300, 0 ) global constant listname = create( SortedList, "", Win, 76, 76, 150, 120, 0 ) global constant lbl = create( LText, "", Win, 140, 40, 150, 20, 0 ) ------------------------------ procedure listname_onClick () integer idx idx = getIndex(listname) setText(lbl, getItem (listname, idx ) ) end procedure onClick[listname] = routine_id("listname_onClick") ------------------------------ procedure Win_onOpen () addItem(listname,"3") addItem(listname,"1") addItem(listname,"c") addItem(listname,"2") end procedure onOpen[Win] = routine_id("Win_onOpen") WinMain( Win, Normal )
2. RE: getSelectedText and SortedLists
- Posted by Evan Marshall <evan at net-link.net> Nov 07, 2001
- 326 views
This is a multi-part message in MIME format. ------=_NextPart_000_0014_01C167A2.7E7A6D40 boundary="----=_NextPart_001_0015_01C167A2.7E820E60" ------=_NextPart_001_0015_01C167A2.7E820E60 charset="iso-8859-1" Never mind, I got it. ------=_NextPart_001_0015_01C167A2.7E820E60 charset="iso-8859-1" <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content="text/html; charset=iso-8859-1" http-equiv=Content-Type><BASE href="file://C:\Program Files\Common Files\Microsoft Shared\Stationery\"> <STYLE></STYLE> <META content="MSHTML 5.00.2614.3500" name=GENERATOR></HEAD> <BODY background=""> ------=_NextPart_000_0014_01C167A2.7E7A6D40 Content-Type: text/x-vcard; name="Evan Marshall.vcf" Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename="Evan Marshall.vcf" BEGIN:VCARD VERSION:2.1 N:Marshall;Evan FN:Evan Marshall ORG:Midbrook, Inc TITLE:Controls Engineer TEL;WORK;VOICE:(517) 787-3481 TEL;WORK;FAX:(517) 787-2349 ADR;WORK:;;2080 Brooklyn Rd.;Jackson;MI;49204 LABEL;WORK;ENCODING=3DQUOTED-PRINTABLE:2080 Brooklyn = Rd.=3D0D=3D0AJackson, MI 49204 URL: URL:http://www.midbrook.com EMAIL;INTERNET:emarshall at midbrook.com EMAIL;PREF;INTERNET:evan at net-link.net REV:20011107T204014Z END:VCARD ------=_NextPart_000_0014_01C167A2.7E7A6D40--