1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. Greenhorn

Beiträge von Greenhorn

  • 7zip UND rar entpacken.

    • Greenhorn
    • 25. Februar 2011 um 22:20

    Hier noch die UnRAR.dll und die 7-zip Bibliotheken ...


    Gruß
    Greenhorn

  • 7zip UND rar entpacken.

    • Greenhorn
    • 24. Februar 2011 um 22:08
    Zitat von Lol11


    Aber wie kann ich erkennen, ob eine Datein *.zip oder *.rar ist.


    Einfach die ersten drei Bytes der Datei einlesen.
    Bei einem RAR-Archiv sind die ersten drei Bytes 0x52 0x61 0x72 ("Rar"), bei einem 7-Zip-Archiv sind die ersten zwei Bytes 0x37 0x7A ("7z").


    Gruß
    Greenhorn

  • Kompilieren mit CMD-Line Aufruf

    • Greenhorn
    • 20. Februar 2011 um 20:54

    Hi,

    folgende CMD funktioniert bei mir einwandfrei ...

    Code
    "C:\Program Files (x86)\AutoIt3\Aut2exe\Aut2exe.exe" /in "C:\Users\Greenhorn\Desktop\test.au3" /icon "C:\Program Files (x86)\AutoIt3\Aut2Exe\Icons\AutoIt_Old1.ico" /comp 2 /nopack
    
    
    pause
    exit


    Gruß
    Greenhorn

  • [GDI+] Transparent "zeichnen" auf auf ein Bmp32 - Andy?

    • Greenhorn
    • 20. Februar 2011 um 04:20

    Hi,

    TransparentBlt () sollte das sein was Du suchst ...


    Gruß
    Greenhorn

  • BSoD bei Vista

    • Greenhorn
    • 17. Februar 2011 um 22:32

    Mal 'ne blöde Frage, hast Du evtl. die Auslagerungsdatei deaktiviert ?

    Wie ist der Zustand der Hardware ?
    Auf einem Laptop würde ich keine Spiele spielen ...


    Gruß
    Greenhorn

  • UEZ hat Geburtstag

    • Greenhorn
    • 17. Februar 2011 um 22:06

    Auch meiner einer möchte Dir alles Gute und die herzlichsten Glückwünsche zum Burzeltag senden ! :)


    Lieben Gruß
    Greenhorn

  • Problem von Greenhorn.

    • Greenhorn
    • 15. Februar 2011 um 20:34

    Hmm, sollte sich dort etwa der Schalk eingeschlichen haben ... ? :huh::rolleyes:


    Gruß
    Greenhorn

  • Code verkürzen (StringReplace + array??)

    • Greenhorn
    • 13. Februar 2011 um 18:56

    Hi,

    Zitat


    Local $aRepl[37][1] = ['Chr(34)', " ", "| ", "| ", "|"...
    ;...
    For $i = 0 To UBound($aRepl) - 1
    $String = StringReplace($String, $aRepl[$i][0], $aRepl[$i][1])
    Next


    So ist's kürzer ...

    [autoit]


    Global $String = '["HKLM , SYSTEM / ControlSet001 | Control >>>> Class - {4D36E972-E325-11CE-BFC1-08002bE10318} ; 0001 >> Ndi > params -->>> FlowControl ," enum]'
    Func CheckString($String)
    $String = StringRegExpReplace ($String, "(\h+.*?\h+)", '\\')
    $String = StringRegExpReplace ($String, '([\[\]"])', '')
    $String = StringReplace($String, "HKCR", "HKEY_CLASSES_ROOT", 1)
    $String = StringReplace($String, "HKLM", "HKEY_LOCAL_MACHINE", 1)
    $String = StringReplace($String, "HKCU", "HKEY_CURRENT_USER", 1)
    $String = StringReplace($String, "HKU", "HKEY_USERS", 1)
    $String = StringReplace($String, "HKCC", "HKEY_CURRENT_CONFIG", 1)
    Return $String
    EndFunc ;=>CheckString
    ;~ MsgBox(0, "String ...", $String)
    ;~ MsgBox(0, "Umgeänderter String ...", CheckString($String))
    ConsoleWrite (StringFormat ("%s\n", CheckString($String)))

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

    Exit (0)

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

    ;------

    [/autoit]


    Gruß
    Greenhorn

  • Sprungweite von Tabs definieren oder: Tab-getrennte Text-Tabellen mit identisch langen Zellen

    • Greenhorn
    • 13. Februar 2011 um 17:36

    Hi,

    warum versuchst Du es nicht einmal mit StringFormat () ...

    Dazu ermittelst Du den längsten Text der E-Artikelbezeichnung per StringLen () und setzt den höchsten ermittelten Wert in das "[width]"-Feld des Strings.


    Beispiel
    [autoit]


    Global $aText[3][5] = [["32332-1004", "12", "Massagestab (ohne Ex-Schutz)", "0,99", "ab Lager"], _
    ["32332-1005", "7", "VGA-Anschlusskabel , DDC-fähig, 15 pol. HD Stecker/Stecker 1m", "3,99", "ab Lager"], _
    ["32332-1006", "40", "Druckerkabel vergossen 2m", "0,99", "ca. 7 Tage"]]

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

    Global $nMaxLen = 0
    Global $nLen = 0

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

    For $i = 0 To UBound ($aText) - 1

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

    ; Angenommen $aText[$i][2] enthält die E-Artikelbeschreibung ...
    $nLen = StringLen ($aText[$i][2])

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

    If ($nLen > $nMaxLen) Then _
    $nMaxLen = $nLen
    Next

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

    ; ...

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

    Global $sFormat = StringFormat ("%%-12s %%-6s %%-%ds %%10s € %%s\n", $nMaxLen)
    ;~ ConsoleWrite ($sFormat)
    Global $sTabellenkopf = StringFormat ($sFormat, "Art.Nr.", "Menge", "Beschreibung", "Stückpreis", "Lieferzeit")
    ConsoleWrite ($sTabellenkopf)

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

    For $i = 0 To UBound ($aText) - 1

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

    ConsoleWrite (StringFormat ($sFormat, $aText[$i][0], $aText[$i][1], $aText[$i][2], $aText[$i][3], $aText[$i][4]))
    Next

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

    Exit (0)

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

    ;------

    [/autoit]


    Gruß
    Greenhorn

  • StringRegExp - kurze Hilfe bitte

    • Greenhorn
    • 13. Februar 2011 um 01:29

    Oder so ...

    Spoiler anzeigen
    [autoit]


    Opt("MustDeclareVars", 1)

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

    Global $sTest = StringFormat ("%s\r\n\t%d\r\n\t%.1f\r\n\t%.1f\r\n\t%.1f\r\n\t%.1f\r\n\t%d\r\n\t%.2f\r\n", _
    "Tabelle vom 12.02.2011 - 01 (Mark1989)", _
    1, _
    0.1, _
    0.4, _
    1.2, _
    15.2, _
    7, _
    0.11 _
    )

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

    ConsoleWrite ($sTest)

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

    ; Testen auf Integer- oder Gleitkommazahlen bis sechsstelliger Genauigkeit
    Global $aNumbers = StringRegExp ($sTest, "(?:\n\t)(\d+\.?\d{0,6})", 3, 1)

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

    If (IsArray ($aNumbers)) Then

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

    ConsoleWriteArray ($aNumbers, " * aNumbers * ")
    EndIf

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

    Exit (0)

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

    ;««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««

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

    Func ConsoleWriteArray (ByRef Const $array, $sArrayName = "")

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

    Local $cnColumns
    Local $cnDimension
    Local $cnRows
    Local $cnElements

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

    If (not IsArray ($array)) Then
    ConsoleWrite (StringFormat ("!--- ConsoleWriteArray - Fehler: %s ist kein Array!\n", $sArrayName))
    Return 0
    EndIf

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

    $cnDimension = UBound ($array, 0)

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

    If ($cnDimension > 3) Then
    ConsoleWrite (StringFormat ("!--- ConsoleWriteArray - Fehler: %d\n", $sArrayName, $cnDimension))
    ConsoleWrite (StringFormat ("!--- Max. Anzahl Dimensionen: %d\n", 3))
    ConsoleWrite (StringFormat ("!--- %s - Anzahl Dimensionen: %d\n", $sArrayName, $cnDimension))
    Return 0
    EndIf

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

    ConsoleWrite (StringFormat ("--- Arrayvariable %s\n--- Anzahl Dimensionen: %d\n", $sArrayName, $cnDimension))

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

    $cnRows = UBound ($array, 1)
    $cnColumns = UBound ($array, 2)
    $cnElements = UBound ($array, 3)

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

    Switch ($cnDimension)

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

    Case 1
    ;...
    For $i = 0 To $cnRows - 1

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

    ConsoleWrite (StringFormat ("; %s [%d] = %s\n", $sArrayName, $i, $array[$i]))
    Next
    Case 2
    ;...
    For $i = 0 To $cnRows - 1

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

    For $j = 0 To $cnColumns - 1

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

    ConsoleWrite (StringFormat ("; %s [%d][%d] = %s\n", $sArrayName, $i, $j, $array[$i][$j]))
    Next
    Next
    Case 3
    ;...
    For $i = 0 To $cnRows - 1

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

    For $j = 0 To $cnColumns - 1

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

    For $k = 0 To $cnElements - 1

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

    ConsoleWrite (StringFormat ("; %s [%d][%d][%d] = %s\n", $sArrayName, $i, $j, $k, $array[$i][$j][$k]))
    Next
    Next
    Next
    Case Else
    ;...
    EndSwitch

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

    ConsoleWrite (StringFormat ("----------------------------\n\n", 0))

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

    EndFunc

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

    ;«««««««««««««««««««««««««««««««« End Of File «««««««««««««««««««««««««««««««««

    [/autoit]


    Gruß
    Greenhorn

  • GDI+ Bitmap skalieren

    • Greenhorn
    • 7. Februar 2011 um 20:12

    ... oder so. GDI+ ist nicht meine Stärke ... :rolleyes:


    Gruß
    Greenhorn

  • GDI+ Bitmap skalieren

    • Greenhorn
    • 7. Februar 2011 um 19:54

    Hi,

    im Speicher. Du musst einen (zu deiner Bitmap) kompatiblen Gerätekontext im Speicher erzeugen via _WinAPI_CreateCompatibleDC oder _GDIPlus_GraphicsCreateFromHDC/HWND

    Spoiler anzeigen
    [autoit]

    #include <GuiConstantsEx.au3>
    #include <GDIPlus.au3>
    #include <WinAPI.au3>
    #include <ScreenCapture.au3>

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

    Opt('MustDeclareVars', 1)

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

    Global Const $HWND_DESKTOP = 0

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

    _Main()

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

    Func _Main()
    Local $hdc, $hdcMem, $hImage, $hGraphic

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

    ; Capture top left corner of the screen
    _ScreenCapture_Capture (@MyDocumentsDir & "\GDIPlus_Image.jpg", 0, 0, 400, 300)

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

    ; Initialize GDI+ library and load image
    _GDIPlus_Startup ()
    $hImage = _GDIPlus_ImageLoadFromFile (@MyDocumentsDir & "\GDIPlus_Image.jpg")

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

    $hdc = _WinAPI_GetDC ($HWND_DESKTOP)
    $hdcMem = _WinAPI_CreateCompatibleDC ($hdc)
    _WinAPI_ReleaseDC ($HWND_DESKTOP, $hdc)

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

    $hGraphic = _GDIPlus_GraphicsCreateFromHDC ($hdcMem)

    ; Draw 2x zoomed image
    _GDIPlus_GraphicsDrawImageRectRect ($hGraphic, $hImage, 0, 0, 200, 200, 0, 0, 400, 300)

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

    ; Release resources
    _GDIPlus_GraphicsDispose ($hGraphic)
    _GDIPlus_ImageDispose ($hImage)
    _WinAPI_DeleteDC ($hdcMem) ; Gerätekontext wieder freigeben
    _GDIPlus_Shutdown ()

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

    ; Clean up screen shot file
    FileDelete(@MyDocumentsDir & "\GDIPlus_Image.jpg")

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

    ; Loop until user exits
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE

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

    EndFunc ;==>_Main

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


    Gruß
    Greenhorn

  • Schnitzel hat Geburtstag!

    • Greenhorn
    • 7. Februar 2011 um 19:26

    Herzlichen Glückwunsch zum Burzeltag ! :)


    Gruß
    Greenhorn

  • Notepad

    • Greenhorn
    • 5. Februar 2011 um 22:33

    Hi,

    sieh Dir mal die File...() Funktionen an.
    Vielleicht hilft Dir auch das hier weiter ...


    Gruß
    Greenhorn

  • Happy Birthday, Andy

    • Greenhorn
    • 4. Februar 2011 um 21:27

    Auch von mir die herzlichsten Glückwünsche zu Deinem Geburtstag, altes Leder ! :)


    Gruß
    Greenhorn

  • On Screen Drawing - C++ ?

    • Greenhorn
    • 4. Februar 2011 um 21:24

    Hi,

    vielleicht bringt Dich das hier auf Ideen ...
    Windows 7 APIs (Teil 2 von 6) - Multi-Touch-Entwicklung

    Gruß
    Greenhorn

  • WM_RBUTTONDOWN wird nicht immer aufgerufen

    • Greenhorn
    • 4. Februar 2011 um 21:11

    Hi,

    Spoiler anzeigen
    [autoit]


    Opt("MustDeclareVars", 1)

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

    #include <WinAPI.au3>
    #include <GUIConstants.au3>
    #include <WindowsConstants.au3>
    #include <GuiListBox.au3>

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

    Global $user32dll

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

    If (not $user32dll) Then _
    Global $user32dll = DllOpen ("user32.dll")

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

    Global Const $SC_CLOSE = 0xF060

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

    Global Const $GWLP_WNDPROC = (-4)
    Global Const $GWLP_HINSTANCE = (-6)
    Global Const $GWLP_HWNDPARENT = (-8)
    Global Const $GWLP_USERDATA = (-21)
    Global Const $GWLP_ID = (-12)

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

    ; ID des Listenfeldes
    Global $IDC_LB_DOWNLOADS

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

    ; Handlevariablen für die Adressen der Fensterprozeduren,
    ; die des Listenfeldes und unsere Ersatzfunktion.
    Global $g_hListBoxProc = 0
    Global $g_hOldListBoxProc = 0

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

    Func Main ( )

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

    Local $hGUI_Main
    Local $hList_Downloads

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

    $hGUI_Main = GUICreate("TestGUI", 300, 400)
    $IDC_LB_DOWNLOADS = GUICtrlCreateList("list1", 10, 20, 280, 360, _
    BitOR($LBS_SORT, $WS_BORDER, $WS_CHILD, $WS_TABSTOP, $WS_VSCROLL, $LBS_NOTIFY))
    GUICtrlSetData(-1, "list2|list3|list4")

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

    $hList_Downloads = GUICtrlGetHandle ($IDC_LB_DOWNLOADS)

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

    ;~ GUIRegisterMsg($WM_RBUTTONDOWN, "WM_RBUTTONDOWN")
    GUIRegisterMsg ($WM_CLOSE, "OnClose")
    GUIRegisterMsg ($WM_DESTROY, "OnDestroy")
    GUIRegisterMsg ($WM_SYSCOMMAND, "OnSysCommand")

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

    ; Unsere Rückruf-Funktion registrieren ...
    $g_hListBoxProc = DllCallbackRegister ("ListBoxProc", "LONG", "HWND;UINT;WPARAM;LPARAM")

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

    If ($g_hListBoxProc) Then

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

    ; Das Listenfeld "subclassen" ...
    $g_hOldListBoxProc = SetWindowLongPtr ($hList_Downloads, $GWLP_WNDPROC, DllCallbackGetPtr ($g_hListBoxProc))
    EndIf

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

    GUISetState()

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

    ; Schleife ...

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

    While (WinExists ($hGUI_Main))
    GUIGetMsg (FALSE)
    WEnd

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

    Return 0

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

    EndFunc

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

    ;««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««

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

    Func OnClose ($hwnd, $message, $wParam, $lParam)

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

    ; Fenster löschen
    GUIDelete ($hwnd)

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

    Return 0

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

    EndFunc

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

    Func OnDestroy ($hwnd, $message, $wParam, $lParam)

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

    ; Die originale Fensterprozedur des Listenfeldes
    ; wiederherstellen

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

    If ($g_hOldListBoxProc) Then _
    SetWindowLongPtr ( _
    GUICtrlGetHandle ($IDC_LB_DOWNLOADS), _
    $GWLP_WNDPROC, _
    $g_hOldListBoxProc _
    )

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

    Return $GUI_RUNDEFMSG

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

    EndFunc

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

    Func OnSysCommand ($hwnd, $message, $wParam, $lParam)

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

    If ($wParam == $SC_CLOSE) Then
    GUISetState (@sw_hide, $hwnd)
    Return 0
    EndIf

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

    Return DefWindowProc ($hwnd, $message, $wParam, $lParam)

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

    EndFunc

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

    Func WM_RBUTTONDOWN($hWnd, $iMsg, $wParam, $lParam)
    #forceref $hWnd, $iMsg, $wParam
    Local $cx = _WinAPI_LoWord($lParam), $cy = _WinAPI_HiWord($lParam);, $aiWinPos = WinGetPos($hGUI_Main)
    ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $cx = ' & $cx & @CRLF & '>Error code: ' & @error & @CRLF) ;### Debug Console
    Local $iIndex = _GUICtrlListBox_ItemFromPoint($IDC_LB_DOWNLOADS, $cx, $cy);$cx - $aiWinPos[0], $cy - $aiWinPos[1])
    If $iIndex <> -1 Then _GUICtrlListBox_SetCurSel($IDC_LB_DOWNLOADS, $iIndex)

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

    Return $GUI_RUNDEFMSG
    EndFunc ;==>WM_RBUTTONDOWN

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

    ;««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««

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

    ; Diese Funktion ersetzt die originale Fensterprozedur des Listenfeldes
    Func ListBoxProc ($hwnd, $message, $wParam, $lParam)

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

    Local $cx, $cy
    Local $iIndex
    Local $hList_Downloads

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

    Switch ($message)

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

    Case $WM_RBUTTONDOWN

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

    $cx = _WinAPI_LoWord($lParam)
    $cy = _WinAPI_HiWord($lParam)
    $hList_Downloads = GUICtrlGetHandle ($IDC_LB_DOWNLOADS)
    $iIndex = _GUICtrlListBox_ItemFromPoint($hList_Downloads, $cx, $cy);$cx - $aiWinPos[0], $cy - $aiWinPos[1])
    ConsoleWrite(StringFormat ("--- cx: %d\n--- cy: %d\n--- iIndex: %d\n---------------\n", $cx, $cy, $iIndex)) ;### Debug Console
    If $iIndex <> -1 Then _GUICtrlListBox_SetCurSel($hList_Downloads, $iIndex)

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

    ; Die Nachricht an die ursprüngliche Fensterprozedur
    ; des Listenfeldes weiterleiten

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

    Return CallWindowProc ($g_hOldListBoxProc, _
    $hwnd, $message, $wParam, $lParam)

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

    Case Else

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

    Return CallWindowProc ($g_hOldListBoxProc, _
    $hwnd, $message, $wParam, $lParam)

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

    EndSwitch

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

    Return 0

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

    EndFunc

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

    ;««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««

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

    ; Win32 API Funktionen

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

    Func CallWindowProc ($lpPrevWndFunc, $hWnd, $Msg, $wParam, $lParam)

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

    Local $aRes = DllCall ($user32dll, 'ULONG', 'CallWindowProcW', _
    'PTR', $lpPrevWndFunc, _
    'HWND', $hWnd, _
    'UINT', $Msg, _
    'WPARAM', $wParam, _
    'LPARAM', $lParam)
    Return $aRes[0]

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

    EndFunc

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

    Func DefWindowProc ($hWnd, $Msg, $wParam, $lParam)

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

    Local $aRes = DllCall ($user32dll, "ULONG", "DefWindowProcW", _
    "HWND", $hWnd, _
    "UINT", $Msg, _
    "WPARAM", $wParam, _
    "LPARAM", $lParam)
    Return $aRes[0]

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

    EndFunc

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

    Func GetWindowLongPtr ($hWnd, $nIndex)

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

    Local $aRes

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

    If (DllStructGetSize (DllStructCreate ("HWND", $hWnd)) == 8) Then ; x64

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

    $aRes = DllCall ($user32dll, "LONG_PTR", "GetWindowLongPtrW", _
    "HWND", $hWnd, _
    "INT" , $nIndex)
    Else ; x86
    $aRes = DllCall ($user32dll, "LONG", "GetWindowLongW", _
    "HWND", $hWnd, _
    "INT" , $nIndex)
    EndIf

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

    Return $aRes[0]

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

    EndFunc

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

    Func SetWindowLongPtr ($hWnd, $nIndex, $dwNewLong)

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

    Local $aRes

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

    If (DllStructGetSize (DllStructCreate ("HWND", $hWnd)) == 8) Then ; x64

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

    $aRes = DllCall ($user32dll, "LONG_PTR", "SetWindowLongPtrW", _
    "HWND", $hWnd, _
    "INT" , $nIndex, _
    "LONG_PTR", $dwNewLong)
    Else ; x86
    $aRes = DllCall ($user32dll, "LONG", "SetWindowLongW", _
    "HWND", $hWnd, _
    "INT" , $nIndex, _
    "LONG", $dwNewLong)
    EndIf

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

    Return $aRes[0]

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

    EndFunc

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

    Exit (Main ( ))

    [/autoit]

    Gruß
    Greenhorn

  • ToolTip in C++?

    • Greenhorn
    • 4. Februar 2011 um 18:44

    Hi,

    guckst Du hier ...
    Tooltip


    Gruß
    Greenhorn

  • C++ DLL Problem

    • Greenhorn
    • 3. Februar 2011 um 21:06
    Code
    LIBRARY Project1
    
    
    EXPORTS
    DLLversion

    Und sicherstellen, dass in der Befehlszeile des Linkers /DEF:".\DefDatei" vorhanden ist ...


    Gruß
    Greenhorn

  • C++ DLL Problem

    • Greenhorn
    • 3. Februar 2011 um 19:55

    Hast Du ProgAndy's Vorschlag ausprobiert ?

    Code
    const char* DLLversion(void)
    {
     	return sDLLversion.c_str();
    }

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™