RE: Who can write an inputbox.e?
- Posted by Liu Junfeng <rufi at 163.com> Jan 22, 2003
- 448 views
Dan Moyer wrote: > Liu, > > 1. Although I'm a poor judge, if you just got to know Euphoria only ten > days ago, I'd say you're doing *exceptionally* well, & I hope we see > many > useful code contributions from you! > Yes, I have work out a sofeware named QuickLauncher, It can manage your shotcuts,and quickly launch a program , open a file or directroy. > 2. Your improved inputbox.ew is missing the code doing the creation of > the > inputbox. (That was one of the problems I had when I tried to do it in > response to your question: ie, making a window that was child of the > main > window, before the main was created.) > That is an unexpected error of IE, not my original code. > 3. You "copyrighted" your code; did you mean that no one may use your > code > without your express permission? I think many people don't understand > that > "copyright" does NOT mean "this code was created by me", but rather "I, > the > creator of this code, restrict the right to copy this code without my > express permission". In other words, "copyright" means "having the > right to > copy", and restricts that right to the author and any persons expressly > given that right *by* the author. > I am not a native speaker of English, anyone can use my code freely, only to know who coded it. > 4. I think most people on this list know that Euphoria (and various > libraries like Win32Lib and utilities like the IDE) need improvement, > and > many are in one way or another working to help with that improvement; so > your "Euphoria has a long way to go!" message is at the somewhat > superfluous > at best. > I don't strongly mean a critic, Euphoria is still not ideal for me. > Water is Wet! > Fire is Hot! > Ice is Cold! > Sand is Abrasive! > > Dan Moyer > > ----- Original Message ----- > From: "Liu Junfeng" <rufi at 163.com> > To: "EUforum" <EUforum at topica.com> > Sent: Tuesday, January 21, 2003 12:37 AM > Subject: RE: Who can write an inputbox.e? > > > > Pete Lomax wrote: > > > Some comments about this: > > > > > > > > > > > Like I say, the above works fine; if the above suggested mods cause > > > problems, then maybe just let sleeping dogs lie. If you intend to use > > > it alot in the future though, the above advice stands. > > > > > > Pete > > > PS maybe a destroy(inputbox) prior to each time calling input_box > > > would be same, no experience here Anyone? > > > > > > > > I got to know Euphoria only ten days ago,so I havn't much experience. > > Here is my modified code: > > -- inputbox.ew - open an inputbox > > -- Copyright (C) 2003 Liu Junfeng > > -- If you wish to contact me, send an e-mail to rufi at 163.com > > > > include win32lib.ew > > without warning > > > > constant Width=280,Height=120 > > sequence ScreenSize,Text > > ScreenSize = getCtlSize( Screen ) > > constant inputbox= > > ]-Width)/2,(ScreenSize[2]-Height)/2,Width,Height,{WS_CAPTION,WS_BORDER}, > > WS_EX_TOPMOST), > > label = create(LText,"",inputbox,10,10,200,20,0), > > entry = create( EditText, "", inputbox, 10, 30, 180, 25, 0 ), > > ok = create( PushButton, "OK", inputbox, 20, 65, 60, 20, 0 > > ), > > cancel = create( PushButton, "Cancel",inputbox, 120, 65, 60, > > 20, 0 ) > > procedure Click_Button(integer self, integer event, sequence parms) > > if self=ok then Text=getText(entry) > > else Text="" end if > > closeWindow( inputbox ) > > end procedure > > setHandler({ok,cancel}, w32HClick, routine_id( "Click_Button" )) > > global function input_box(sequence text,sequence title,integer parent) > > setText(label,text) > > setText(inputbox,title) > > openDialog(inputbox) > > return Text > > end function > > > > Euphoria has a long way to go! > > > > > > TOPICA - Start your own email discussion group. FREE! > > > Euphoria is one of my favorite languages!