Beiträge von autoBert

Hallo alexander,

schau dirdoch einfach einmal [ gelöst ] Binärcode eines Bildes als Bild in einer GUI darstellen an,

mfg (Auto)Bert

Hallo tweaky,

danke für die Meldung, ich weiss aber noch nicht wann ich dazu komme es zu beheben,

mfg (Auto)Bert

Hallo inferior,

schau dir einmal die Möglichkeiten von BugFix UDF an: ListView - SubItem einzeln färben/formatieren, Finale Version!

mfg (Auto)Bert

Zitat von alexanderschill

[autoit]

$123 = Spielstein[Zeile[$Zahl]][$Zahl]

[/autoit]

aber nochmal dazu warum geht das nich

Spielstein ist keine Variable, du hast $ vergessen,

mfg (Auto)Bert

Hallo WhiteLion,

dein Skript lässt sich bei mir erst gar nicht starten. Fehlerausgabe Scite-Console:

"C:\Programme\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "C:\Programme\AutoIt3\Examples\Tests\EnumWndProc.au3" /autoit3dir "C:\Programme\AutoIt3" /UserParams    
+>12:46:06 Starting AutoIt3Wrapper v.2.0.1.24    Environment(Language:0407  Keyboard:00000407  OS:WIN_XP/Service Pack 3  CPU:X86 OS:X86)
>Running AU3Check (1.54.19.0)  from:C:\Programme\AutoIt3
+>12:46:07 AU3Check ended.rc:0
>Running:(3.3.6.1):C:\Programme\AutoIt3\autoit3.exe "C:\Programme\AutoIt3\Examples\Tests\EnumWndProc.au3"    
C:\Programme\AutoIt3\Examples\Tests\EnumWndProc.au3 (38) : ==> Array variable subscript badly formatted.:
if IsArray($edithandlearray) Then $editofconsole = $edithandlearray[$edithandlearray[0]-2]
if IsArray($edithandlearray) Then $editofconsole = $edithandlearray[^ ERROR
->12:46:09 AutoIT3.exe ended.rc:1
>Exit code: 1    Time: 8.866

du solltest so abändern:

if IsArray($edithandlearray) Then
if $edithandlearray[0] > 1 then $editofconsole = $edithandlearray[$edithandlearray[0]-2]
EndIf

da bei mir das Array nur 1 Wert (Leerstring) enthält,

mfg (Auto)Bert

du musst auch das benötigte Include-File einbinden:

#Include <GuiEdit.au3>

mfg (Auto)Bert

Hallo alexanderschill,

mit mosegetpos hast du recht (habe leider übersehen, dass du eine Dimension mit gegeben hast). Der Teil zu Switch stimmt aber wie du anhand dieses (unbsinnigen) SKriptes prüfen kannst:

$zahl = InputBox("Zahl eingeben")
Switch $zahl
case $zahl <= 10 or $zahl > 10
MsgBox(0,"","Die Zahl ist entweder kleiner gleich oder grösser 10")
case Else
MsgBox(0,"",$zahl)
EndSwitch

wenn du eine Zahl eingibst wird immer nur die 1, MsgBox angezeigt,

mfg (Auto)Bert

Zitat von alexanderschill

[autoit]

Global $NUMMER=0...Func SetColor() AutoItSetOption("MouseCoordMode", 1) $X_COORD = MouseGetPos(0) $FARBE="ROT" Switch $X_COORD Case $X_COORD<-352 Or $X_COORD>352 Sleep(500) Case -352 To -260 $NUMMER = 0 Case -250 To -158 $NUMMER = 1 Case -148 To 56 $NUMMER = 2 Case -46 To 46 $NUMMER = 3 Case 56 To 148 $NUMMER = 4 Case 158 To 250 $NUMMER = 5 Case 260 To 352 $NUMMER = 6 EndSwitch If $Zeile[$NUMMER]= -1 Then MsgBox(16,"ERROR","blablabla") $Zeile[$NUMMER]=0 Else _SetImagefromResource($Spielstein[$NUMMER][$Zeile[$NUMMER]],$FARBE, @ScriptDir & "\PIC.dll", $RT_RCDATA) $Zeile[$NUMMER]-=1 EndIf

[/autoit]

MouseGetPos liefert ein Array zurück deshalb kann es nicht gehen, desweiteren würde (im korrigierten Skript) die erste Case Abfrage alle witeren Abfragen verhindern, da sie ja immer wahr ist, da Switch .. Case nach der ersten Lösung aufhört weiter zu testen,

mfg (Auto)Bert

Zitat von Carsten8

ich bin (wie in meinem anderen Thread schon erwähnt) dabei ein kleines Applet für den Bildschirm meiner Tastatur zu schreiben

dieser Thread wurde von Oscar geclosed:

Zitat

Wenn ein AutoIt-Skript alle Tastatureingaben abfangen kann, bevor ein anderes Programm diese bekommt oder eben auch nicht, dann fehlt nur ein ganz kleiner Schritt zu einem Keylogger.
Und genau das wollen wir hier nicht supporten. Sorry!

Edit: Damit verschaffst Du Dir auch schon wieder einen Vorteil (= Bot). Ich denke es ist Zeit: [Thread closed]

und dieser sollte aus dem gleichen Grund auch geclosed werden und da du wiederholt gegen die Forenregeln verstösst eine Verwarnung erhalten,

mfg (Auto)Bert

Zitat von madmax2010

damit ich das DBProg nochmal starten kann.

Lässt sich das Proramm manell zweimal starten

Hallo tklausl,

Zitat von Hilfe

_GDIPlus_BitmapCloneArea

Erzeugt eine Kopie eines Bitmap-Objekts von dem angegeben Bereich und Format.

#Include <GDIPlus.au3>
_GDIPlus_BitmapCloneArea($hBmp, $iLeft, $iTop, $iWidth, $iHeight[, $iFormat = 0x00021808])

mfg (Auto)Bert

Hallo vanaxel,

dein Vorhaben widerspricht den Nutzngsbedingungen von Herold.at.

Zitat von http://www.herold.at/fileadmin/herold/docs/nutzungsbedingung/usage.pdf

Der Nutzer ist berechtigt, die Online-Services ausschließlich
zur Abfrage zur eigenen, nicht kommerziellen
Informationsbeschaffung zu nutzen. Die eigene
Informationsbeschaffung besteht darin, bestimmte Firmen
und Privatpersonen mit den dazugehörigen Informationen
(Adresse, Rufnummer, etc.) aufzufinden. Die Nutzung der
Suchergebnisse darf ausschließlich für eigene
nichtkommerzielle Zwecke erfolgen. Die Nutzung der
Online-Services zu anderen Zwecken ist ausdrücklich
untersagt. Unzulässig ist insbesondere die Verwendung
der Online-Services im Zusammenhang mit der
gewerblichen Adressenverwertung, der Verwendung zum
Aufbau oder zur Ergänzung von Teilnehmer-, Firmen- oder
anderen Verzeichnissen jeder Art und in jeder medialen
Form (in Printform, elektronisch, auf CD-ROM etc.), die
Verwendung zur Durchführung eines Auskunftsdienstes
oder eines Call-Centers, die Verwendung zur Erteilung von
Telefonauskünften, die Verwendung zu Marketing- und
Werbezwecken, die Verwendung zum Aufbau von
Konkurrenzprodukten zu Produkten von HEROLD
(insbesondere HEROLD CD-ROM bzw. DVD Produktpalette,
HEROLD Einzeladressenverkauf etc.), die Verwendung
zu sonstigen kommerziellen Zwecken sowie
generell für Zwecke oder im Interesse Dritter.

Alles anzeigen

üblicherweise verkaufen solche Verlage aber selektierte Adressen, also einfach dort anfragen,

mfg (Auto)Bert

Hallo wenn du es direkt nach der GUI-Erstellung schreibst klappt es:

siehe dazu auch

Zitat von Hilfe zu GUICtrlSetBkColor

Bemerkungen

Derzeit können nur Button, Label, Checkbox, Group, Radio, Edit, Input, List, Listview, ListviewItem, Treeview, TreeviewItem, Graphic, Progress, Slider und Combo Controls eingefärbt werden.

Eine Progressbar kann nicht verändert werden, wenn der "Windows XP style" verwendet wird.

mfg Auto)Bert

Hallo Tweaky,

im Beispiel zu

GUICtrlSetDefBkColor

ist ein Fehler anstelle von

GUICtrlSetBkColor(-1, 0x0000FF) ; Ändert die Hintergrundfarbe für alle definierten Controls

müsste es heissen

GUICtrlSetBkColor(-1, 0x0000FF) ; Ändert die Hintergrundfarbe für das zuletzt definierte Control

ist warscheins schon im Englischen seit Urzeiten falsch,

mfg (Auto)Bert

Zitat von bigmac38

Trenne ich diese ohne mich eigentlich abzumelden, bleibt das Ganze bei diesem Warten auf das Fenster stehen, obwohl es mittlerweile angezeigt wird.

Hat jemand eine Idee?

Was spricht dagegen die Session erst am Ende zu schliessen?

mfg (Auto)Bert

Hallo Buckiuxx,

wenn du eine INet-Verbindung hast kannst du es über den free AutoIT Online Compiler machen,

mfg (Auto)Bert

Hallo billemg,

dadurch dass du di Berechnungen direkt in der while Schleife ausführst wird durch das ständige Aktualisieren eine Änderung unmöglich. Führe die Berechnungen nur aus wenn sich etwas geändert hat, dann sollte es klappen:

mfg (Auto)Bert

Hallo billemg,

hier einmal ein Beispiel wie du ein Date-Conrol zur Zeiteingabe benutzen kannst: [spoiler][autoit]
#include <StaticConstants.au3>
#include <date.au3>
#include <DateTimeConstants.au3>
#include <EditConstants.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include<WindowsConstants.au3>

Opt('GUIOnEventMode', 1)

Global $sTitel = 'GUICtrlCreateDate zur Zeiteingabe benutzen'

Local $hMainGui = GUICreate($sTitel, 400, 280, 140, 150, BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
;erzeugt eine GUI die zurückgebebene ID wird in der Variablen $hMainGui gespeichert
;die GUI hat BOXen für Mininmieren, Maximieren und ist in der Größe frei änderbar
GUISetOnEvent($GUI_EVENT_CLOSE, '_End')
;Verknüpft dem Event $Gui_Event_Close mit der Funktion _End

;Menübar anzeigen
Global $menu_help = GUICtrlCreateMenu("?", -1, 1)
Global $item_help_auto = GUICtrlCreateMenuItem("Autor: (Auto)Bert", $menu_help)
Global $item_help_exit = GUICtrlCreateMenuItem("Beenden", $menu_help)
GUICtrlSetOnEvent(-1, '_End')

Local $hedtTime = GUICtrlCreateDate(@HOUR & ":" & @MIN, 20, 10, 130, 25, $DTS_UPDOWN) ;<=====================================
;erzeugt ein Time Steuerelement die zurückgegebene ID wird in der Variablen $hedtTime gespeichert
Local $DTM_SETFORMAT_ = 0x1032
Local $style ="HH:mm"
GUICtrlSendMsg($hedtTime, $DTM_SETFORMAT_, 0, $style)
GUICtrlSetFont(-1, 12)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT + $GUI_DOCKRIGHT + $GUI_DOCKTOP + $GUI_DOCKHEIGHT)
;verankert das Date Steuerelement Links, rechts, oben und fixiert die Höhe
;beim Resizen bleibt es dadurch auf seiner Position und ändert nur die Breite

GUICtrlCreateButton('Be&enden', 220, 115, 150, 25)
GUICtrlSetOnEvent(-1, '_END')
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)

GUICtrlCreateGraphic(0, 230, 400, 2, $SS_BLACKRECT)
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKLEFT + $GUI_DOCKBOTTOM)
Global $hStatus = GUICtrlCreateLabel("", 5, 235, 400, 25)

GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKLEFT + $GUI_DOCKBOTTOM)
;verankert das Label Links, rechts und unten; fixiert die Höhe
;beim Resizen bleibt es dadurch auf seiner Position und ändert nur die Breite wird angepasst
GUISetState()

While 1
Sleep(120)
WEnd

Func _End()
GUIDelete($hMainGui)
Exit
EndFunc ;==>_End[spoiler][autoit]Viel Spass damit

Edit: Skript korrigiert, da fälschlicherweise hh (=12-Stundenformat) statt HH (=24-Stundenformat)
mfg (Auto)Bert

Zitat von oetzn

autoBert, hast du das eigentlich immer in der Zwischenablage?
Sag blos du schreibst das jedes Mal neu xD

schau in meine Signatur, dann kommst du auf die richtige Idee,

mfg (Auto)Bert

Hallo Vanaxel,

Zitat von BugFix

Wozu diese Umstände? Wenn sowieso die IE.au3 verwendet wird, dann gehts mit einem Befehl: _IELinkGetCollection

dann mach es doch damit.

Zitat von Andy

Ob er jetzt aus dem Quellcode alle "passenden" Links ausfiltert oder aus einer _IELinkGetCollection-Liste die "passenden" ausfiltert bleibt m.E. gleich....

anscheinend nicht (was auch am Threadersteller liegen könnte)

@Vanaxel, oder poste einfach den Link zu der Seite die du untersuchen willst,

mfg (Auto)Bert