Jump to content
Sign in to follow this  
Armand

Moved->

Recommended Posts

moved! Edited by Armand

Share this post


Link to post
Share on other sites

Hallo Armand

Well this is a comercial component with a advetize notized attached at startup - just to let you know but this little example should get you up and running

; Author:   Kåre Johansson
; Description: Very Simple example: Embedding ELImageCompare.ImageCompare.1" => "ELImageCompare.dll"
; Date: 22.9.07

#include <GUIConstants.au3>

Global $oEI = ObjCreate("ELImageCompare.ImageCompare.1")
If Not IsObj($oEI) Then 
    MsgBox(48,"ERROR...","ELImageCompare object failed")
    Exit
EndIf

GUICreate ("Embedded ImageCompare control Test", 620, 425, -1, -1)
GUICtrlCreateObj($oEI, 0, 0 , 180, 185)

With $oEI; Create Object tag pool
    $Value = .Compare('C:\Pic\Image1.gif','C:\Pic\Image1.gif')
EndWith
    If $Value == -1 Then
        Consolewrite("Cannot compare." & @CRLF)
    Elseif $Value == 0 Then
        Consolewrite("Images are different." & @CRLF)
    Else
        Consolewrite("Images are similar." & @CRLF)
    EndIf

GUISetState();Show GUI
While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
    EndSelect
WEnd

GUIDelete ()
$oEI = 0 ; Free the compoment
Exit

Note: There are no events attached to this component only properties an methodes allowed ( setup and returns )

Place the library in your system32 directory and do a registration with command: regsvr32 ELImageCompare.dll

kjactive :)

Edited by kjactive

Share this post


Link to post
Share on other sites

Hallo Armand

Well this is a comercial component with a advetize notized attached at startup - just to let you know but this little example should get you up and running

; Author:   Kåre Johansson
; Description: Very Simple example: Embedding ELImageCompare.ImageCompare.1" => "ELImageCompare.dll"
; Date: 22.9.07

#include <GUIConstants.au3>

Global $oEI = ObjCreate("ELImageCompare.ImageCompare.1")
If Not IsObj($oEI) Then 
    MsgBox(48,"ERROR...","ELImageCompare object failed")
    Exit
EndIf

GUICreate ("Embedded ImageCompare control Test", 620, 425, -1, -1)
GUICtrlCreateObj($oEI, 0, 0 , 180, 185)

With $oEI; Create Object tag pool
    $Value = .Compare('C:\Pic\Image1.gif','C:\Pic\Image1.gif')
EndWith
    If $Value == -1 Then
        Consolewrite("Cannot compare." & @CRLF)
    Elseif $Value == 0 Then
        Consolewrite("Images are different." & @CRLF)
    Else
        Consolewrite("Images are similar." & @CRLF)
    EndIf

GUISetState();Show GUI
While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
    EndSelect
WEnd

GUIDelete ()
$oEI = 0; Free the compoment
Exit

Note: There are no events attached to this component only properties an methodes allowed ( setup and returns )

Place the library in your system32 directory and do a registration with command: regsvr32 ELImageCompare.dll

kjactive :)

抢我沙发,MJJ!

Share this post


Link to post
Share on other sites

抢我沙发,MJJ!

You have a great start on this forum .. 4 post - 4 times BS ... Edited by Jos

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  

×
×
  • Create New...