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. Ilse

Beiträge von Ilse

  • GDI Plus Array

    • Ilse
    • 7. August 2012 um 11:20

    Autoit Version: 3.3.6.1
    Windows 7 - 64 bit

  • _FileWriteFromArray Probleme

    • Ilse
    • 6. August 2012 um 17:40

    Hallo TheLuBu,

    merci, läuft endlich...

    Liebe Grüße
    Ilse ;)

  • _FileWriteFromArray Probleme

    • Ilse
    • 6. August 2012 um 17:29

    Hallo,

    ich hab's

    [autoit]


    _FileWriteFromArray2D(@ScriptDir & "\Testneu.txt", $aTexte)

    [/autoit]

    jetzt wird geschrieben!

    Seltsam, oder?

    ;) Grüße Ilse

    Hoffentlich klappt das nun mit dem einlesen!

  • _FileWriteFromArray Probleme

    • Ilse
    • 6. August 2012 um 16:19

    Wenn ich das probiere

    [autoit]


    $Test = _FileWriteFromArray2D($sFile, $aTexte,1)

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

    MsgBox(0,"",$test)

    [/autoit]

    erhalte ich -1

    Hier mal die Datei v. Bugfix

    Spoiler anzeigen
    [autoit]


    ;==========================================================================================================================================
    ; Function: _FileWriteFromArray2D($FILEPATH, $ARRAY [, $iROWstart=0 [, $iROWend=0 [, $iCOLstart=0 [, $iCOLend=0 [, $DELIM='|']]]]])
    ;
    ; Description: Write 1D/2D array to file, 2D with delimiter between every entry
    ;
    ; Parameter(s): $FILEPATH - path/filename of the file to be write
    ; $ARRAY - array to write from
    ; optional $iROWstart - start row-index, default 0
    ; optional $iROWend - end row-index, default Ubound(array)-1
    ; optional $iCOLstart - start column-index, default 0
    ; optional $iCOLend - end column-index, default Ubound(array,2)-1
    ; optional $DELIM - delimiter for 2D-array entries, default '|'
    ;
    ; Requirement(s): None
    ;
    ; Return Value(s): On Success - Returns -1
    ; On Failure - Returns 0 and sets @error = 1 (given array is'nt array); @error = 2 (unable to open filepath)
    ;
    ; Note: If $iROWstart > $iROWend or $iCOLstart > $iCOLend the values will be swapped among
    ;
    ; Author(s): BugFix ( [email='bugfix@autoit.de'][/email] )
    ;==========================================================================================================================================
    Func _FileWriteFromArray2D($FILEPATH, $ARRAY, $iROWstart=0, $iROWend=0, $iCOLstart=0, $iCOLend=0, $DELIM='|')
    If Not IsArray($ARRAY) Then
    SetError(1)
    Return 0
    EndIf
    Local $Ubound = UBound($ARRAY)
    If $iROWend = 0 Then $iROWend = $Ubound-1
    Local $fh = FileOpen($FILEPATH, 2)
    If $fh = -1 Then
    SetError(2)
    Return 0
    EndIf
    Select
    Case $iROWstart < 0 Or $iROWstart > $Ubound-1
    $iROWstart = 0
    ContinueCase
    Case $iROWend < 0 Or $iROWend > $Ubound-1
    $iROWend = $Ubound-1
    ContinueCase
    Case $iROWstart > $iROWend
    $tmp = $iROWstart
    $iROWstart = $iROWend
    $iROWend = $tmp
    EndSelect
    Local $Ubound2nd = UBound($ARRAY, 2)
    If @error = 2 Then
    For $i = $iROWstart To $iROWend
    FileWriteLine($fh, $ARRAY[$i])
    Next
    Else
    If $iCOLend = 0 Then $iCOLend = $Ubound2nd-1
    Select
    Case $iCOLstart < 0 Or $iCOLstart > $Ubound2nd-1
    $iCOLstart = 0
    ContinueCase
    Case $iCOLend < 0 Or $iCOLend > $Ubound2nd-1
    $iCOLend = $Ubound2nd-1
    ContinueCase
    Case $iCOLstart > $iCOLend
    $tmp = $iCOLstart
    $iCOLstart = $iCOLend
    $iCOLend = $tmp
    EndSelect
    For $i = $iROWstart To $iROWend
    $tmp = ''
    For $k = $iCOLstart To $iCOLend
    If $k < $iCOLend Then
    $tmp &= $ARRAY[$i][$k] & $DELIM
    Else
    $tmp &= $ARRAY[$i][$k]
    EndIf
    Next
    FileWriteLine($fh, $tmp)
    Next
    EndIf
    FileClose($fh)
    Return -1
    EndFunc ;==>_FileWriteFromArray2D

    [/autoit]
  • _FileWriteFromArray Probleme

    • Ilse
    • 6. August 2012 um 15:21

    Hallo Tweaky,

    danke für den Hinweis.

    Ich habe die Funktion eingebaut, aber die Textdatei bleibt leer?

    Mein Aufruf sieht so aus:

    [autoit]


    _FileWriteFromArray2D($sFile, $aTexte,0)

    [/autoit]


    Grüße
    Ilse :(

  • GDI Plus Array

    • Ilse
    • 6. August 2012 um 15:03

    Hallo UEZ,

    merci für den Tipp.

    Übrigens Fehler beim Start
    ERROR: DllCallAddress()

    Grüße
    Ilse ;)

    Schließ mal den Thread (bin noch dran)
    und sage nochmal Danke
    an Eukalyptus und $Var und UEZ

  • _FileWriteFromArray Probleme

    • Ilse
    • 6. August 2012 um 14:45

    Hallo,

    ich möchte gerne ein Array (mehrere Daten)
    in eine Datei speichern.
    Erhalte Fehlermeldungen... klappt irgendwie nicht.

    Hier mal die Infos:

    [autoit]


    #include <Array.au3>
    #include<File.au3>
    Global $sFile = @ScriptDir & "\ilse.txt"

    [/autoit]

    Ich lasse mir im Script das Array anzeigen
    das als File gespeichert werden soll:

    [autoit]


    _ArrayDisplay($aTexte)

    [/autoit]

    bis hierhin ist alles ok
    sieht so aus:

    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

    dann habe ich mit _FileWriteFromArray alles mögliche probiert

    [autoit]


    _FileWriteFromArray($sFile, $aTexte)

    [/autoit]

    aber das klappt alles nicht


    Grüße
    Ilse ;)

    Bilder

    • autoit.JPG
      • 20,43 kB
      • 381 × 132
  • Array Problem

    • Ilse
    • 3. August 2012 um 16:50

    Hallo Raupi,

    schade...

    Grüße
    Ilse ;)

  • Array Problem

    • Ilse
    • 3. August 2012 um 14:11

    Hallo,

    ich muß eine Nr. auslesen.
    Jeder klick auf den Button zeigt mir die Nr. des Controls. OK!

    Folgendes:
    Wenn ich bei dem Button (Beispiel: die Main() Funktion
    aktiviere, bekomme ich keine Nummer sondern True.

    Spoiler anzeigen
    [autoit]


    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <GDIPlus.au3>

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

    Global $aLabel[1], $Label
    $x = 140
    $y = 110

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

    $Form1 = GUICreate("Form1", 625, 443, 192, 124)
    $Button1 = GUICtrlCreateButton("Label Nr", 408, 352, 75, 25, $WS_GROUP)
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    Case $Button1
    ;_Main()
    $aLabel[UBound($aLabel) - 1] = GUICtrlCreateLabel("Test", $x, $y, 146, 89)
    $Label = $aLabel[UBound($aLabel) - 1]
    Msgbox(0,"$Label",$Label)
    EndSwitch
    WEnd

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

    Func _Main()
    Local $hGUI, $hGraphic, $hBrush, $hFormat, $hFamily, $hFont, $tLayout
    Local $sString = "Hello world", $aInfo

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

    ; Create GUI
    $hGUI = GUICreate("GDI+", 400, 300)
    GUISetState()

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

    ; Draw a string
    _GDIPlus_Startup ()
    $hGraphic = _GDIPlus_GraphicsCreateFromHWND ($hGUI)
    $hBrush = _GDIPlus_BrushCreateSolid (0xFF00007F)
    $hFormat = _GDIPlus_StringFormatCreate ()
    $hFamily = _GDIPlus_FontFamilyCreate ("Arial")
    $hFont = _GDIPlus_FontCreate ($hFamily, 12, 2)
    $tLayout = _GDIPlus_RectFCreate (140, 110, 0, 0)
    $aInfo = _GDIPlus_GraphicsMeasureString ($hGraphic, $sString, $hFont, $tLayout, $hFormat)
    $aLabel[UBound($aLabel) - 1] = _GDIPlus_GraphicsDrawStringEx ($hGraphic, $sString, $hFont, $aInfo[0], $hFormat, $hBrush)
    $Label = $aLabel[UBound($aLabel) - 1]
    Msgbox(0,"$Label GDI",$Label)
    ; Loop until user exits
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE

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

    ; Clean up resources
    _GDIPlus_FontDispose ($hFont)
    _GDIPlus_FontFamilyDispose ($hFamily)
    _GDIPlus_StringFormatDispose ($hFormat)
    _GDIPlus_BrushDispose ($hBrush)
    _GDIPlus_GraphicsDispose ($hGraphic)
    _GDIPlus_Shutdown ()

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

    EndFunc ;==>_Main

    [/autoit]

    Ich glaube hier liegt irgendwo der Fehler

    [autoit]


    $aLabel[UBound($aLabel) - 1] = _GDIPlus_GraphicsDrawStringEx ($hGraphic, $sString, $hFont, $aInfo[0], $hFormat, $hBrush)
    $Label = $aLabel[UBound($aLabel) - 1]
    Msgbox(0,"$Label GDI",$Label)

    [/autoit]

    Ich brauche später den Zahlenwert damit ich die Strings v. GDI ermitteln kann.
    Zum testen einfach ;_Main() aktivieren


    Grüße
    Ilse ;)

  • Texte positionieren

    • Ilse
    • 2. August 2012 um 20:49

    Hallo Shadowigor,

    danke für die Hilfe

    Grüß dich $Var,

    merci für das Beispiel mit Kommentaren. Nochmal etwas gelernt.

    Bin noch an den Schriften und Farben.
    Hoffe das klappt

    Liebe Grüße
    Ilse ;)

  • Texte positionieren

    • Ilse
    • 2. August 2012 um 20:04

    Hallo Shadowigor,

    ich habe immer meine Probleme mit Arrays
    Ich habe keine feste Anzahl...von Einträgen

    Kannst du mir vielleicht ein Beispiel mit ID'S machen?

    ;) Grüße Ilse

  • Texte positionieren

    • Ilse
    • 2. August 2012 um 19:32

    Hallo,

    ich krieg das einfach nicht hin.

    1. Ich öffne meine Text-Gui (Text öffnen im Menü)
    2. Dort trage ich den Text ein und übergebe ihn an die Form
    3. Ich positioniere den Text nun mit den Pfeiltasten

    Das Problem:

    Es kommen weitere Texte hinzu.
    Diese müsste ich aber nachträglich einzeln anwählen können und in der Farbe/Größe ändern.

    Spoiler anzeigen
    [autoit]


    #include <Array.au3>
    #include <GUIConstantsEx.au3>
    #include <gdiplus.au3>
    #include <misc.au3>
    #include <WindowsConstants.au3>
    #include <ButtonConstants.au3>
    #include <EditConstants.au3>

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

    $x = 140
    $y = 110
    Global $afont, $mnText, $Label, $mnFarbe, $mnpFarbe
    $Form1 = GUICreate("Form1", 800, 600)

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

    _Menue()

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

    $Form2 = GUICreate("Texte", 625, 443, 192, 124)
    $Edit1 = GUICtrlCreateEdit("", 32, 40, 545, 321, BitOR($ES_AUTOVSCROLL, $ES_AUTOHSCROLL, $ES_WANTRETURN, $WS_VSCROLL))
    GUICtrlSetData(-1, "")
    GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
    $btnMnText = GUICtrlCreateButton("Text auf Form", 400, 376, 179, 41, $WS_GROUP)
    GUISetState(@SW_SHOW, $Form1)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    Case $mnFarbe
    $afont = _ChooseFont()

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

    Case $mnText
    GUISetState(@SW_SHOW, $Form2)

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

    Case $btnMnText
    GUISetState(@SW_SHOW, $Form2)
    $mnEintrag = GUICtrlRead($Edit1)
    GUISetState(@SW_SHOW, $Form1)
    $Label = GUICtrlCreateLabel($mnEintrag, $x, $y, 146, 89)

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

    EndSwitch

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

    #Region Positionieren Text
    If _IsPressed("25") Then
    $x -= 1
    Update()
    ElseIf _IsPressed("27") Then
    $x += 1
    Update()
    ElseIf _IsPressed("26") Then
    $y -= 1
    Update()
    ElseIf _IsPressed("28") Then
    $y += 1
    Update()
    EndIf

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

    #EndRegion Positionieren Text
    WEnd

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

    Func Update()

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

    GUICtrlSetPos($Label, $x, $y)
    EndFunc ;==>Update

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

    Func _Menue()

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

    $mnpText = GUICtrlCreateMenu("Text")
    $mnText = GUICtrlCreateMenuItem("öffnen", $mnpText)

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

    $mnpFarbe = GUICtrlCreateMenu("Farbe")
    $mnFarbe = GUICtrlCreateMenuItem("öffnen", $mnpFarbe)

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

    EndFunc ;==>_Menue

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

    Die Var $Label muß irgendwie bei jedem anlegen
    erweitert werden und ich muß jede $Label editieren.... huh

    Hoffe Ihr habt das ne Idee


    Grüße
    Ilse ;)

  • GDI Plus Array

    • Ilse
    • 2. August 2012 um 12:38

    Hallo Eukalyptus,

    das wäre toll wenn du mir da helfen könntest.

    Man sollte den Text frei gestalten können: Farbe, Schriftart...
    und direkt eingeben können.
    Das Problem ist:
    Man müsste alle Texte gleichzeitig sehen und positionieren können.
    Beim speichern wären dann Grafik und Text in einer neuen Datei: neuesBild.jpg zusammen.

    Super wäre es natürlich, wenn man den kpl, Text
    mit Positionen speichern und wieder laden könnte.


    Viele Grüße
    Ilse ;)

  • GDI Plus Array

    • Ilse
    • 2. August 2012 um 10:12

    Hallo UEZ,

    konnte mich gestern leider nicht mehr melden.

    Ich glaube ich kann mein Problem
    mit GDI nicht lösen. Ich weiß auch nicht ob das überhaupt machbar ist.

    Ich möchte eine Grafik laden. (das klappt)
    Auf diese Grafik sollen Texte. Auch mehrzeilige und die sollen positioniert
    werden und am Schluss mit der Grafik abgespeichert werden.
    Aber mit der Auswahl v. Texten über das Menü komme ich
    bei den mehrzeiligen an die Grenzen.
    D.h. Es müsste z.B.
    Textdatei 1 laden- und frei auf der Grafik positionieren
    Textdatei 2 dazuladen u.s.w
    um and Ende wenn alles positioniert Grafik mit Text speichern.

    Habe auch schon mit ini porobiert
    klappt irgend wie alles nicht mit mehrzeiligen Texten.


    Liebe Grüße
    Ilse ;)

  • GDI Plus Array

    • Ilse
    • 31. Juli 2012 um 13:25

    Hallo UEZ,

    schön daß du dich meldest.
    Klappt jetzt super.

    1000 DANK

    Noch ne Frage:

    ALso sobald man Return benutzt hat,
    gibt es kein zurück mehr.
    Ich meine, wenn ich den Menüeintrag erneut wähle,
    wäre es super wenn man das noch nachträglich wieder ändern kann

    Aber trotz allem:
    Klasse

    Liebe Grüße
    Ilse ;)

  • GDI Plus Array

    • Ilse
    • 31. Juli 2012 um 10:40

    Hallo zusammen,

    ich bin jetzt schon stundenlang an diesem Problem.
    hm...wie erklär ich's...

    Folgendes:

    1. Ich öffne ein Bild (ok)
    2. Ich wähle den Menüpunkt (ok)
    3. Ich drücke die Pfeiltasten zum positionieren des Textes
    4. Wenn ich den nächsten Eintrag aus dem Menü wähle und ich positioniere stimmt es nicht mehr.
    (Müsste quasie etliche _Update Func und Case...machen...)

    Das Problem:
    Es können mehrere Menüeinträge sein


    Ich möchte das gerne so machen:
    1. Text wählen, positionieren
    2. Text wählen positionieren u.s.w.
    3. Speichern fertig

    Spoiler anzeigen
    [autoit]


    #include <Array.au3>
    #include <GUIConstantsEx.au3>
    #include <gdiplus.au3>
    #include <misc.au3>

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

    Global $afont[8]
    _GDIPlus_Startup()
    $hImage = _GDIPlus_ImageLoadFromFile(FileOpenDialog("Bild auswählen", @ScriptDir, "Bilder (*.jpg)"))
    If Not $hImage Then Exit _GDIPlus_Shutdown()
    $iW = _GDIPlus_ImageGetWidth($hImage)
    $iH = _GDIPlus_ImageGetHeight($hImage)

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

    $x = 140
    $y = 110

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

    $Form1 = GUICreate("Form1", $iW, $iH)
    $MenuItem1 = GUICtrlCreateMenu("Texte und Schriften")
    $mnText1 = GUICtrlCreateMenuItem("Hunde", $MenuItem1)
    $mnText2 = GUICtrlCreateMenuItem("Katzen", $MenuItem1)
    GUISetState()

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

    Global $Text[4]

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

    $Text[0] = "Welpen"
    $Text[1] = "Hunde"
    $Text[2] = "Katzen"
    $Text[3] = "Vögel"

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

    ;_ArrayDisplay($Text)

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

    $hGraphics = _GDIPlus_GraphicsCreateFromHWND($Form1)
    ;$hBitmap = _GDIPlus_BitmapCreateFromGraphics($iW, $iH, $hGraphics)
    $hBitmap = _GDIPlus_BitmapCreateFromGraphics($iW, $iH, $hGraphics)
    $hCtxt = _GDIPlus_ImageGetGraphicsContext($hBitmap)
    _GDIPlus_GraphicsSetSmoothingMode($hCtxt, 2)
    DllCall($ghGDIPDll, "uint", "GdipSetTextRenderingHint", "handle", $hCtxt, "int", 4)
    _GDIPlus_GraphicsDrawImage($hCtxt, $hImage, 0, 0)

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

    _GDIPlus_GraphicsDrawImage($hGraphics, $hBitmap, 0, 0)
    ;$aFont = _ChooseFont()
    $hBrush = _GDIPlus_BrushCreateSolid(0xFF000000 + $afont[7])
    $hFormat = _GDIPlus_StringFormatCreate()
    $hFamily = _GDIPlus_FontFamilyCreate($afont[2])
    $hFont = _GDIPlus_FontCreate($hFamily, $afont[3], $afont[1])
    $tLayout = _GDIPlus_RectFCreate($x, $y, 1000, 1000)
    _GDIPlus_GraphicsDrawStringEx($hCtxt, $Text[1], $hFont, $tLayout, $hFormat, $hBrush)
    _GDIPlus_GraphicsDrawImage($hGraphics, $hBitmap, 0, 0)
    Global $hDLL = DllOpen("user32.dll")

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

    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    _GDIPlus_ImageSaveToFile($hBitmap, @ScriptDir & "\Ilse.jpg")
    _GDIPlus_FontDispose($hFont)
    _GDIPlus_FontFamilyDispose($hFamily)
    _GDIPlus_StringFormatDispose($hFormat)
    _GDIPlus_BrushDispose($hBrush)
    _GDIPlus_GraphicsDispose($hGraphics)
    _GDIPlus_GraphicsDispose($hCtxt)
    _GDIPlus_Shutdown()
    DllClose($hDLL)
    GUIDelete()
    Exit

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

    Case $mnText1
    _Schrift1()
    Case $mnText2
    _Schrift2()

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

    EndSwitch
    If _IsPressed("25") Then
    $x -= 1
    DllStructSetData($tLayout, "X", $x)
    Update()
    ElseIf _IsPressed("27") Then
    $x += 1
    DllStructSetData($tLayout, "X", $x)
    Update()
    ElseIf _IsPressed("26") Then
    $y -= 1
    DllStructSetData($tLayout, "Y", $y)
    Update()
    ElseIf _IsPressed("28") Then
    $y += 1
    DllStructSetData($tLayout, "Y", $y)
    Update()
    EndIf
    WEnd

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

    Func Update()
    ;MsgBox(0,"",$x&"-"&$y)
    _GDIPlus_GraphicsDrawImage($hCtxt, $hImage, 0, 0)
    _GDIPlus_GraphicsDrawStringEx($hCtxt, $Text[1], $hFont, $tLayout, $hFormat, $hBrush)
    ;_GDIPlus_GraphicsDrawStringEx($hCtxt, $Text2, $hFont, $tLayout, $hFormat, $hBrush)
    _GDIPlus_GraphicsDrawImage($hGraphics, $hBitmap, 0, 0)
    Return 1
    EndFunc ;==>Update

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

    Func _Schrift1()

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

    _GDIPlus_GraphicsDrawImage($hGraphics, $hBitmap, 0, 0)
    $afont = _ChooseFont()
    $hBrush = _GDIPlus_BrushCreateSolid(0xFF000000 + $afont[7])
    $hFormat = _GDIPlus_StringFormatCreate()
    $hFamily = _GDIPlus_FontFamilyCreate($afont[2])
    $hFont = _GDIPlus_FontCreate($hFamily, $afont[3], $afont[1])
    $tLayout = _GDIPlus_RectFCreate($x, $y, 1000, 1000)
    _GDIPlus_GraphicsDrawStringEx($hCtxt, $Text[1], $hFont, $tLayout, $hFormat, $hBrush)
    _GDIPlus_GraphicsDrawImage($hGraphics, $hBitmap, 0, 0)
    Global $hDLL = DllOpen("user32.dll")
    EndFunc ;==>_Schrift1

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

    Func _Schrift2()

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

    _GDIPlus_GraphicsDrawImage($hGraphics, $hBitmap, 0, 0)
    $afont = _ChooseFont()
    $hBrush = _GDIPlus_BrushCreateSolid(0xFF000000 + $afont[7])
    $hFormat = _GDIPlus_StringFormatCreate()
    $hFamily = _GDIPlus_FontFamilyCreate($afont[2])
    $hFont = _GDIPlus_FontCreate($hFamily, $afont[3], $afont[1])
    $tLayout = _GDIPlus_RectFCreate($x, $y, 1000, 1000)
    _GDIPlus_GraphicsDrawStringEx($hCtxt, $Text[2], $hFont, $tLayout, $hFormat, $hBrush)
    _GDIPlus_GraphicsDrawImage($hGraphics, $hBitmap, 0, 0)
    Global $hDLL = DllOpen("user32.dll")
    EndFunc ;==>_Schrift2

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


    ...hoffe ihr habt da ne Idee

    Liebe Grüße
    Ilse ;)

  • InetRead und InetGet ohne Wert

    • Ilse
    • 28. Juli 2012 um 18:41

    Hallo,

    erstmal merci für die Hilfe.
    @BuxBunny
    Mit dem Link weiß ich,
    ich dachte an Regex um an den Text zu kommen
    misterspeed
    Das mit den API Funktionen sieht ziemlich heftig aus.
    Das ist absolutes Neuland.

    Hast du da nicht vielleicht ein Beispiel
    wie man das in Autoit integrieren kann.

    Bestimmt kompliziert. Oder?

    Liebe Grüße
    Ilse ;)

  • InetRead und InetGet ohne Wert

    • Ilse
    • 28. Juli 2012 um 17:06

    Hallo BadBunny,

    leider nicht...

    Es ist Quellcode da, aber das Ergebnis ist unterschiedlich.

    Zum Test:

    Schreibe mal bei Google: definiere Hunde
    Dann kommt dieser Text

    Zitat

    Webdefinitionen:
    Die Hunde (Canidae) sind eine Familie innerhalb der Überfamilie der
    Hundeartigen. Zu den Hunden gehören beispielsweise die Füchse,...

    Wenn ich nun in der Adresszeile den Code kopiere
    und den Quellcode downloade, dann finde ich diesen Text nicht!

    Alle anderen html Befehle sind da...


    Liebe Grüße
    Ilse ;)

  • InetRead und InetGet ohne Wert

    • Ilse
    • 28. Juli 2012 um 16:18

    Hallo,

    ich möchte gerne folgendes auslesen,
    aber der Wert erscheint einfach nicht im Quelltext:

    Kurze Info:

    Ich trage bei Google folgendes ein:

    definiere Hundehalter

    Den Definitionstext möchte ich gerne auslesen, aber der erscheint nicht im Quellcode

    Spoiler anzeigen
    [autoit]


    #include <Array.au3>
    #include <String.au3>
    #include <file.au3>

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

    $Adresse = Clipget() ; einfach die Adresse nach der Suche in die Zwischenablage kopieren
    $sSource= BinaryToString(InetRead($Adresse, 1))

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

    ClipPut($sSource) ; hier sollte nun Definition von... zu finden sein

    [/autoit]

    Woran kann das liegen?
    Auch InetGet hat bei mir nicht funktioniert!


    Liebe Grüße
    Ilse ;)

  • 2 x Splashtext gleichzeitig

    • Ilse
    • 28. Juli 2012 um 10:02

    Hallo K.K.,

    konnte mich gestern nicht mehr melden.
    Merci noch für deine Hilfe.

    Liebe Grüße
    Ilse ;)

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™