Beiträge von DeepRed92

Hallo,

ich wollte fragen, wie ich folgendes machen kann:

Also ich habe eine Klasse, mit der ich eine GUI mit vielen Kontrollelementen erstelle. Möchte ich z.B. ein Kontrollelement auslesen sieht das so aus:
GUICtrlRead($MeineGUI.ButtonOben)
Meine Frage jetzt: Wie kann ich es so machen, dass ich hinter jedem Property einfach ein CtrlRead anhängen kann?
Beispiel: $MeineGUI.ButtonOben.CtrlRead()
So wie bei Java mit .toString() oder .equals()

Zitat

witzig?

Wieso witzig?

Zitat

naja nicht das was es sein soll aber es klappt... blockiert aber leider andere controls

Deaktivier doch einfach das Label mit GUICtrlSetState(-1, $GUI_DISABLE)

Versuchs doch mal so:

#include <WindowsConstants.au3>
#include <GUIConstants.au3>
#include <Misc.au3>
HotKeySet("{F3}", "_Exit")
Global $hWnd = GUICreate("Untitled", 100, 100, Default, Default, -$WS_POPUP)
GUICtrlSetColor(-1, 0xFFFFFF)

GUICtrlCreateLabel("", 0, 0, 100, 100, -1, $GUI_WS_EX_PARENTDRAG)

GUISetState(@SW_SHOW)

While 1
Sleep(10)
WEnd
Func _Exit()
Exit
EndFunc

Das mit der Taste grdückt halten, kann man ja irgendwie implementieren

Hmm da wird irgendwie kein Icon geladen ...

Danke!
Und wie kann ich damit Icon-Dateien laden?

Hat denn keiner eine Idee oder warum antwortet niemand?

Hallo,

kennt jemand eine andere Methode, einen Traymenu mit Icons zu erstellen, ohne die ModernMenu-UDF zu verwenden?
Ich weiß nicht, aber ich glaub ich hab so etwas mal mit der WinAPI-UDF gesehen..

Wer weiß, wie es geht?

Hallo,

ich möchte, dass bestimmte Werte dynamisch zugewiesen werden. Also ca. so:

Execute('$GlobalVar.Haha = "Nichts"')

Doch leider funktioniert das so nicht! Wie mache ich sowas?

Hallo,

ich wollte wissen, wofür ich die Funktion
_AutoItObject_Variant*
_AutoItObject_Wrapper*

_AutoItObject_IUnknownAddRef
_AutoItObject_CLSIDFromString
_AutoItObject_CoCreateInstance
_AutoItObject_PtrToIDispatch
_AutoItObject_IDispatchToPtr
brauche. Wofür braucht man einen Wrapper?

Danke im Voraus!

Was wurde denn jetzt an der UDF alles verändert?

Hallo,

wenn ich ein Script starte, läuft es einwandfrei. Starte ich aber dasselbe Script nocheinmal, kommt diese Fehlermeldung:

[Blockierte Grafik: http://deepsoftware.spacequadrat.de/Downloads/www.AutoIt.de/Bild.bmp]

Diese Meldung kommt auch, wenn ich Funktionen schreibe, die ein zweites starten unterbinden sollen.. (_SingleTon und andere). Woran kann das liegen bzw. wie kann ich so eine Meldung vermeiden?

Zitat

Du mußt sicher in den properties noch Anpassungen vornehmen. Dort verweist ja alles auf *.au3

mhmm stimmt :wacko: .

Habs jetzt aber geschafft. Ich lade mal die Dateien hoch, falls jemand das auch mal machen will.

Zitat

naja das sind halt so zusagen shortcuts

damit man ncih immer alles schreiben muss xD

Diese "Shortcuts" will ich ja benutzen. Doch das geht nur, wenn ich die Befehle klein schreibe!

Hallo,

man kann ja bei SciTE z.b. "FUN" schreiben, die Leertaste drücken und schon hat man das hier: "Func _ ... EndFunc". So das klappt aber nur, wenn ich "FUN" klein schreibe. Das selbe ist auch bei "MB" für MsgBox. Hat jemand das selbe Problem? Wie kann ich das korrigieren? Es nervt nach der Zeit etwas ...

Habs versucht, doch der Text ist immer noch nur schwarz. Hab die Properties kopiert und au3 durch class ersetzt.

Ok mach ich. Danke

Zitat

; Generated by AutoIt Scriptomatic

Woher bekomme ich denn den Scriptomatic???

Hallo,

ich möchte die Dateiendung *.class mit SciTE so öffnen, als wäre es eine *au3-Datei. Wie muss ich das machen? Nur mit Rechtsklick > Eigenschaften > Öffnen mit SciTE bringt nichts, da diese Datei beim öffnen nur schwarz weiß angezeigt wird. Muss ich die Dateiendung selber registrieren? Wenn ja, wie?

http://msdn.microsoft.com/en-us/library/…6(v=VS.85).aspx

Bei mir funktioniert das aber nicht. Mache wohl irgenwas falsch

HotKeySet("{ESC}", "_Exit")

$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20

$strComputer = 'localhost'

$Output=""
$Output &= 'Computer: ' & $strComputer & @CRLF
$Output &= '==========================================' & @CRLF
$objWMIService = ObjGet('winmgmts:\\' & $strComputer & '\')

$colItems = $objWMIService.ExecQuery('SELECT * FROM Win32_Fan', 'WQL', $wbemFlagReturnImmediately + $wbemFlagForwardOnly)

While 1
For $objItem In $colItems
If IsObj($colItems) Then
$Output = 'Information: ' & $objItem.ActiveCooling
ToolTip($Output, 100, 100, 'Info')
EndIf
Next
WEnd

Func _Exit()
Exit
EndFunc