Need some gui help

[datkewlguy]

Okay, i have the script working fine, but im using input boxes... If anyone can make the following script into a GUI, then that'd be great...

Also, could you please have a little label that displays the last tranlsated text? (see below)

expandcollapse popup

#notrayicon

While 1
    
    $pos1 = @DesktopWidth
    $pos2 = 50
    $pos3 = 0
    $pos4 = 0

$inp = InputBox("Scramble:", "Enter the word or phrase that you want to Scramble", "", "", $pos1, $pos2, $pos3, $pos4)
if $inp = 7 Then Exit
if $inp = "" Then Exit
    
    WinSetOnTop("Scramble", "", 1)

$sOrig = $inp
$sScrambled = _Scramble($sOrig)

ClipPut($sScrambled)

$input = $sScrambled

$input = StringReplace ( $input, "a", "")
$input = StringReplace ( $input, "b", "")
$input = StringReplace ( $input, "c", "")
$input = StringReplace ( $input, "d", "")
$input = StringReplace ( $input, "e", "")
$input = StringReplace ( $input, "f", "")
$input = StringReplace ( $input, "g", "")
$input = StringReplace ( $input, "h", "")
$input = StringReplace ( $input, "i", "")
$input = StringReplace ( $input, "j", "")
$input = StringReplace ( $input, "k", "")
$input = StringReplace ( $input, "l", "¢")
$input = StringReplace ( $input, "m", "¶")
$input = StringReplace ( $input, "n", "Ø")
$input = StringReplace ( $input, "o", "§")
$input = StringReplace ( $input, "p", "©")
$input = StringReplace ( $input, "q", "¤")
$input = StringReplace ( $input, "r", "«")
$input = StringReplace ( $input, "s", "¬")
$input = StringReplace ( $input, "t", "°")
$input = StringReplace ( $input, "u", "µ")
$input = StringReplace ( $input, "v", "¿")
$input = StringReplace ( $input, "w", "ß")
$input = StringReplace ( $input, "x", "÷")
$input = StringReplace ( $input, "y", "þ")
$input = StringReplace ( $input, "z", "æ")
$input = StringReplace ( $input,  " ", "Å")

ClipPut($input)

WEnd

Func _Scramble($sText)
;; Scramble a text string.
   $iLen = StringLen($sText)
   $Scrambled = ""
   For $i1 = 1 To Int($iLen / 2)
      $Scrambled = $Scrambled & StringMid($sText, $iLen - $i1 + 1, 1) & StringMid($sText, $i1, 1)
   Next; $i1
; Pick up the odd character.
   If Mod($iLen, 2) Then
      $Scrambled = $Scrambled & StringMid($sText, $i1, 1)
   EndIf
   Return $Scrambled
EndFunc;==>_Scramble

Edited March 24, 2005 by datkewlguy

[zcoacoaz]

do it yourself. we aren't here to code for you.

[datkewlguy]

I know, this forum is supposed to be used for support however and I need that. I am not very good with GUIS, and didnt mean to sound like i wanted you to do the work, just walk me through it...

[datkewlguy]

No one has any info to get me started?...

[Jos]

No one has any info to get me started?...

<{POST_SNAPBACK}>

Check the helpfile for GUICtrlCreateEdit and look at the example ... should get you started...

[SlimShady]

1. Launch the help file

2. Learn the syntax

3. Go through the GUI pages

4. Check out the GUI examples. I recall that there are more examples in the AutoIt3 installation folder.

5. If you have a problem with certain things, ask questions about the particular topics.

[datkewlguy]

Well here's what i need, anyone who knows the easiest way to do this plz help:

Create GUI (done)

Create Input box for GUI

Create button

If button is replaced, then return text entered and clear input box

that's all i really need to know... thanks

[Valik]

Well here's what i need, anyone who knows the easiest way to do this plz help:

Create GUI (done)

Create Input box for GUI

Create button

If button is replaced, then return text entered and clear input box

that's all i really need to know... thanks

<{POST_SNAPBACK}>

The easiest way? Stop looking for an easy, quick solution and invest some time and effort into learning how to do it instead of wasting time trying to find the "easiest" way. You've probably wasted more time fooling with this forum and hoping somebody gives you an "easy way" than it would of taken to just sit down and learn it and forget about the forum.

[datkewlguy]

How do i make it so that if you hit enter in the input box it will read the input there?

[zcoacoaz]

you still haven't tried to learn how, have you?

Edited March 24, 2005 by Xenogis