Hmm, ok. And here is the adapted version of the demo script of my own randomWord library. It have the same gui, but works with randomName function:
Code:
#Include *i randomName.ahk
#NoEnv
SendMode Input
SetWorkingDir %A_ScriptDir%
Gui, Font, S12, Courier New
Gui, Add, Edit, Vresults R8
Gui, Font
Gui, Add, Checkbox, Vlimit Glimit Checked0 X+8 Section, Length:
Gui, Add, Edit, Vlen
Gui, Add, UpDown, Range2-10, 5
Gui, Add, Button, X14 Vgenerate Ggenerate +Default, Generate
Gui, Font, S8 Cgray
Gui, Add, Text, XS+8 Y+-16, Copyright 2010 Tuncay
Gui, Font
GuiControl, Disable, len
Gui, Show,, Gui for Random Word Generator
GoSub, generate
RETURN
GuiClose:
ExitApp
generate:
Gui, Submit, NoHide
names := ""
Loop, 8
{
names .= randomName(limit ? len : 4, limit ? len : 10) . "`n"
Sleep, 20
}
StringTrimRight, names, names, 1
GuiControl,, results, %names%
return
limit:
Gui, Submit, NoHide
If (limit)
{
GuiControl, Enable, len
}
else
{
GuiControl, Disable, len
}
return