Beiträge von Greenhorn

**Greenhorn**

Du musst Dich nicht dafür entschuldigen.

Vorschlag: Hinten das Logo, vorn die Schrift (oder anders herum).

Gruß
Greenhorn

**Greenhorn**

Prima Idee. Und wenn es dem Forum ein paar Spenden einbringt, um so besser.
Für meinen Geschmack ist das AutoIt-Logo etwas zu groß ...

Gruß
Greenhorn

**Greenhorn**

Hmm,

übrigens braucht man die Funktion CallWindowProc nicht mehr.
AutoIt 3.3.8 beinhaltet eine neue Funktion DllCallAddress.
Damit sollte alles ein wenig runder laufen.
Evtl. muss die FASM.au3 ewas angepasst werden, aber wie gesagt, ich kenne mich mit der UDF nicht aus.
Am Besten einfach mal Andy direkt fragen.

Gruß
Greenhorn

**Greenhorn**

Hi,

ich kenne mich nicht mit der FASM.au3 aus, aber warum sollte in dem ersten Script der Base pointer in ESI befinden ?
Der Base pointer ist normalerweise in EBP/RBP abgelegt. Innerhalb von Funktionen wird dieses Register aber zweckentfremdet und für den Zugriff auf Parameter und lokale Variablen auf dem Stack benutzt.

Du wirst, Wohl oder Übel, nicht um den Aufruf von FasmGetBasePtr() herumkommen.
Ansonsten sieh Dir an was die Funktion macht und mache es dann selber.
Aber dann kannst Du auch gleich FasmGetBasePtr() benutzen.

Gruß
Greenhorn

**Greenhorn**

Hallo Anna,

ich habe mal ein wenig gesucht und leider nichts brauchbares gefunden.

Es gab jemanden der das Gleiche vor hatte und via printui.dll die entsprechenden Einstellungen laden wollte.
Scheint aber nicht geklappt zu haben. Druckereinstellungen per Script
Bing-Suche

Entweder Du forscht da etwas weiter oder Du machst Dir ein AutoIt-Script, das die Einstellungen im Dialogfenster der Druckereinstellungen vornimmt.

Gruß
Greenhorn

**Greenhorn**

Moin Schnitzel,

herzlichen Glückwunsch zu Deinem Ehrentag !
Alles Gute und bleib gesund.

Und lass Dich nicht von den Schnitzel-Jägern erwischen ...

Gruß
Greenhorn

**Greenhorn**

Etwas verspätet ...

Herzlichen Glückwunsch zum Geburtstag, mein Alter !

Gruß
Greenhorn

**Greenhorn**

Zitat von rschneeberger

Ich möchte nicht Notes (haben 8.5.2) ohne Passworteingabe starten - das geht in der aktuellen Version nicht mehr - ...

Das wäre mir neu. Wie gesagt, bei uns in der Firma klappt es.

Zitat von rschneeberger

Gibt es hier auch Leute, die nicht allgemeine Floskeln von sich geben sondern wirklich helfen?

Den Spruch kann Du Dir stecken, mein Lieber !

Gruß
Greenhorn

**Greenhorn**

Zitat von NoNever

ja es liegt definitiv an aero, wenn ich auf windows standart design umschalte, braucht das script nurnoch 60msec hat jemand ne Idee wie das auch mit Win7 schnell läuft?

Eventuell mit GetDIBits ...

Gruß
Greenhorn

**Greenhorn**

Bei mir braucht das Skript 61652.733854ms ...

Gruß
Greenhorn

**Greenhorn**

Genau das meinte ich, Micha. ;):)

Gruß
Greenhorn

**Greenhorn**

Moin,

wenn Du InputBox benutzt, dann sieh Dir mal die Hilfe dazu an, bzw. das Beispielskript.
Solltest Du dagegen GUICtrlCreateInput/Edit benutzen, dann musst Du den Fensterstil $ES_PASSWORD dem Steuerelement hinzufügen.

Gruß
Greenhorn

**Greenhorn**

Moin,

in meiner Firma wird Lotus Notes mit dem Benutzernamen und Passwort des angemeldeten Benutzers gestartet.
Irgendwo muss in Lotus Notes so eine Option zu finden sein ...

Gruß
Greenhorn

**Greenhorn**

Zitat von sillyboy

läuft bei mir auch nicht win xp sericepack 3

fehler

EzBmpButton.au3(392,22) : WARNING: $WM_MOUSELEAVE: possibly used before declaration.

WARNING: $WM_MOUSEHOVER: possibly used before declaration.

EzBmpButton.au3(392,22) : ERROR: $WM_MOUSELEAVE: undeclared global variable.

Hi,

dann sind Deine AutoIt-Includes nicht auf dem neuesten Stand. Genauer gesagt sind die betreffenden Konstanten seit Version 3.3.6.1 (2010) in der WindowsConstants.au3 enthalten.
Entweder die neueste AutoIt-Version installieren oder in der EzBmpButton.au3 die Zeilen 129, 130, 131, 132 auskommentieren oder umgekehrt.

Gruß
Greenhorn

**Greenhorn**

Zitat von Xorianator

Funktioniert bei mir nicht (Demo)
Die Variablen sind net deklariert ...

Hi,

was steht in der Ausgabe ? Ohne diese Informationen kann ich nur raten...

Welche AutoIt-Version benutzt Du ?

Gruß
Greenhorn

**Greenhorn**

Update. Benutzt nun Unicode in den Dll-Funktionen und ein paar kleine Fehler ausgemerzt.

Gruß
Greenhorn

**Greenhorn**

Hi Lukas,

Code in Post #7 editiert ...

**Greenhorn**

Moin,

so müsste das ungefähr aussehen ...

Spoiler anzeigen

[autoit]

$ATKACPIhandle = _WinAPI_CreateFile ("\\.\ATKACPI", 2, 6, 6)
If (not $ATKACPIhandle) Then
MsgBox (BitOR($MB_OK, $MB_ICONHAND), "Error", "ATK0100 Driver not found!");
Exit
EndIf

[/autoit] [autoit][/autoit] [autoit]

Func CtrlACPI ($code, $hasArg, $arg)

[/autoit] [autoit][/autoit] [autoit]

Local $bytes = DllStructCreate ("DWORD;");
Local $inbuf = DllStructCreate ("DWORD_PTR [5];");
Local $cbuf = DllStructCreate ("WORD cmds [2]; DWORD cm2;");
Local $outbuf = DllStructCreate ("DWORD [192];");
Local $ret;

[/autoit] [autoit][/autoit] [autoit]

DllStructSetData ($bytes, 1, 0);

[/autoit] [autoit][/autoit] [autoit]

DllStructSetData ($cbuf, "cmds", 0, 1);
DllStructSetData ($cbuf, "cmds", 0, 2);
DllStructSetData ($cbuf, "cm2", $arg);

[/autoit] [autoit][/autoit] [autoit]

DllStructSetData ($inbuf, 1, 2, 1);
DllStructSetData ($inbuf, 1, $code, 2);
DllStructSetData ($inbuf, 1, $hasArg, 3);
DllStructSetData ($inbuf, 1, 8 * $hasArg, 4);
DllStructSetData ($inbuf, 1, DllStructGetPtr ($cbuf), 5);

[/autoit] [autoit][/autoit] [autoit]

$ret = DeviceIoControl( _
$ATKACPIhandle, _
0x222404, _
DllStructGetPtr ($inbuf), _
DllStructGetSize ($inbuf),
DllStructGetPtr ($outbuf), _
DllStructGetSize ($outbuf), _
DllStructGetPtr ($bytes), _
0 _
);

[/autoit] [autoit][/autoit] [autoit]

return $ret;

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit]

EDIT: Patzer korrigiert ...

Gruß
Greenhorn

**Greenhorn**

Hi, also so geht's bei mir ...

Spoiler anzeigen

[autoit]

#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
#include <Constants.au3>
#include <StaticConstants.au3>
#include <GDIPlus.au3>
#include <IE.au3>

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Global $iImagePfad = @ScriptDir & "\Bilder\"

[/autoit] [autoit][/autoit] [autoit]

;~ Global Const $IMAGE_BITMAP = 0
Global Const $SC_DRAGMOVE = 0xF012
Global Const $STM_SETIMAGE = 0x0172
;~ Global Const $LWA_ALPHA = 0x00000002

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

; The script's entry point
Exit (ScriptMain ( ))

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Func ScriptMain ( )

[/autoit] [autoit][/autoit] [autoit]

Local $hWnd
Local $oIE
Local $iButton [3]
Local $hBmp, $hImage, $hBrush
Local $iWidth, $iHeight
Local $hbrOld

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

_GDIPlus_StartUp ( )

[/autoit] [autoit][/autoit] [autoit]

$hImage = _GDIPlus_ImageLoadFromFile ($iImagePfad & "background.png")

[/autoit] [autoit][/autoit] [autoit]

$iWidth = _GDIPlus_ImageGetWidth ($hImage)
$iHeight = _GDIPlus_ImageGetHeight ($hImage)

[/autoit] [autoit][/autoit] [autoit]

$hBmp = _GDIPlus_BitmapCreateHBITMAPFromBitmap ($hImage)

[/autoit] [autoit][/autoit] [autoit]

; Create the main window
$hWnd = GUICreate ("Test", $iWidth, $iHeight, -1, -1, _
BitOR ($WS_POPUP, $WS_CLIPCHILDREN), BitOR ($WS_EX_LAYERED, $WS_EX_TOPMOST))

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

GUIRegisterMsg($WM_LBUTTONDOWN, "_WM_LBUTTONDOWN")

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$bImage_Pic1 = _GDIPlus_ImageLoadFromFile($iImagePfad & "start_1.png")
$bImage_Pic2 = _GDIPlus_ImageLoadFromFile($iImagePfad & "start_2.png")

[/autoit] [autoit][/autoit] [autoit]

$hbmpButton1 = _GDIPlus_BitmapCreateHBITMAPFromBitmap($bImage_Pic1)
$hbmpButton2 = _GDIPlus_BitmapCreateHBITMAPFromBitmap($bImage_Pic2)

[/autoit] [autoit][/autoit] [autoit]

; Create the button
GUICreate ("", 118, 31, 100, 100, _
BitOr($WS_POPUP, $WS_CHILD, $WS_VISIBLE, $WS_CLIPSIBLINGS), $WS_EX_MDICHILD, $hWnd)
$iButton = GUICtrlCreatePic ("", 0, 0, 118, 31, BitOr($SS_NOTIFY, $WS_CLIPSIBLINGS, $GUI_SS_DEFAULT_PIC))
GUICtrlSendMsg ($iButton, $STM_SETIMAGE, $IMAGE_BITMAP, $hbmpButton1)

[/autoit] [autoit][/autoit] [autoit]

GUISetState (@SW_SHOW, $hWnd)

[/autoit] [autoit][/autoit] [autoit]

SetTransparentBitmap($hWnd, $hImage)

[/autoit] [autoit][/autoit] [autoit]

_WinAPI_DeleteObject ($hBmp)
_GDIPlus_ImageDispose ($hImage)

[/autoit] [autoit][/autoit] [autoit]

; Create embedded "iexplore" object
$oIE = _IECreateEmbedded ( )

[/autoit] [autoit][/autoit] [autoit]

If ($oIE <> 0) Then

[/autoit] [autoit][/autoit] [autoit]

_CreateIEObject($hWnd, $oIE, 200, 200, 200, 200)

[/autoit] [autoit][/autoit] [autoit]

_IENavigate($oIE, 'http://google.de')
Else
MsgBox (BitOR ($MB_OK, $MB_ICONHAND), 0, "_IECreateEmbedded fehlgeschlagen!")
EndIf

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Local $isHover = False
Local $mem = True

[/autoit] [autoit][/autoit] [autoit]

; Message loop
While (TRUE)

[/autoit] [autoit][/autoit] [autoit]

Switch (GUIGetMsg ( ))
Case $iButton
ContinueCase
Case $GUI_EVENT_CLOSE
GUIDelete ($hWnd)
ExitLoop
EndSwitch

[/autoit] [autoit][/autoit] [autoit]

Local $aCoord = GUIGetCursorInfo ($hWnd)

[/autoit] [autoit][/autoit] [autoit]

If $aCoord[4] = $iButton Then
If Not $isHover Then
GUICtrlSendMsg ($iButton, $STM_SETIMAGE, $IMAGE_BITMAP, $hbmpButton1)
$isHover = True
$mem = True
EndIf
Else
If $mem Then
GUICtrlSendMsg ($iButton, $STM_SETIMAGE, $IMAGE_BITMAP, $hbmpButton2)
$mem = False
$isHover = False
EndIf
EndIf

[/autoit] [autoit][/autoit] [autoit]

WEnd

[/autoit] [autoit][/autoit] [autoit]

;~ _IEQuit ($oIE)
_GDIPlus_ImageDispose ($bImage_Pic1)
_GDIPlus_ImageDispose ($bImage_Pic2)
_WinAPI_DeleteObject ($hbmpButton1)
_WinAPI_DeleteObject ($hbmpButton2)
_WinAPI_DeleteObject ($hBrush)
_GDIPlus_ShutDown ( )

[/autoit] [autoit][/autoit] [autoit]

Return 0

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Func _CreateIEObject ($iForm,$iVar,$iX,$iY,$iW,$iH)
$iIEForm = GUICreate ("",$iX,$iY,$iW,$iH,BitOr($WS_POPUP, $WS_CHILD, $WS_VISIBLE, $WS_CLIPSIBLINGS), $WS_EX_MDICHILD, $iForm)
GUICtrlCreateObj ($iVar,0,0,$iW,$iH)
GUISetState (@SW_SHOW,$iIEForm)
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _WM_LBUTTONDOWN($hWnd, $iMsg, $wParam, $lParam)
_SendMessage($hWnd, $WM_SYSCOMMAND, $SC_DRAGMOVE, 0)
EndFunc ;==>_WM_LBUTTONDOWN

[/autoit] [autoit][/autoit] [autoit]

Func SetTransparentBitmap($hGUI, $hImage, $iOpacity = 0xFF)
Local $hScrDC, $hMemDC, $hBitmap, $hOld, $pSize, $tSize, $pSource, $tSource, $pBlend, $tBlend
$hScrDC = _WinAPI_GetDC(0)
$hMemDC = _WinAPI_CreateCompatibleDC($hScrDC)
_WinAPI_ReleaseDC(0, $hScrDC)
$hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)
$hOld = _WinAPI_SelectObject($hMemDC, $hBitmap)
$tSize = DllStructCreate($tagSIZE)
$pSize = DllStructGetPtr($tSize)
DllStructSetData($tSize, "X", _GDIPlus_ImageGetWidth($hImage))
DllStructSetData($tSize, "Y", _GDIPlus_ImageGetHeight($hImage))
$tSource = DllStructCreate($tagPOINT)
$pSource = DllStructGetPtr($tSource)
$tBlend = DllStructCreate($tagBLENDFUNCTION)
$pBlend = DllStructGetPtr($tBlend)
DllStructSetData($tBlend, "Alpha", $iOpacity)
DllStructSetData($tBlend, "Format", 1)
_WinAPI_UpdateLayeredWindow($hGUI, 0, 0, $pSize, $hMemDC, $pSource, 0, $pBlend, $ULW_ALPHA)
_WinAPI_SelectObject($hMemDC, $hOld)
_WinAPI_DeleteObject($hBitmap)
_WinAPI_DeleteDC($hMemDC)
EndFunc ;==>SetBitmap

[/autoit]

Gruß
Greenhorn

**Greenhorn**

Hi Oscar,

herzlichen Glückwunsch und alles Gute wünsche ich Dir.
Halt' Dich und bleib gesund.

Gruß
Greenhorn

Beiträge von Greenhorn

Das AutoIt T-Shirt

Das AutoIt T-Shirt

FASM Basepointer Problem

FASM Basepointer Problem

Drucken mit mehreren Einstellungen

Schnitzel hat Geburtstag !

Andy hat Geburtstag

Lotus Notes automatisch starten mit AutoIT

Pixelgetcolor sehr langsam

Pixelgetcolor sehr langsam

Lotus Notes automatisch starten mit AutoIT

Input1 text der geschrieben wird durch "*" zeichen ersetzen

Lotus Notes automatisch starten mit AutoIT

EzBmpButton

EzBmpButton

EzBmpButton

C++ Script-Ausschnitt zu AutoIt übersetzen

C++ Script-Ausschnitt zu AutoIt übersetzen

Bilder als Buttons bei GDI+ Hintergrund Bild + Hover

Happy Birthday Oscar