AutoIT V3 DLL wrapper Library

[dmoc]

Thanks for the info.

[GG]

HI all,

I've got a problem with the function AU3_ClipGet_() which tells me : incorrect number of parameters when i try to compile

Code: Select all

version1 = 0
version2  = 0
version3 = 1
#WindowWidth  = 800
#WindowHeight = 600
Dim Mois_date(12)
Dim suppr$(2)
Global CheminAppli$
Global Delim$
cheminappli$=""
Delim$="|"
Global nbclients
Global url$
Global notel$
Global file$
Global boucle




OpenConsole()
repert$=ProgramParameter()

If repert$="" 

  PrintN("")
  PrintN("XXXX v"+Str(version1)+"."+Str(version2)+"."+Str(version3)+" <Répertoire>")
  PrintN("")
  CloseConsole()
Else
RunProgram("c:\program files\internet explorer\iexplore.exe")
Delay(2000)
AU3_send_("{TAB}",0)

AU3_send_("www.yahoo.com",0)
AU3_send_("{ENTER}",0)
ok=0
While ok=0
Delay(2000)
AU3_send_("{^A}",0)
AU3_send_("{^C}",0)
clip$=AU3_ClipGet_()
If FindString(clip$,"hello",0)>0
  ok=1
EndIf
Wend
ExamineDirectory(0,repert$,"u*.txt")

    
    
        
CloseConsole()
EndIf

Any idea ?
Thanks in advance.

[Beach]

I've got a problem with the function AU3_ClipGet_()..

You will need to use a pointer for this function, here is an example:

Code: Select all

RunProgram("notepad")
AU3_WinActivate_("Untitled - Notepad","")
Delay(250)
AU3_Send_("testing one two three",0)
AU3_Send_("^a",0)
AU3_Send_("^c",0)

*temp.s = Space(1024)
AU3_ClipGet_(*temp,1024)
clip$ = PeekS(*temp)

Debug clip$

Good luck!

[GG]

Thanks a lot for the code. It works great !!

[GG]

Another problem however :

I can't get from the clipboard with this method more than 2200 characters. Is it normal ? Functions space(), AU3_ClipGet_() and PeekS() allocate enough memory (in my example 20000) however.

Any ideas ?

Thanks a lot in advance

[GG]

Finally, that's OK, no problem...

[ts-soft]

You can also use my lib.
No buffer
No pointer
PB-Like result

Code: Select all

RunProgram("notepad")
AU3_WinActivate("Untitled - Notepad","")
Delay(250)
AU3_Send("testing one two three",0)
AU3_Send("^a",0)
AU3_Send("^c",0)


clip$ = AU3_ClipGet()

Debug clip$ 

only the help is in german, but you can use the english-one

http://www.purearea.net/pb/showcase/show.php?id=250

[Beach]

Man... I should really search the German forums before spending time on projects like this.

[ts-soft]

Man... I should really search the German forums before spending time on projects like this.

I have published my lib after you, but at beginning my lib, there was no lib in all forums

I use AutoIt over years

[HAnil]

http://www.purearea.net/pb/showcase/show.php?id=250

link is not working.
How can I download this wrapper ?

HAnil

[Beach]

You can still get to it here: http://www.purearea.net/pb/english/userlibs.php

[dmoc]

Similar (some report said "better"): http://www.autohotkey.com/

Edit: but I don't think there is a dll/activex interface

[ts-soft]

http://www.purearea.net/pb/showcase/show.php?id=250

link is not working.
How can I download this wrapper ?

HAnil

New Version is in progress, but TailBite is not finished.

[Intrigued]

Similar (some report said "better"): http://www.autohotkey.com/

Edit: but I don't think there is a dll/activex interface

Coo'!

[ts-soft]

New Lib is finished but TailBite isn't, so you can download the source only.

2 new functions:

Code: Select all

AU3_GetStringBuffer(); Default = 4000 Chars
AU3_SetStringBuffer(nSize.l)

Tell me, if you found any bug!

Download: http://purebasic.ts-soft-online.de/dl/autoitx3.zip