Beiträge von Goldy

So klappt das super!

Das Funktioniert super, nur wenn das Programm neu gestartet wird, ist der Zähler wieder bei 1

[autoit]

$Hinzufuegen = GUICreate("Test", 508, 146, 366, 413)
$Input1 = GUICtrlCreateInput("ID", 16, 72, 121, 21)
$Input2 = GUICtrlCreateInput("Name", 192, 72, 121, 21)
$Input3 = GUICtrlCreateInput("Stückzahl", 368, 72, 121, 21)
$Artikel = GUICtrlCreateLabel("ID", 16, 48, 58, 19)
GUICtrlSetFont(-1, 8, 800, 0, "@Arial Unicode MS")
$Name = GUICtrlCreateLabel("Name", 192, 48, 36, 19)
GUICtrlSetFont(-1, 8, 800, 0, "@Arial Unicode MS")
$Label1 = GUICtrlCreateLabel("Stückzahl", 368, 48, 61, 19)
GUICtrlSetFont(-1, 8, 800, 0, "@Arial Unicode MS")
$Titel = GUICtrlCreateLabel("Hinzufügen", 184, 16, 128, 22)
GUICtrlSetFont(-1, 10, 800, 0, "@Arial Unicode MS")
$Button1 = GUICtrlCreateButton("Speichern", 208, 104, 75, 25)
GUICtrlSetFont(-1, 9, 800, 0, "@Arial Unicode MS")
GUISetState(@SW_SHOW)

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
GuiSetState(@SW_Hide,$Hinzufuegen)
GuiSetState(@SW_SHOW,_Start())
Exit

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

Case $Button1
$Input1Save = GUICtrlRead($Input1)
$Input2Save = GUICtrlRead($Input2)
$Input3Save = GUICtrlRead($Input3)
IniWrite ( "system.ini", "ID", "", $Input1Save )
IniWrite ( "system.ini", "Name", "", $Input2Save )
IniWrite ( "system.ini", "Stückzahl", "", $Input3Save )
MsgBox(64,"Minen-Tabelle","Artikel wurde erfolgreich hinzugefügt")
GuiSetState(@SW_Hide,$Hinzufuegen)
GuiSetState(@SW_SHOW,_Start())

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

EndSwitch
WEnd

[/autoit]

Jetzt speichert alles in der INI, aber alles was vorher Stand wird wieder überschrieben.

Ich möchte das es in der Ini wie Folgt aussieht:

ID//////////////NAME/////////////////ANZAHL
1 Diamanten 1000
2 usw usw
3 usw usw
4
5
6
7
8
9
10

Die IDS sollen Automatisch hinzugefügt werden

Namen und Anzahl möchte ich Selber eintragen.

Sollte man das die Eingaben speichern Ohne das etwas in Input 2 und 3 steht soll auch keine ID erstell werden.

Hallo Com

Ich habe 3 Input Boxen.

Die erste Input Box soll immer Mitzählen von alleine. Also 1 Eintrag 2 Eintrag 3 Eintrag.

Bei der 2 Möchte ich einen Namen setzen.

Bei der 3 Eine Zahl.

Also zum Beispiel

1 Diamanten 23
2 Holz 34

Hoffe ihr versteht was ich meine

MfG
Goldy

Zitat von DaisukeHideki

Auch dir danke ich, Goldy.
Jedoch war Jautois schneller.

Kein Problem

So bitte :

Spoiler anzeigen

[autoit]

#NoTrayIcon
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=Icon.ico
#AutoIt3Wrapper_outfile=Launcher.exe
#AutoIt3Wrapper_UseX64=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
; ================================;
; Minecraft Launcher
; Made by Aldeos
; © 2011 Aldeos.de
; ================================;

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

;====Includes====;
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

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

If Not FileExists(@AppDataDir & "\.minecraft\Splash.bmp") Then FileInstall("Splash.bmp", @AppDataDir & "\.minecraft\Splash.bmp")

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

;====GUI====;
$GUI = GUICreate("Minecraft Launcher by Aldeos", 400, 177, 203, 142)
$NAME = GUICtrlCreateLabel("Login:", 104, 34, 33, 17)
$NAME_READ = IniRead(@AppDataDir & "\.minecraft\Launcher.ini", "Config", "NAME", "")
$NAME_INPUT = GUICtrlCreateInput($NAME_READ, 160, 32, 121, 21)
$PASSWORD = GUICtrlCreateLabel("Password:", 104, 62, 53, 17)
$PASS_READ = IniRead(@AppDataDir & "\.minecraft\Launcher.ini", "Config", "PASS", "")
$PASSWORD_INPUT = GUICtrlCreateInput($PASS_READ, 160, 60, 121, 21)
$IP = GUICtrlCreateLabel("IP:", 104, 90, 17, 17)
$IP_READ = IniRead(@AppDataDir & "\.minecraft\Launcher.ini", "Config", "IP", "")
$IP_INPUT = GUICtrlCreateInput($IP_READ, 160, 88, 121, 21)
$SAVE = GUICtrlCreateButton("Speichern", 104, 128, 81, 25, $WS_GROUP)
$START = GUICtrlCreateButton("Start", 192, 128, 89, 25, $WS_GROUP)
$GUI_IMAGE = GUICtrlCreatePic(@AppDataDir & "\.minecraft\Splash.bmp", 0, 0, 401, 177, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
GUISetState(@SW_SHOW)

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

;====Funktionen====;
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $SAVE
_save()
Case $START
ShellExecute(@AppDataDir & "\.minecraft\Minecraft.exe", $NAME_READ & " " & $PASS_READ & " " & $IP_READ)
If Not @error Then Exit
EndSwitch
WEnd

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

Func _save()
If Not FileExists("Launcher.ini") Then

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

$name = GUICtrlRead($NAME_INPUT)
$pw = GUICtrlRead($PASSWORD_INPUT)
$ip = GUICtrlRead($IP_INPUT)
IniWrite("Launcher.ini", "Config", "NAME", $name)
IniWrite("Launcher.ini", "Config", "PASS", $pw)
IniWrite("Launcher.ini", "Config", "IP", $ip)
Else
$name = GUICtrlRead($NAME_INPUT)
$pw = GUICtrlRead($PASSWORD_INPUT)
$ip = GUICtrlRead($IP_INPUT)
IniWrite("Launcher.ini", "Config", "NAME", $name)
IniWrite("Launcher.ini", "Config", "PASS", $pw)
IniWrite("Launcher.ini", "Config", "IP", $ip)
EndIf
EndFunc ;==>_save

[/autoit]

Ich habe es auf jedenfall zum laufen gebracht mit den Bildern

Ich vergesse jedes mal die Pics mit zu uppen sry.

MfG

Goldy

Es hat sich bei mir erst gelöst als ich die reihenfolge der Bilder geändert habe also

Zuerst

Pic = Button
Pic = Hauptbild

Sonst ist ja der Button unter dem Bild.

Naja so hat es nun dann funktioniert.

Hi Leute ;D

Ich habe ein ganz einfaches Script geschrieben wo durch klicken vom Button ein neues GUI aufgeht.

Das habe ich soo xxxx male gemacht nur irgentwie geht das bei mir gerade nicht und ich sehe bzw. finde den fehler nicht.

[autoit]

;=============================
; Little Helper
;=============================

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

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>
DirCreate("C:\goldy")
$PicLoad = True
If $PicLoad = True Then FileInstall("C:\Users\Goldy\Desktop\Little Helper\Bilder\Start.jpg", "C:\goldy\Start.jpg")
$PicLoad3 = True
If $PicLoad3 = True Then FileInstall("C:\Users\Goldy\Desktop\Little Helper\Bilder\WindowsWahl.jpg", "C:\goldy\WindowsWahl.jpg")
$destination1 = "C:\goldy\Start.jpg"
$destination3 = "C:\goldy\WindowsWahl.jpg"
$Form1 = GUICreate("Little Helper © by Goldy 2011", 657, 327, 413, 127)
$Pic1 = GUICtrlCreatePic($destination1, 0, 0, 650, 322)
$Button11 = GUICtrlCreateButton("Enter", 112, 184, 385, 81)
GUICtrlSetFont(-1, 48, 400, 0, "Arial")
GUISetState(@SW_SHOW)

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button11
GUISetState(@SW_HIDE, $Form1)
_WindowsWahl()

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

EndSwitch
WEnd

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

Func _WindowsWahl()
$Form2 = GUICreate("Little Helper © by Goldy 2011", 654, 327, 413, 127)
$Pic3 = GUICtrlCreatePic($destination3, 0, 0, 650, 315)
GUISetState(@SW_SHOW)

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

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

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

EndSwitch
WEnd

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

EndFunc
DirRemove("C:\goldy", 1)

[/autoit]

Das weis ich, aber für Freunde etc. reicht es ja, will ja niemanden die Fessi zumüllen

Alles gute ;D

Joo Tweaky genau so meinte ich das ;D

Wie kann ich es machen das mir Bilder wie bei

[autoit]

SplashImageOn("Das Dante Programm", $destination4, 450, 582)

[/autoit]

Angezeigt werden aber ohne den Rand?

Also das,dass Bild Praktisch frei steht ?=

MfG

Goldy

Hey danke

So kann nun closen alles geht ;D

Vielen dank

Habe es nun so :

[autoit]

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_UseX64=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
;----------------------------------

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

;----------------------------------

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

#include
#include
#include
$destination1 = "C:\Geil\73qdxnia.jpg"
$destination2 = "C:\Geil\79jnb7bv.jpg"
$destination3 = "C:\Geil\425ndto4.jpg"
$destination4 = "C:\Geil\cp2a7qwf.jpg"
$destination5 = "C:\Geil\ldohye2h.jpg"
DirCreate("C:\Geil")

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

$Pic1 = True
If $Pic1 = True Then FileInstall("C:\Users\Goldy\Desktop\Bilder\Koch\73qdxnia.jpg", "C:\Geil\73qdxnia.jpg")

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

$Pic2 = True
If $Pic2 = True Then FileInstall("C:\Users\Goldy\Desktop\Bilder\Koch\79jnb7bv.jpg", "C:\Geil\79jnb7bv.jpg")

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

$Pic3 = True
If $Pic3 = True Then FileInstall("C:\Users\Goldy\Desktop\Bilder\Koch\425ndto4.jpg", "C:\Geil\425ndto4.jpg")

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

$Pic4 = True
If $Pic4 = True Then FileInstall("C:\Users\Goldy\Desktop\Bilder\Koch\cp2a7qwf.jpg", "C:\Geil\cp2a7qwf.jpg")

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

$Pic5 = True
If $Pic5 = True Then FileInstall("C:\Users\Goldy\Desktop\Bilder\Koch\ldohye2h.jpg", "C:\Geil\ldohye2h.jpg")

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

SplashImageOn("Das Dante Programm", $destination1, 450, 578)
Sleep(2000)
SplashOff()
SplashImageOn("Das Dante Programm", $destination2, 450, 567)
Sleep(2000)
SplashOff()
SplashImageOn("Das Dante Programm", $destination3, 450, 580)
Sleep(2000)
SplashOff()
SplashImageOn("Das Dante Programm", $destination4, 450, 582)
Sleep(2000)
SplashOff()
SplashImageOn("Das Dante Programm", $destination5, 450, 578)
Sleep(2000)
SplashOff()

[/autoit]

Das klappt auch gut ;D

Wenn ich am Ende noch Delete File mache ist es perfekt ?
Also dann merkt keiner das die Bilder mal aufm PC waren?

Hallo Leute

Ich schreibe gerade ein Programm

Im Moment habe ich das erst :

[autoit]

#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
;$destination1 = $file1
$destination2 = "C:\Users\Goldy\Desktop\Bilder\Koch\79jnb7bv.jpg"
$destination3 = "C:\Users\Goldy\Desktop\Bilder\Koch\425ndto4.jpg"
$destination4 = "C:\Users\Goldy\Desktop\Bilder\Koch\cp2a7qwf.jpg"
$destination5 = "C:\Users\Goldy\Desktop\Bilder\Koch\ldohye2h.jpg"

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

$Pic1 = True
If $Pic1 = True Then FileInstall ("C:\Users\Goldy\Desktop\Bilder\Koch\73qdxnia.jpg", "C:\73qdxnia.jpg")

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

SplashImageOn("Das Dante Programm", $Pic1,450,578)
Sleep(3000)
SplashOff()
SplashImageOn("Das Dante Programm", $destination2,450,567)
Sleep(3000)
SplashOff()
SplashImageOn("Das Dante Programm", $destination3,450,580)
Sleep(3000)
SplashOff()
SplashImageOn("Das Dante Programm", $destination4,450,582)
Sleep(3000)
SplashOff()
SplashImageOn("Das Dante Programm", $destination5,450,578)
Sleep(3000)
SplashOff()

[/autoit]

Das ganze klappt auser halt das Bild das ich mit FileInstall mache.

Was kann ich da machen?

MfG

Goldy

Herzlich Willkommen bei AutoIt.de

Wenn ich das Script starte passiert nix?

Was bringt das ?

Nur im Tray Menü ist was zu sehen sonst nichts.

Zitat von i2c

Wenn ich mich recht erinnere über Systemsteuerung -> Programme und Funktionen und dann das SQLServer Setup über ändern/deinstallieren aufrufen.

Ich kann das Setup nicht auswählen.