Page 2 of 3

Posted: Wed Jul 27, 2005 3:44 pm
by dmoc
Thanks for the info.

Problem with AU3_ClipGet_()

Posted: Tue Dec 06, 2005 2:03 pm
by 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.

Re: Problem with AU3_ClipGet_()

Posted: Tue Dec 06, 2005 4:54 pm
by Beach
GG wrote: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!

Posted: Wed Dec 07, 2005 3:56 pm
by GG
Thanks a lot for the code. It works great !!

Posted: Wed Dec 07, 2005 5:58 pm
by 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

Posted: Wed Dec 07, 2005 6:25 pm
by GG
Finally, that's OK, no problem... :oops:

Posted: Wed Dec 07, 2005 7:02 pm
by 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

Posted: Wed Dec 07, 2005 9:19 pm
by Beach
Man... I should really search the German forums before spending time on projects like this. :cry:

Posted: Wed Dec 07, 2005 9:31 pm
by ts-soft
Beach wrote:Man... I should really search the German forums before spending time on projects like this. :cry:
I have published my lib after you, but at beginning my lib, there was no lib in all forums :wink:

I use AutoIt over years

Posted: Fri Feb 10, 2006 10:20 pm
by HAnil
http://www.purearea.net/pb/showcase/show.php?id=250

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

HAnil

Posted: Fri Feb 10, 2006 10:47 pm
by Beach

Posted: Sat Feb 11, 2006 1:38 am
by dmoc
Similar (some report said "better"): http://www.autohotkey.com/

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

Posted: Sat Feb 11, 2006 3:02 am
by ts-soft
HAnil wrote: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.

Posted: Sat Feb 11, 2006 3:48 am
by Intrigued
dmoc wrote:Similar (some report said "better"): http://www.autohotkey.com/

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

Posted: Mon Feb 13, 2006 11:50 am
by 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