Beiträge von Nathax

Nathax

Ich habe Windows 7 und das mit der Farbe gerade hinbekommen, Danke soweit !
Aber wie kann ich nun ein Bild einfügen?

Nathax

Ich bekomms nicht hin.
Wo bekomm ich die Includes her und wo kann ich den Bildpfad angeben?

Nathax

Hallo, wie kann ich ein Bild hinter ein Tabmenü setzten, sodass alle Controls sowie die Tabs richtig dargestellt werden?

Nathax

Ich bin das Programm nochmal Schritt für Schrittt durchgegangen und habe den Fehler gefunden.
Ich würde ihn gern beschreiben, doch dazu müsste ich mindestens 50% meiner 2500 Zeilen erläutern.
Eins kann ich aber sagen, dieser Fehler ist echt komisch und hat nichts mit einem Befehl zu tun.
Viel eher lag es an einer Schleife, die abgeändert werden musste, damit nun endlich wieder alles funktioniert.
Danke an alle, die versucht haben, mir zu helfen

Nathax

Ich hab doch schon viel gepostet, der Rest funktioniert ja. Nur halt nicht das Auslesen. Hier nochmal die Funktion die beim Klick auf Start ausgeführt wird:

Spoiler anzeigen

[autoit]

GUICtrlSetState($StartButton, $GUI_DISABLE)
GUICtrlSetState($RestartButton, $GUI_DISABLE)
GUICtrlSetState($BackupButton, $GUI_DISABLE)
GUICtrlSetState($HideLabel, $GUI_SHOW)
HotKeySet("{RIGHT}", "_blockTabs")

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

GUICtrlSetData($ChatLogEdit, "")

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

If $RamBoost = "" Then
Run(@ScriptDir & "\Files\Server\run0.bat", @ScriptDir & "\Files\Server\", @SW_HIDE)
ElseIf $RamBoost = "1024MB" Then
Run(@ScriptDir & "\Files\Server\run1.bat", @ScriptDir & "\Files\Server\", @SW_HIDE)
ElseIf $RamBoost = "2048MB" Then
Run(@ScriptDir & "\Files\Server\run2.bat", @ScriptDir & "\Files\Server\", @SW_HIDE)
ElseIf $RamBoost = "3072MB" Then
Run(@ScriptDir & "\Files\Server\run3.bat", @ScriptDir & "\Files\Server\", @SW_HIDE)
EndIf
FileDelete(@ScriptDir & "\Files\Server\server.log")

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

AdlibRegister("_getLog", 1000)

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

WinWait("[class:ConsoleWindowClass]", "")
$CMDTitle = WinGetTitle("[class:ConsoleWindowClass]")

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

While 1
Sleep(50)
If StringInStr(GUICtrlRead($ChatLogEdit), "For help, type") <> "" Then ExitLoop
WEnd
$Aktiv = True
AdlibUnRegister("_blockTabs")
GUICtrlSetData($StartButton, "Stop")
GUICtrlSetState($StartButton, $GUI_ENABLE)
GUICtrlSetState($RestartButton, $GUI_ENABLE)
GUICtrlSetState($CMDKickButton, $GUI_ENABLE)
GUICtrlSetState($CMDGiveItemButton, $GUI_ENABLE)
GUICtrlSetState($CMDBanButton, $GUI_ENABLE)
GUICtrlSetState($CMDBanIPButton, $GUI_ENABLE)
GUICtrlSetState($CMDPardonButton, $GUI_ENABLE)
GUICtrlSetState($CMDPardonIPButton, $GUI_ENABLE)
GUICtrlSetState($CMDTellButton, $GUI_ENABLE)
GUICtrlSetState($CMDTeleportButton, $GUI_ENABLE)
GUICtrlSetState($CMDSayButton, $GUI_ENABLE)
GUICtrlSetState($CMDSetTimeButton, $GUI_ENABLE)
GUICtrlSetState($CMDOpButton, $GUI_ENABLE)
GUICtrlSetState($CMDDeOpButton, $GUI_ENABLE)
GUICtrlSetState($CMDGiveXPButton, $GUI_ENABLE)
GUICtrlSetState($CMDToggleButton, $GUI_ENABLE)
GUICtrlSetState($BackupButton, $GUI_ENABLE)
GUICtrlSetState($CommandInput, $GUI_ENABLE)
GUICtrlSetState($CMDHelpButton, $GUI_ENABLE)
GUICtrlSetState($HideLabel, $GUI_HIDE)
HotKeySet("{RIGHT}")

[/autoit]

Nathax

Kann mir denn einer die am häufigsten verwendeten Befehle sagen, die nur mit 64-Bit laufen?

Nathax

Ich weiß echt nicht was ich machen soll -.-

Nathax

Ok, hier die Teile, die dafür zuständig sind:

Spoiler anzeigen

[autoit]

$ServerControlTab = GUICtrlCreateTabItem("Server-Control")

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

$ChatLogEdit = GUICtrlCreateEdit("", 8, 92, 675, 401, BitOR($ES_READONLY, $ES_WANTRETURN, $WS_VSCROLL, $WS_HSCROLL))
GUICtrlSetFont(-1, 10, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xffffff)

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

...

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

AdlibRegister("_getLog", 1000)

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

...

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

Func _getLog()
If StringReplace(StringReplace(FileRead(@ScriptDir & "\Files\Server\server.log"), @YEAR, @CRLF & @YEAR), @CRLF, "", 1) <> $LogOld Then
GUICtrlSetData($ChatLogEdit, StringReplace(StringReplace(FileRead(@ScriptDir & "\Files\Server\server.log"), @YEAR, @CRLF & @YEAR), @CRLF, "", 1))
_GUICtrlEdit_LineScroll($ChatLogEdit, 0, _GUICtrlEdit_GetLineCount($ChatLogEdit))
$LogOld = StringReplace(StringReplace(FileRead(@ScriptDir & "\Files\Server\server.log"), @YEAR, @CRLF & @YEAR), @CRLF, "", 1)
EndIf
EndFunc ;==>_getLog

[/autoit]

Das mit den Pfaden kann ja eigentlich nicht sein, da es keinen Unterscheid macht, ob ich Rechtsklick->Run oder F5 in Scite mache.

Nathax

Dann funktioniert es aber wie gesagt ja nicht

Nathax

Habe ich mir schon gedacht. Was soll ich nun machen, damit das Programm auch bei 32er Nutzer geht?

Nathax

Sry, aber das Programm wird nacher verkauft, deshalb kann ich weder den Code noch die Exe hier preisgeben. Die Exe ist im richtigen Verzeichnis.

Edit: Mache ich Run(x64) bzw. Compile x64 so funktioniert es
Mit Compile(x64) ebenso, aber können das jetzt alle, d.h. XP-Nutzer/Win7-Nutzer mit 32-Bit benutzen?

Nathax

Hallo,
ich habe ein Programm, dass einen durch eine Batch-Datei erstellten Text in ein Edit-Feld schreibt, geschrieben.
Wenn ich in Scite F5 drücke funktioniert auch aller super, aber wenn ich Rechtslick->Run mache oder compiliere und dann die Exe starte erscheint kein Text in der Edit.
Was soll ich machen?

Nathax

Versuchs dochmal mit dem schreiben so:

[autoit]

Controlsend($CMDTitel, "", "", $Text)

[/autoit]

Nathax

Danke, aber ich glaube ich machs einfach nur mit einem Tab-Menü.
Wer die Lösung hat, kann sie natürlich noch posten.

Nathax

So müsste es doch gehen:

Spoiler anzeigen

[autoit]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\_AutoIT\AutoIt.de\Form1.kxf
$Form1 = GUICreate("Form1", 471, 293, 567, 235)
$Group1 = GUICtrlCreateGroup("Group1", 24, 24, 425, 217)
$Radio1 = GUICtrlCreateRadio("Radio1", 40, 48, 113, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Noch eine Radio-Option", 24, 256, 427, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
GUICtrlDelete($Group1)
GUICtrlDelete($Radio1); wie noch einen RadioButton hinzufügen?
$Group1 = GUICtrlCreateGroup("Group1", 24, 24, 425, 217)
$Radio1 = GUICtrlCreateRadio("Radio1", 40, 48, 113, 17)
$Radio1 = GUICtrlCreateRadio("Radio2", 40, 68, 113, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
EndSwitch
WEnd

[/autoit]

Edit: So hast dus mit nem Array:

Spoiler anzeigen

[autoit]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
#Region ### START Koda GUI section ### Form=C:\_AutoIT\AutoIt.de\Form1.kxf

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

Dim $Radio[10]

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

$Form1 = GUICreate("Form1", 471, 293, 567, 235)
$Group1 = GUICtrlCreateGroup("Group1", 24, 24, 425, 217)
$Radio[0] = GUICtrlCreateRadio("Radio", 40, 48, 113, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Noch eine Radio-Option", 24, 256, 427, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

$j = 0

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
If $j < 8 Then $j += 1
GUICtrlDelete($Group1)
GUICtrlDelete($Radio)
$Group1 = GUICtrlCreateGroup("Group1", 24, 24, 425, 217)
For $i = 0 to UBound($j)
$Radio[$j] = GUICtrlCreateRadio("Radio"&$j, 40, 48+$j*20, 113, 17)
Next
GUICtrlCreateGroup("", -99, -99, 1, 1)
EndSwitch
WEnd

[/autoit]

Nathax

Hallo, wie kann ich Controls erzeugen, die dann nur in einem Untertab angezeigt werden?
Ich möchte z.B. einen Button im Control-Reiter.
Das ist mein Code:

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
#include <TabConstants.au3>
#include <GuiTab.au3>
#include <WindowsConstants.au3>

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

#Region ### START Koda GUI section ### Form=
$MainGui = GUICreate("Server-Tool", 992, 714, 297, 182)
GUISetFont(10, 800, 0, "Arial Narrow")

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

$MainTab = _GUICtrlTab_Create($MainGui, 0, 0, 1024, 749)
_GUICtrlTab_InsertItem($MainTab, 0, "Server")
_GUICtrlTab_InsertItem($MainTab, 1, "File-Management")
_GUICtrlTab_InsertItem($MainTab, 2, "Premium-Account")

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

$ServerSubTab = _GUICtrlTab_Create($MainTab, 10, 27, 975, 680)
_GUICtrlTab_InsertItem($ServerSubTab, 0, "Control")
_GUICtrlTab_InsertItem($ServerSubTab, 1, "Properties")
_GUICtrlTab_InsertItem($ServerSubTab, 2, "Plugins")

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

#cs
$TabMain = GUICtrlCreateTab(0, 0, 1024, 749)

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

$ServerSubTab = GUICtrlCreateTabItem("Server")
GUICtrlCreateTabItem("")
$PropertiesTab = GUICtrlCreateTab(0, 0, 1024, 749)
$PropertiesItem = GUICtrlCreateTabItem("Properties")
GUICtrlCreateTabItem("")

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

$PremiumAccountTab = GUICtrlCreateTabItem("Premium-Account")
$FileManagementTab = GUICtrlCreateTabItem("File-Management")
$SettingsItem = GUICtrlCreateMenu("&Settings")
$AboutItem = GUICtrlCreateMenu("&About")#
#ce

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

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While 1
$Msg = GUIGetMsg()

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

Switch (_GUICtrlTab_GetCurSel($MainTab))
Case 0
ControlShow("","",$ServerSubTab)
Case 1
ControlHide("","",$ServerSubTab)
Case 2
ControlHide("","",$ServerSubTab)
EndSwitch

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

Switch $Msg
Case $GUI_EVENT_CLOSE
_exit()
EndSwitch
WEnd

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

Func _exit()
Exit
EndFunc

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

Func GetDlgCtrlID($hwndCtl)
Local $aRes = DllCall("user32.dll", 'int', 'GetDlgCtrlID','hwnd', $hwndCtl)
Return $aRes[0]
EndFunc

[/autoit]

Nathax

Hi, weiß jemand wie das geht?
Ich meine z.B., dass man bei Druck auf die "3" die Form, worüber die Maus ist, anklickt.

Nathax

^^, wenn du schon son prozessor nimmst würde ich auch das mb empfehlen

Nathax

Ich hab auch die CPU und das MB Asus M5A99X EVO AM3+ ATX - Computer Shop - Hardware, Notebook & Software by Mindfactory.de

Nathax

Vielen Dank, Leute!
Hab es mir schon gedacht mit @SW_Disable, hab es aber direkt beim Erstellen des Buttons eingebaut und dann wurde das Bild nicht angezeigt. (Wo ist der Kopf*gegen*Wand*hau-Smiley?!) :pinch:

Beiträge von Nathax

Hintergrundbild hinter TabCreate

Hintergrundbild hinter TabCreate

Hintergrundbild hinter TabCreate

Programm funktioniert nach dem Compilieren nicht mehr richtig!

Programm funktioniert nach dem Compilieren nicht mehr richtig!

Programm funktioniert nach dem Compilieren nicht mehr richtig!

Programm funktioniert nach dem Compilieren nicht mehr richtig!

Programm funktioniert nach dem Compilieren nicht mehr richtig!

Programm funktioniert nach dem Compilieren nicht mehr richtig!

Programm funktioniert nach dem Compilieren nicht mehr richtig!

Programm funktioniert nach dem Compilieren nicht mehr richtig!

Programm funktioniert nach dem Compilieren nicht mehr richtig!

Konsole beschreibbar machen

Controls in Tab erzeugen

GUICtrlCreateGroup - Nachträglich Elemente (GUICtrlCreateCheckbox) hinzufügen?

Controls in Tab erzeugen

Mit FF.au3 Form in Firefox anklicken

Motherboard zu AMD Phenom II X6

Motherboard zu AMD Phenom II X6

Eckigen Rand um Button entfernen, der besonders bei Hintergrundbildern auffällt