Beiträge von autoBert

Hallo Buckiuxx,

der entscheidende Unterschied: das Skript von Schnitzel hat nur 1 Endlosschleife, du aber 2 . Da die Funktion _Play über einen Event aufgerufen wird und diese durch deine 2. Endlosschleife nie verlassen wird, ist das Skript blockiert. Mach es so und es klappt:

mfg (Auto)Bert

Hallo EpicWorld,

Zitat von EpicWorld

aber ich will ja auch checkbox und button und input weiß machen das geht aber ncicht

du wurdest bereits mehrfach auf die Hilfe (<==== das ist ein Downloadlink) hingewiesen. Deine Fragestellung zeigt mir jedoch, dass du sie immer noch nicht benutzt, denn

Zitat von Hilfe (Bemerkungen zu GuiCtrlSetColor

Folgende Items können momentan gefärbt werden: Button, Label, Checkbox, Group, Radio, Edit, Input, List, Listview, ListviewItem, Treeview, TreeviewItem, Graphic, Progress und Combo

Checkbox, Radio, Group oder Progress-Controls können nicht gefärbt werden, wenn der "Windows XP style" verwendet wird.

Button-Controls werden immer im "Windows Classic style" gefärbt.

wenn du dies gelesen hättest, hätte deine Frage also lauten müssen: Wie schalte ich den Windows XP style aus, damit ich auch bei Checkboxen die Farbe ändern kann Lösung hat dir ja mittlerweile SEuBo eine gepostet, mit der du es ja sogar zur Laufzeit machen kannst. Im allgemeinen reicht es aber die Farbe bei der Guierstellung festzulegen:

Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/TutorialSehr hilfreich ist auch das Buch von peethebee .

@lukiono, nicht nur du EpicWorld hat es geschafft dass ihm

[ offen ] Kindersicherung

von BugFix wegen der mangelden Eigeninitiative geclosed wurde,

mfg (Auto)Bert

Lies dir die Hilfe zu

GUISetBkColor

durch,

mfg (Auto)Bert

Zitat von EpicWorld

hab doch gesagt ich versteh den script ned

falls es sich darauf bezieht

Zitat von AutoBert

schau dir einafach die Signatur von Ineluki genau an

dann solltest du dir erst einmal die nötigen Grundlagen aneignen, denn wie bereits in einem anderen Thread erwähnt:

Zitat von AutoBert

....
Wir sind hier kein Machmal-Forum, benutze einfach die SUchFUnktion des Boards.

Poste also erst einmal dein bisheriges Skript.

übrigens ich kann dein 1. Zitat im ganzen Thread nicht finden.

Hier kannst du dir die Hilfe herunterladen.
Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/TutorialSehr hilfreich ist auch das Buch von peethebee

Solange dieser Hinweis

Zitat

; Epic World the best place to play!
; Jeglicher versuch einen Script von uns zu kopieren, wird Strafrechtlich verfolgt und zur Anzeige gebracht!

dabei ist wird kein vernünftiger Mensch, Hilfestellung geben, denn er muss es ja kopieren, um dir helfen zu können, darf aber nicht

mfg (Auto)Bert

Hallo Luke4321,

ich dachte du hättest schon alle Stile durchprobiert, hatte vorher deshalb nicht gesucht. Folgendes zeigt (zumindest unter XP) das gewünschte Ergebnis:

$idGUI = GUICreate("Flaggen", 300, 115, -1, -1 ,$WS_DLGFRAME);

mfg (Auto)Bert

Zitat von simon

Das sieht aber nicht danach aus , was ich brauche

mache einen ScreenShot einer Titelleiste und ich zeige dir an einem Beispiel dass es funktioniert,

mfg (Auto)Bert

mir ist gerade noch eine sehr einfache Möglichkeit eingefallen: erstelle ein Icon in der Farbe der Titelleiste und binde dieses mit

GuiSetIcon

ein,

mfg (Auto)Bert

Hallo Luke4321,

Zitat von Luke4321

Aber nichts sieht so aus wie das erste Bild, die Msgbox . Kann mir jemand helfen?

da hilft wohl nur selber schnitzen. Schau dir mal das Skript von meinem MP3-Player (Link in Signatur) an. Dort lege ich eine 2. Gui über die 1. In der 1. erstelle ich z.B. die Pic-Controls für schliessen und minimieren selbst. Auch andere Controls sind in dieser Technik kein Problem, Die 2. Gui erstelle ich dann auf der 1. so dass alles ausser meiner nachgebauten Titelleiste abgedeckt wird. Die 2. Gui ist bei mir zwar teiltransparent, damit man das Hintergrundbild und die Progressbar (auch beides auf Gui 1) noch durchsehen kann, aber das kannst du ja weglassen,

P(r)ost: 2222

mfg (Auto)Bert

Zitat von Buckiuxx

nun wo ich die Funktion ausführen kann
habe ich ein neues Problem entdeckt...

In der Funktion 'Play' wird eine neue GUI erstellt,
die aber nicht auf GUICTRLSETONEVENT zum beenden reagiert...
weiß jemand hier eine Lösung?

poste doch einfach deinen aktuellen Skriptstand, oder sind wir hier bei Rate mal mit Rosenthal,

mfg (Auto)Bert

Zitat von EpicWorld

Meine allgemein internet also das internet einfach ausgeht
Das man keine internet spiele spielen kann und so

schau dir einafach die Signatur von Ineluki genau an

mfg (Auto)Bert

Hallo Dtex,

Dazu empfehle ich dir http://www.bug-fix.info/array_tut.htm zu lesen.

In diesem Post ist ein Skriptbeispiel in dem Contol-IDs in einem Array gespeichert werden: [ offen ] Scrollbars

mfg (Auto)Bert

Zitat von Kev

das komische ist.

wenn ichs so wie bei dir mach, steht bei array nix drin

ich habe es Online geschrieben, da kein komplett lauffähiges Skriptbeispiel dabei, sorry habs nicht getestet kann aber keinen Fehler sehen

Edit: ich habe in meinem vorherigen Post ein Skriptbeispiel hinein editiert

Zitat von Kev

auf meine art:

in der messagebox displayt er alle items die in der list sind.
trägt aber iwie nur den ersten in die db ein.

why?
:o

[autoit]

Func mysql()
If Not _EzMySql_Startup() Then
MsgBox(0, "Error Starting MySql", "Error: "& @error & @CR & "Error string: " & _EzMySql_ErrMsg())
Exit
EndIf
$Pass = "pass"
If Not _EzMySql_Open("localhost", "root", $Pass, "keys", "3306") Then
MsgBox(0, "Error opening Database", "Error: "& @error & @CR & "Error string: " & _EzMySql_ErrMsg())
Exit
EndIf
If Not _EzMySql_Exec("CREATE DATABASE IF NOT EXISTS EzMySqlTest") Then
MsgBox(0, "Error opening Database", "Error: "& @error & @CR & "Error string: " & _EzMySql_ErrMsg())
Exit
EndIf
If Not _EzMySql_SelectDB("keys") Then
MsgBox(0, "Error setting Database to use", "Error: "& @error & @CR & "Error string: " & _EzMySql_ErrMsg())
Exit
EndIf
$lesen = _GUICtrlListBox_GetCount($list)
for $i = 0 To $lesen -1
$ergebnis = _GUICtrlListBox_GetText($list, $i)
msgbox(0,"",$ergebnis)
$insert = 'INSERT INTO licence (licence,used) VALUES (' & $ergebnis & ',1)'
Next
If Not _EzMySql_Exec($insert) Then
MsgBox(0, "Error inserting data to Table", "Error: "& @error & @CR & "Error string: " & _EzMySql_ErrMsg())
Exit
EndIf
EndFunc ;==>mysql

[/autoit]

Alles anzeigen

so sollte es funktionieren;

Func mysql()
If Not _EzMySql_Startup() Then
MsgBox(0, "Error Starting MySql", "Error: "& @error & @CR & "Error string: " & _EzMySql_ErrMsg())
Exit
EndIf
$Pass = "pass"
If Not _EzMySql_Open("localhost", "root", $Pass, "keys", "3306") Then
MsgBox(0, "Error opening Database", "Error: "& @error & @CR & "Error string: " & _EzMySql_ErrMsg())
Exit
EndIf
If Not _EzMySql_Exec("CREATE DATABASE IF NOT EXISTS EzMySqlTest") Then
MsgBox(0, "Error opening Database", "Error: "& @error & @CR & "Error string: " & _EzMySql_ErrMsg())
Exit
EndIf
If Not _EzMySql_SelectDB("keys") Then
MsgBox(0, "Error setting Database to use", "Error: "& @error & @CR & "Error string: " & _EzMySql_ErrMsg())
Exit
EndIf
$lesen = _GUICtrlListBox_GetCount($list)
for $i = 0 To $lesen -1
$ergebnis = _GUICtrlListBox_GetText($list, $i)
msgbox(0,"",$ergebnis)
$insert = 'INSERT INTO licence (licence,used) VALUES (' & $ergebnis & ',1)'
If Not _EzMySql_Exec($insert) Then
MsgBox(0, "Error inserting data to Table", "Error: "& @error & @CR & "Error string: " & _EzMySql_ErrMsg())
Exit
EndIf
Next
EndFunc ;==>mysql

natürlich wieder ungetestet,

mfg (Auto)Bert

Zitat von Kev

Sprich der soll oben anfangen und runter bis zum letzten Eintrag, die anzahl ist unbekannt.
am besten irgendwie in nem Array mit ner Forschleife.

Zitat von Kev

habs so gelößt

[autoit]

func read()
$lesen = _GUICtrlListBox_GetCount($list)
for $i = 0 To $lesen -1
$ergebnis = _GUICtrlListBox_GetText($list, $i)
Next
Endfunc

[/autoit]

Alles anzeigen

müsste es dann nicht so sein:

func read()
$lesen = _GUICtrlListBox_GetCount($list)
Dim $ergebnis[$lesen)
for $i = 0 To $lesen -1
$ergebnis[$i] = _GUICtrlListBox_GetText($list, $i)
Next
_arrayDisplay($ergebnis)
Endfunc

edit: komplettes Beispiel-Skript (Button Info klicken):

dazu wird noch Flaggen.zip benötigt, die in @Scriptdir\flaggen entpackt werden müssen

mfg (Auto)Bert

Zitat von name22

[autoit]

$fileread1 = FileOpen(@Scriptdir&"\cache\1.txt",0)
$fileread2 = FileOpen(@Scriptdir&"\cache\2.txt",0)
$fileread3 = FileOpen(@Scriptdir&"\cache\3.txt",0)
$fileread4 = FileOpen(@Scriptdir&"\cache\4.txt",0)
GUICtrlSetData($input1,FileRead(@Scriptdir&"\cache\1.txt"))
GUICtrlSetData($input2,FileRead(@Scriptdir&"\cache\2.txt"))
GUICtrlSetData($input3,FileRead(@Scriptdir&"\cache\3.txt"))
GUICtrlSetData($input4,FileRead(@Scriptdir&"\cache\4.txt"))

[/autoit]

Alles anzeigen

wie du siehst kann man auch bei zitiertem Quellcode durch manuelles nacharbeiten eine vernünftige Formatierung erreichen, sei also bitte in Zukunft so nett und füge die AutoIt-Tags ein.

Zitat von AutoBert (Zwischenablage in ini schreiben und extrahieren)

da du ModernMenuRaw includest, was ich nicht habe kann ich es aber nicht testen. Nimm doch die normalen Tray-Funktionen,

vielleicht ist ja ModernMenuRaw daran schuld?

PS.: es soll Leute geben, die auf lieblose Post's nicht antworten. Pushen und erst recht aus anderen Threads heraus, wird nicht so gerne gesehen

mfg (Auto)Bert

Zitat von jangxx (RAM Problem)

Ich bin so gut wie ferting mit meinem ClipBoardEXtender, der bewirkt das man mehrere Textfragmente im clipboardverwalten kann.

Dann hat sich ja diese Problem gelöst. Dann solltest du die Lösung auch posten, damit andere die einmal das gleiche Problem haben die Lösung auch finden. Danach setze den Präfix bitte auf gelöst,

danke (Auto)Bert

Zitat von ugt100

und jetzt zu dem problem:
wird das compilierte script aber über den win7 taskscheduler ausgeführt klappt das schreiben der protokoll einträge nicht.

wird mit einer Fehlermeldung abgebrochen (die Daten sind auch nicht gesichert)? Wenn nein vermute ich, dass deine Logdatei nicht dort erstellt wird wo du sie erwartest. Verwende absolute Pfade und es sollte auch bei einem Aufruf über den Schedler klappen,

mfg (Auto)Bert

Hallo kev,

schau dir die beiden Befehle in der Hilfe an,

#Include <GuiListBox.au3>
_GUICtrlListBox_GetCount($hWnd) ;gibt die Anzahl der Einträge zurück
_GUICtrlListBox_GetText($hWnd, $iIndex) ;gibt den Text des mit $iIndex gewählten Eintrags zurück

Edit: Schnitzel GUICtrlGetHandle ist nicht notwendig (siehe die Beispiele in der Hilfe, da werden es auch nicht verwendet)

mfg (Auto)Bert

Zitat von EpicWorld

Könnt ihr mir nochmal den kompletten funktionierenden script schreiben

Mein Skript funktioniert, im Board gibt es auch weitere funktrionierende Lösungen

Zitat von AutoBert

Ansonsten muss ich Schnitzel

Zitat von »Schnitzel«
ja also.Und das geht ja nicht anders als ne ganz normale web.de Mail zu versenden.Dazu gibts ja schon 100 threads...

recht geben. Wir sind hier kein Machmal-Forum, benutze einfach die SUchFUnktion des Boards.

Poste also erst einmal dein Skript, damit man sieht welche der 3. genannten Möglichkeiten du genommen hast und wie du es umgesetzt hast,

mfg (Auto)Bert

Zitat von EpicWorld

Achtung dieser Script darf nicht kopiert werden!!!

haben dass alle Helfer überlesen

mfg (Auto)Bert

Zitat von EpicWorld

dankee, aber da sieht man auch wieder das eine eemail gesendet wurde, das will ich ja nicht und das ist ja bei einem kontakt formular auch nicht so,
naja ich schau mich mal um

Zitat von AutoBert

[autoit]

$Response = _INetSmtpMail($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body, @ComputerName, -1, True)
; wobei der Parameter true weggelassen werden kann, dann erscheint aber nicht das Trace-Fenster das man zur Fehleranalyse benutzen kann

[/autoit]

Nein, du musst nur den Parameter true weglassen

Zitat von Ineluki

Ich finde die UDF _INetSmtpMailCom ganz gut

die ist auch besser, dann muss er aber eine Möglichkeit zur Konfiguration proggen, da nicht jeder (Free-)Mailer den Standardport 25 benutzt,

mfg (Auto)Bert