Jump to content
Sign in to follow this  
mesale0077

font problem

Recommended Posts

mesale0077

;Code:

Dim $a[7500]

Dim $topla = ""

#include <GuiConstants.au3>

#NoTrayIcon

$a[0]="hola:hello" ;

$a[1]="cómo: how are you"

GUICreate("Dictionary v.1.0", 400, 400)

GUISetBkColor(0x00FF99)

WinSetTrans("Dictionary v.1.0", "", 240)

GUISetState(@SW_SHOW)

$araB=GUICtrlCreateInput("", 88, 20, 190, 25)

GUICtrlSetFont(-1,12,600)

$button_1 = GUICtrlCreateButton("search", 285, 20, 50, -1, 0x0001)

GUICtrlSetFont(-1,9,600)

$list_1=GUICtrlCreateEdit("", 21, 80, 375,310, 0x00200000)

GUICtrlSetFont(-1,12,800)

Func Ara()

GUICtrlSetData($list_1,"")

$ara=GUICtrlRead($araB)

if StringLen($ara)<2 Then

MsgBox(48, "Dictionary", "When searching, enter at least two characters!")

Else

GUICtrlSetData($list_1,"searching.....")

for $xx=0 to 7499 ;

if StringInStr($a[$xx], $ara)>0 then $topla = $topla & $a[$xx] & chr(13) & chr(10) & chr(13) & chr(10)

Next

if $topla=="" then $topla="Results not found!"

GuiCtrlSetData($list_1, $topla)

$topla=""

EndIf

EndFunc

While 1

$msg = GUIGetMsg()

Select

Case $msg = $GUI_EVENT_CLOSE

ExitLoop

Case $msg = $button_1

if stringlen(GUICtrlRead($araB))>0 Then Ara()

Case $msg= ""

EndSelect

WEnd

this no problem code but font,Why are fonts like the one in picture help please

Share this post


Link to post
Share on other sites
bo8ster

Ran the code and it works for me. Check the font settings on your computer.


Post your code because code says more then your words can. SciTe Debug mode - it's magic: #AutoIt3Wrapper_run_debug_mode=Y. Use Opt("MustDeclareVars", 1)[topic="84960"]Brett F's Learning To Script with AutoIt V3[/topic][topic="21048"]Valuater's AutoIt 1-2-3, Class... is now in Session[/topic]Contribution: [topic="87994"]Get SVN Rev Number[/topic], [topic="93527"]Control Handle under mouse[/topic], [topic="91966"]A Presentation using AutoIt[/topic], [topic="112756"]Log ConsoleWrite output in Scite[/topic]

Share this post


Link to post
Share on other sites
mesale0077

thank you for your help,no problem ,the font settings on my computer,ok now no problem,the trouble for my computer, now no trouble ,now working code

good works

Edited by mesale0077

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×