Beiträge von UEZ

**UEZ** · Check Ping Status v1.05 Build 2014-09-19 Beta **UEZ** 20. Mai 2011 um 23:44

Danke für dein Feedback!

In die Hosts Datei will ich eigentlich keine Informationen eintragen, denn wo für habe ich den DNS?

Wer will, kann es gerne eintragen, muss es aber selbst warten, wenn sich mal was ändern sollte.

Gruß,
UEZ

**UEZ** · Check Ping Status v1.05 Build 2014-09-19 Beta.7z

Hier ein kleines Tool zum Pingen von Massen Hostnamen / IP Adressen.

Einfach eine Textdatei mit Hostname und/oder IP Adressen anlegen und in das Tool laden.

Die Textdatei kann z.B so aussehen:

Code

autoit.de
87.106.181.57

Oder manuell ein Class C Subnet anlegen (rMt -> Add IP subnet manually), das man anpingen möchte!

Wenn ein DNS zur Verfügung steht, dann kann man noch die IP in den Hostnamen bzw. den Hostname in eine IP auflösen lassen (langsam)!

Tracert / Telnet Ausführung mit rMt auf Host/IP möglich.

Screenshot:

Source Code:

Spoiler anzeigen

Code ist wieder mal zu lang für die Code Box

Download: Check Ping Status v1.05 Build 2014-09-19 Beta.7z

Vielleicht ist das kleine Tool für jemanden nützlich.

Gruß,
UEZ

Changelog:
2011-05-27: man kann jetzt die Hintergrundfarbe der GUI ändern und eine Datei aussuchen, die standardmäßig geladen wird. Die Einstellungen werden in einer Ini Datei im Skript Verzeichnis gespeichert.
2011-06-15: im Settings Menü kann man jetzt Farben manuell hinzufügen bzw. löschen
2011-10-19: ein Bug noch beseitigt, wenn man in eine leere Liste manuell IP Adressen hinzufügt und Namensauflösung beschleunigt
2011-10-20: noch'n Bug beseitigt und Export nach CSV hinzugefügt
2011-10-21: kleine Änderungen in der PingIt() Funktion
2011-11-23: einige Bugs entfernt plus einige Kleinigkeiten hinzugefügt (Slider, Sound)
2011-11-27: Bug beim Laden einer Datei (falscher RegEx Ausdruck). Danke an wakillon für den Bug Bericht!
2012-02-29: noch'n Bug gefunden -> Namensauflösungscode war buggy
2012-05-11: restliche @LF durch @CRLF ersetzt und "Export to Clipboard" hinzugefügt. Standard Delimiter ist nun TAB
2012-05-21: kleine Modifikationen
2012-07-02: Namensauflösung funktioniert auch, wenn der Host nicht anpingbar ist
2012-07-18: einige kleine Bugs beseitigt und USkin hinzugefügt (danke JScript für die USkinUDF)
2013-02-10: Tracert und Telnet Funktionen hinzugefügt (rMt im ListView Feld)
2013-02-29: Name zu Check Ping Status geändert, da man mit Ping nicht den Online Status immer bekommt
2014-09-19: Code Anpassung an 3.3.12.0+ und kleine Geschwindigkeitssteigerung bei der Namensauflösung von nicht pingbaren Hosts

**UEZ**

Hier noch meine simple Version:

Spoiler anzeigen

[autoit]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

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

Global Const $hGUI = GUICreate("Simple Countdown by UEZ 2011", 833, 179)
GUISetBkColor(0xA6CAF0)
Global Const $idInputStd = GUICtrlCreateInput("0", 8, 8, 209, 159, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_READONLY,$ES_NUMBER))
GUICtrlSetFont(-1, 100, 400, 0, "Times New Roman")
Global Const $idUpdownStd = GUICtrlCreateUpdown($idInputStd)
GUICtrlSetLimit(-1, 999, 0)
Global Const $idLableDP1 = GUICtrlCreateLabel(":", 226, 8, 41, 155)
GUICtrlSetFont(-1, 100, 400, 0, "Times New Roman")
Global Const $idInputMin = GUICtrlCreateInput("1", 277, 8, 153, 159, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_READONLY,$ES_NUMBER))
GUICtrlSetFont(-1, 100, 400, 0, "Times New Roman")
Global Const $idUpdownMin = GUICtrlCreateUpdown($idInputMin)
GUICtrlSetLimit(-1, 59, 0)
Global Const $idLableDP2 = GUICtrlCreateLabel(":", 440, 8, 41, 155)
GUICtrlSetFont(-1, 100, 400, 0, "Times New Roman")
Global Const $idInputSek = GUICtrlCreateInput("0", 489, 8, 153, 159, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_READONLY,$ES_NUMBER))
GUICtrlSetFont(-1, 100, 400, 0, "Times New Roman")
Global Const $idUpdownSek = GUICtrlCreateUpdown($idInputSek)
GUICtrlSetLimit(-1, 59, 0)
Global Const $idButtonStart = GUICtrlCreateButton("Start", 672, 8, 147, 113)
GUICtrlSetFont(-1, 50, 400, 0, "Times New Roman")
Global Const $idButtonStop = GUICtrlCreateButton("Stop", 672, 136, 147, 33)
GUICtrlSetFont(-1, 16, 400, 0, "Times New Roman")
GUICtrlSetState(-1, $GUI_DISABLE)
GUISetState(@SW_SHOW)
ControlFocus("", "", $idButtonStart)

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

Global $nMsg, $seconds

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idButtonStart
$seconds = GUICtrlRead($idInputStd) * 60^2 + GUICtrlRead($idInputMin) * 60 + GUICtrlRead($idInputSek) - 1
If $seconds > 0 Then
GUICtrlSetState($idButtonStart, $GUI_DISABLE)
GUICtrlSetState($idUpdownStd, $GUI_DISABLE)
GUICtrlSetState($idUpdownMin, $GUI_DISABLE)
GUICtrlSetState($idUpdownSek, $GUI_DISABLE)
GUICtrlSetState($idButtonStop, $GUI_ENABLE)
AdlibRegister("Countdown", 1000)
EndIf
Case $idButtonStop
AdlibUnRegister("Countdown")
GUICtrlSetState($idButtonStart, $GUI_ENABLE)
GUICtrlSetState($idUpdownStd, $GUI_ENABLE)
GUICtrlSetState($idUpdownMin, $GUI_ENABLE)
GUICtrlSetState($idUpdownSek, $GUI_ENABLE)
GUICtrlSetState($idButtonStop, $GUI_DISABLE)
EndSwitch
WEnd

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

Func Countdown()
Local $sec, $min, $hr
$sec = Mod($seconds, 60)
$min = Mod($seconds / 60, 60)
$hr = Floor($seconds / 60 ^ 2)
GUICtrlSetData($idInputStd, StringFormat("%01i", $hr))
GUICtrlSetData($idInputMin, StringFormat("%01i", $min))
GUICtrlSetData($idInputSek, StringFormat("%01i", $sec))
If $seconds <= 0 Then
AdlibUnRegister("Countdown")
MsgBox(0, "Information", "Countdown reached 00:00:00")
Exit
EndIf
$seconds -= 1
EndFunc

[/autoit]

Gruß,
UEZ

**UEZ**

Schaue mal hier: http://www.autoitscript.com/forum/topic/71…post__p__873391

Gruß,
UEZ

**UEZ**

Schaue dir mal Natural Order String Comparison an - sollte dir auch weiter helfen.

Gruß,
UEZ

**UEZ**

Probiere es mal damit:

Spoiler anzeigen

[autoit]

#include <Date.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
local $vo = 1

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

AdlibRegister("tick", 1000)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("by Moosi", 150, 300, 300, 300, BitOR($WS_MINIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPWINDOW,$WS_GROUP,$WS_BORDER,$WS_CLIPSIBLINGS))
GUISetBkColor(0xededed)
$MenuItem2 = GUICtrlCreateMenu("Menu1")
$MenuItem3 = GUICtrlCreateMenuItem("MenuItem3", $MenuItem2)
$MenuItem1 = GUICtrlCreateMenu("Menu2")
$MenuItem4 = GUICtrlCreateMenuItem("Menu2", $MenuItem1)
$voel = GUICtrlCreateButton("Vö", 10, 10, 30, 20, $WS_GROUP)
$voel1 = GUICtrlCreateLabel($vo, 70, 10, 40, 20, $SS_CENTER, $WS_EX_CLIENTEDGE)
GUICtrlSetColor(-1, 0x000000)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$clock = GUICtrlCreateLabel("Uhrzeit", 10, 230, 130, 17, $SS_CENTER, $WS_EX_CLIENTEDGE)
GUICtrlSetColor(-1, 0x000000)
GUICtrlSetBkColor(-1, 0xFFFFFF)

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

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

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $voel ;<<<<<<<<
voel() ;<<<<<<<<
EndSwitch
WEnd

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

Func voel()
$vo = $vo+1
GUICtrlSetData($voel1, $vo) ;<<<<<<<<
EndFunc

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

Func tick()
GUICtrlSetData($clock, _NowTime())
EndFunc

[/autoit]

Die Zeilen ;<<<<<<<< habe ich eingefügt.

Gruß,
UEZ

**UEZ**

Leider bringt das nicht viel

Hier mal mit allen anderen Variablen:

Spoiler anzeigen

[autoit]

#include <Array.au3>
#Include <WinAPIEx.au3>

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

Global $a[168] = [ _
"$LOCALE_ALL", _
"$LOCALE_ALLOW_NEUTRAL", _
"$LOCALE_ALLOW_NEUTRAL_NAMES", _
"$LOCALE_ALTERNATE_SORTS", _
"$LOCALE_CUSTOM_DEFAULT", _
"$LOCALE_CUSTOM_UI_DEFAULT", _
"$LOCALE_CUSTOM_UNSPECIFIED", _
"$LOCALE_FONTSIGNATURE", _
"$LOCALE_ICALENDARTYPE", _
"$LOCALE_ICENTURY", _
"$LOCALE_ICOUNTRY", _
"$LOCALE_ICURRDIGITS", _
"$LOCALE_ICURRENCY", _
"$LOCALE_IDATE", _
"$LOCALE_IDAYLZERO", _
"$LOCALE_IDEFAULTANSICODEPAGE", _
"$LOCALE_IDEFAULTCODEPAGE", _
"$LOCALE_IDEFAULTCOUNTRY", _
"$LOCALE_IDEFAULTEBCDICCODEPAGE", _
"$LOCALE_IDEFAULTLANGUAGE", _
"$LOCALE_IDEFAULTMACCODEPAGE", _
"$LOCALE_IDIGITS", _
"$LOCALE_IDIGITSUBSTITUTION", _
"$LOCALE_IFIRSTDAYOFWEEK", _
"$LOCALE_IFIRSTWEEKOFYEAR", _
"$LOCALE_IGEOID", _
"$LOCALE_IINTLCURRDIGITS", _
"$LOCALE_ILANGUAGE", _
"$LOCALE_ILDATE", _
"$LOCALE_ILZERO", _
"$LOCALE_IMEASURE", _
"$LOCALE_IMONLZERO", _
"$LOCALE_INEGATIVEPERCENT", _
"$LOCALE_INEGCURR", _
"$LOCALE_INEGNUMBER", _
"$LOCALE_INEGSEPBYSPACE", _
"$LOCALE_INEGSIGNPOSN", _
"$LOCALE_INEGSYMPRECEDES", _
"$LOCALE_INEUTRAL", _
"$LOCALE_INVARIANT", _
"$LOCALE_IOPTIONALCALENDAR", _
"$LOCALE_IPAPERSIZE", _
"$LOCALE_IPOSITIVEPERCENT", _
"$LOCALE_IPOSSEPBYSPACE", _
"$LOCALE_IPOSSIGNPOSN", _
"$LOCALE_IPOSSYMPRECEDES", _
"$LOCALE_IREADINGLAYOUT", _
"$LOCALE_ITIME", _
"$LOCALE_ITIMEMARKPOSN", _
"$LOCALE_ITLZERO", _
"$LOCALE_NAME_INVARIANT", _
"$LOCALE_NAME_MAX_LENGTH", _
"$LOCALE_NAME_SYSTEM_DEFAULT", _
"$LOCALE_NAME_USER_DEFAULT", _
"$LOCALE_NEUTRAL", _
"$LOCALE_NEUTRALDATA", _
"$LOCALE_NOUSEROVERRIDE", _
"$LOCALE_REPLACEMENT", _
"$LOCALE_RETURN_GENITIVE_NAMES", _
"$LOCALE_RETURN_NUMBER", _
"$LOCALE_S1159", _
"$LOCALE_S2359", _
"$LOCALE_SABBREVCTRYNAME", _
"$LOCALE_SABBREVDAYNAME1", _
"$LOCALE_SABBREVDAYNAME2", _
"$LOCALE_SABBREVDAYNAME3", _
"$LOCALE_SABBREVDAYNAME4", _
"$LOCALE_SABBREVDAYNAME5", _
"$LOCALE_SABBREVDAYNAME6", _
"$LOCALE_SABBREVDAYNAME7", _
"$LOCALE_SABBREVLANGNAME", _
"$LOCALE_SABBREVMONTHNAME1", _
"$LOCALE_SABBREVMONTHNAME2", _
"$LOCALE_SABBREVMONTHNAME3", _
"$LOCALE_SABBREVMONTHNAME4", _
"$LOCALE_SABBREVMONTHNAME5", _
"$LOCALE_SABBREVMONTHNAME6", _
"$LOCALE_SABBREVMONTHNAME7", _
"$LOCALE_SABBREVMONTHNAME8", _
"$LOCALE_SABBREVMONTHNAME9", _
"$LOCALE_SABBREVMONTHNAME10", _
"$LOCALE_SABBREVMONTHNAME11", _
"$LOCALE_SABBREVMONTHNAME12", _
"$LOCALE_SABBREVMONTHNAME13", _
"$LOCALE_SCONSOLEFALLBACKNAME", _
"$LOCALE_SCOUNTRY", _
"$LOCALE_SCURRENCY", _
"$LOCALE_SDATE", _
"$LOCALE_SDAYNAME1", _
"$LOCALE_SDAYNAME2", _
"$LOCALE_SDAYNAME3", _
"$LOCALE_SDAYNAME4", _
"$LOCALE_SDAYNAME5", _
"$LOCALE_SDAYNAME6", _
"$LOCALE_SDAYNAME7", _
"$LOCALE_SDECIMAL", _
"$LOCALE_SDURATION", _
"$LOCALE_SENGCOUNTRY", _
"$LOCALE_SENGCURRNAME", _
"$LOCALE_SENGLANGUAGE", _
"$LOCALE_SENGLISHCOUNTRYNAME", _
"$LOCALE_SENGLISHDISPLAYNAME", _
"$LOCALE_SENGLISHLANGUAGENAME", _
"$LOCALE_SGROUPING", _
"$LOCALE_SIETFLANGUAGE", _
"$LOCALE_SINTLSYMBOL", _
"$LOCALE_SISO3166CTRYNAME", _
"$LOCALE_SISO3166CTRYNAME2", _
"$LOCALE_SISO639LANGNAME", _
"$LOCALE_SISO639LANGNAME2", _
"$LOCALE_SKEYBOARDSTOINSTALL", _
"$LOCALE_SLANGDISPLAYNAME", _
"$LOCALE_SLANGUAGE", _
"$LOCALE_SLIST", _
"$LOCALE_SLOCALIZEDCOUNTRYNAME", _
"$LOCALE_SLOCALIZEDDISPLAYNAME", _
"$LOCALE_SLOCALIZEDLANGUAGENAME", _
"$LOCALE_SLONGDATE", _
"$LOCALE_SMONDECIMALSEP", _
"$LOCALE_SMONGROUPING", _
"$LOCALE_SMONTHOUSANDSEP", _
"$LOCALE_SMONTHDAY", _
"$LOCALE_SMONTHNAME1", _
"$LOCALE_SMONTHNAME2", _
"$LOCALE_SMONTHNAME3", _
"$LOCALE_SMONTHNAME4", _
"$LOCALE_SMONTHNAME5", _
"$LOCALE_SMONTHNAME6", _
"$LOCALE_SMONTHNAME7", _
"$LOCALE_SMONTHNAME8", _
"$LOCALE_SMONTHNAME9", _
"$LOCALE_SMONTHNAME10", _
"$LOCALE_SMONTHNAME11", _
"$LOCALE_SMONTHNAME12", _
"$LOCALE_SMONTHNAME13", _
"$LOCALE_SNAME", _
"$LOCALE_SNAN", _
"$LOCALE_SNATIVECOUNTRYNAME", _
"$LOCALE_SNATIVECTRYNAME", _
"$LOCALE_SNATIVECURRNAME", _
"$LOCALE_SNATIVEDIGITS", _
"$LOCALE_SNATIVEDISPLAYNAME", _
"$LOCALE_SNATIVELANGNAME", _
"$LOCALE_SNATIVELANGUAGENAME", _
"$LOCALE_SNEGATIVESIGN", _
"$LOCALE_SNEGINFINITY", _
"$LOCALE_SOPENTYPELANGUAGETAG", _
"$LOCALE_SORTNAME", _
"$LOCALE_SPARENT", _
"$LOCALE_SPECIFICDATA", _
"$LOCALE_SPERCENT", _
"$LOCALE_SPERMILLE", _
"$LOCALE_SPOSINFINITY", _
"$LOCALE_SPOSITIVESIGN", _
"$LOCALE_SSCRIPTS", _
"$LOCALE_SSHORTDATE", _
"$LOCALE_SSHORTESTDAYNAME", _
"$LOCALE_SSHORTTIME", _
"$LOCALE_SSORT_CONSTANTS", _
"$LOCALE_STHOUSAND", _
"$LOCALE_STIME", _
"$LOCALE_STIMEFORMAT", _
"$LOCALE_SUPPLEMENTAL", _
"$LOCALE_SYEARMONTH", _
"$LOCALE_SYSTEM_DEFAULT", _
"$LOCALE_USE_CP_ACP", _
"$LOCALE_USER_DEFAULT", _
"$LOCALE_WINDOWS"]

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

Global $ID = _WinAPI_GetUserDefaultLCID()
ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $ID = ' & $ID & @crlf & '>Error code: ' & @error & @crlf) ;### Debug Console

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

For $i = 0 To UBound($a) - 1
ConsoleWrite($a[$i] & ' => ' & @TAB & _WinAPI_GetLocaleInfo($ID, Execute($a[$i])) & @CR)
Next

[/autoit]

Gruß,
UEZ

**UEZ**

Klasse: V2.0 ist sehr gut geworden! GDI+ Circle & FixCircle Collision.au3 sieht auch klasse aus!

Gruß,
UEZ

**UEZ**

Kannst du gerne aufnehmen, aber irgendwie kommt mir das ziemlich umständlich vor.

Gibt es denn keine Build-in Funktion von Windows dazu?

Gruß,
UEZ

**UEZ**

Wie kann man am cleversten das Land (unter Address -> Country/region) für einen User in der AD eintragen, wenn ich nur das Land mitbekomme?

Dazu muss man 3 Attribute setzen ->

co für das Land
c für den Alpha-2 Code
countryCode für den Länder Code

Spoiler anzeigen

[autoit]

#include <Array.au3>

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

$aResult = GetCountryCodes("Germany")
_ArrayDisplay($aResult)

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

Func GetCountryCodes($country) ;Quelle: http://en.wikipedia.org/wiki/ISO_3166-1
#region Country Codes
Local $aCountries[248][3] = [ _
["Afghanistan", "AF", 4], _
["Åland Islands", "AX", 248], _
["Albania", "AL", 8], _
["Algeria", "DZ", 12], _
["American Samoa", "AS", 16], _
["Andorra", "AD", 20], _
["Angola", "AO", 24], _
["Anguilla", "AI", 660], _
["Antarctica", "AQ", 10], _
["Antigua and Barbuda", "AG", 28], _
["Argentina", "AR", 32], _
["Armenia", "AM", 51], _
["Aruba", "AW", 533], _
["Australia", "AU", 36], _
["Austria", "AT", 40], _
["Azerbaijan", "AZ", 31], _
["Bahamas", "BS", 44], _
["Bahrain", "BH", 48], _
["Bangladesh", "BD", 50], _
["Barbados", "BB", 52], _
["Belarus", "BY", 112], _
["Belgium", "BE", 56], _
["Belize", "BZ", 84], _
["Benin", "BJ", 204], _
["Bermuda", "BM", 60], _
["Bhutan", "BT", 64], _
["Bolivia", "BO", 68], _
["Bonaire, Saint Eustatius and Saba", "BQ", 535], _
["Bosnia and Herzegovina", "BA", 70], _
["Botswana", "BW", 72], _
["Bouvet Island", "BV", 74], _
["Brazil", "BR", 76], _
["British Indian Ocean Territory", "IO", 86], _
["Brunei Darussalam", "BN", 96], _
["Bulgaria", "BG", 100], _
["Burkina Faso", "BF", 854], _
["Burundi", "BI", 108], _
["Cambodia", "KH", 116], _
["Cameroon", "CM", 120], _
["Canada", "CA", 124], _
["Cape Verde", "CV", 132], _
["Cayman Islands", "KY", 136], _
["Central African Republic", "CF", 140], _
["Chad", "TD", 148], _
["Chile", "CL", 152], _
["China", "CN", 156], _
["Christmas Island", "CX", 162], _
["Cocos (Keeling) Islands", "CC", 166], _
["Colombia", "CO", 170], _
["Comoros", "KM", 174], _
["Congo", "CG", 178], _
["Congo (DRC)", "CD", 180], _
["Cook Islands", "CK", 184], _
["Costa Rica", "CR", 188], _
["Côte d'Ivoire", "CI", 384], _
["Croatia", "HR", 191], _
["Cuba", "CU", 192], _
["Curaçao", "CW", 531], _
["Cyprus", "CY", 196], _
["Czech Republic", "CZ", 203], _
["Denmark", "DK", 208], _
["Djibouti", "DJ", 262], _
["Dominica", "DM", 212], _
["Dominican Republic", "DO", 214], _
["Ecuador", "EC", 218], _
["Egypt", "EG", 818], _
["El Salvador", "SV", 222], _
["Equatorial Guinea", "GQ", 226], _
["Eritrea", "ER", 232], _
["Estonia", "EE", 233], _
["Ethiopia", "ET", 231], _
["Falkland Islands (Malvinas)", "FK", 238], _
["Faroe Islands", "FO", 234], _
["Fiji", "FJ", 242], _
["Finland", "FI", 246], _
["France", "FR", 250], _
["French Guiana", "GF", 254], _
["French Polynesia", "PF", 258], _
["French Southern Territories", "TF", 260], _
["Gabon", "GA", 266], _
["Gambia", "GM", 270], _
["Georgia", "GE", 268], _
["Germany", "DE", 276], _
["Ghana", "GH", 288], _
["Gibraltar", "GI", 292], _
["Greece", "GR", 300], _
["Greenland", "GL", 304], _
["Grenada", "GD", 308], _
["Guadeloupe", "GP", 312], _
["Guam", "GU", 316], _
["Guatemala", "GT", 320], _
["Guernsey", "GG", 831], _
["Guinea", "GN", 324], _
["Guinea-Bissau", "GW", 624], _
["Guyana", "GY", 328], _
["Haiti", "HT", 332], _
["Heard Island and McDonald Islands", "HM", 334], _
["Holy See (Vatican City State)", "VA", 336], _
["Honduras", "HN", 340], _
["Hong Kong", "HK", 344], _
["Hungary", "HU", 348], _
["Iceland", "IS", 352], _
["India", "IN", 356], _
["Indonesia", "ID", 360], _
["Iran", "IR", 364], _
["Iraq", "IQ", 368], _
["Ireland", "IE", 372], _
["Isle of Man", "IM", 833], _
["Israel", "IL", 376], _
["Italy", "IT", 380], _
["Jamaica", "JM", 388], _
["Japan", "JP", 392], _
["Jersey", "JE", 832], _
["Jordan", "JO", 400], _
["Kazakhstan", "KZ", 398], _
["Kenya", "KE", 404], _
["Kiribati", "KI", 296], _
["Korea (North)", "KP", 408], _
["Korea (South)", "KR", 410], _
["Kuwait", "KW", 414], _
["Kyrgyzstan", "KG", 417], _
["Lao People's Democratic Republic", "LA", 418], _
["Latvia", "LV", 428], _
["Lebanon", "LB", 422], _
["Lesotho", "LS", 426], _
["Liberia", "LR", 430], _
["Libyan Arab Jamahiriya", "LY", 434], _
["Liechtenstein", "LI", 438], _
["Lithuania", "LT", 440], _
["Luxembourg", "LU", 442], _
["Macao", "MO", 446], _
["Macedonia", "MK", 807], _
["Madagascar", "MG", 450], _
["Malawi", "MW", 454], _
["Malaysia", "MY", 458], _
["Maldives", "MV", 462], _
["Mali", "ML", 466], _
["Malta", "MT", 470], _
["Marshall Islands", "MH", 584], _
["Martinique", "MQ", 474], _
["Mauritania", "MR", 478], _
["Mauritius", "MU", 480], _
["Mayotte", "YT", 175], _
["Mexico", "MX", 484], _
["Micronesia", "FM", 583], _
["Moldova", "MD", 498], _
["Monaco", "MC", 492], _
["Mongolia", "MN", 496], _
["Montenegro", "ME", 499], _
["Montserrat", "MS", 500], _
["Morocco", "MA", 504], _
["Mozambique", "MZ", 508], _
["Myanmar", "MM", 104], _
["Namibia", "NA", 516], _
["Nauru", "NR", 520], _
["Nepal", "NP", 524], _
["Netherlands", "NL", 528], _
["New Caledonia", "NC", 540], _
["New Zealand", "NZ", 554], _
["Nicaragua", "NI", 558], _
["Niger", "NE", 562], _
["Nigeria", "NG", 566], _
["Niue", "NU", 570], _
["Norfolk Island", "NF", 574], _
["Northern Mariana Islands", "MP", 580], _
["Norway", "NO", 578], _
["Oman", "OM", 512], _
["Pakistan", "PK", 586], _
["Palau", "PW", 585], _
["Palestinian", "PS", 275], _
["Panama", "PA", 591], _
["Papua New Guinea", "PG", 598], _
["Paraguay", "PY", 600], _
["Peru", "PE", 604], _
["Philippines", "PH", 608], _
["Pitcairn", "PN", 612], _
["Poland", "PL", 616], _
["Portugal", "PT", 620], _
["Puerto Rico", "PR", 630], _
["Qatar", "QA", 634], _
["Réunion", "RE", 638], _
["Romania", "RO", 642], _
["Russian Federation", "RU", 643], _
["Rwanda", "RW", 646], _
["Saint Barthélemy", "BL", 652], _
["Saint Helena, Ascension and Tristan da Cunha", "SH", 654], _
["Saint Kitts and Nevis", "KN", 659], _
["Saint Lucia", "LC", 662], _
["Saint Martin (French part)", "MF", 663], _
["Saint Pierre and Miquelon", "PM", 666], _
["Saint Vincent and the Grenadines", "VC", 670], _
["Samoa", "WS", 882], _
["San Marino", "SM", 674], _
["Sao Tome and Principe", "ST", 678], _
["Saudi Arabia", "SA", 682], _
["Senegal", "SN", 686], _
["Serbia", "RS", 688], _
["Seychelles", "SC", 690], _
["Sierra Leone", "SL", 694], _
["Singapore", "SG", 702], _
["Sint Maarten (Dutch part)", "SX", 534], _
["Slovakia", "SK", 703], _
["Slovenia", "SI", 705], _
["Solomon Islands", "SB", 90], _
["Somalia", "SO", 706], _
["South Africa", "ZA", 710], _
["South Georgia and the South Sandwich Islands", "GS", 239], _
["Spain", "ES", 724], _
["Sri Lanka", "LK", 144], _
["Sudan", "SD", 736], _
["Suriname", "SR", 740], _
["Svalbard and Jan Mayen", "SJ", 744], _
["Swaziland", "SZ", 748], _
["Sweden", "SE", 752], _
["Switzerland", "CH", 756], _
["Syrian Arab Republic", "SY", 760], _
["Taiwan", "TW", 158], _
["Tajikistan", "TJ", 762], _
["Tanzania", "TZ", 834], _
["Thailand", "TH", 764], _
["Timor-Leste", "TL", 626], _
["Togo", "TG", 768], _
["Tokelau", "TK", 772], _
["Tonga", "TO", 776], _
["Trinidad and Tobago", "TT", 780], _
["Tunisia", "TN", 788], _
["Turkey", "TR", 792], _
["Turkmenistan", "TM", 795], _
["Turks and Caicos Islands", "TC", 796], _
["Tuvalu", "TV", 798], _
["Uganda", "UG", 800], _
["Ukraine", "UA", 804], _
["United Arab Emirates", "AE", 784], _
["United Kingdom", "GB", 826], _
["United States", "US", 840], _
["United States Minor Outlying Islands", "UM", 581], _
["Uruguay", "UY", 858], _
["Uzbekistan", "UZ", 860], _
["Vanuatu", "VU", 548], _
["Venezuela", "VE", 862], _
["Viet Nam", "VN", 704], _
["Virgin Islands, British", "VG", 92], _
["Virgin Islands, U.S.", "VI", 850], _
["Wallis and Futuna", "WF", 876], _
["Western Sahara", "EH", 732], _
["Yemen", "YE", 887], _
["Zambia", "ZM", 894], _
["Zimbabwe", "ZW", 716]]
#endregion
Local $index = _ArraySearch($aCountries, $country, 0, 0, 0, 0, 1, 0)
If @error Then Return SetError(1, 0, 0)
Local $aCodes[2] = [$aCountries[$index][1], $aCountries[$index][2]]
Return $aCodes
EndFunc

[/autoit]

Gruß,
UEZ

**UEZ**

SEuBo: wenn no vor def kommt, funzt dein Beispiel nicht!

Gruß,
UEZ

**UEZ**

Ich würde es so machen:

[autoit]

#include <Array.au3>
Dim $a[5] = ["gmx", "web", "hotmail", "googlemail", "yahoo"]
$1 = "xy@gmx.de"
$2 = StringRegExpReplace($1, "(.+@)(.+)(\..+)", "$2")
$s = _ArrayToString($a) & "|"
If StringInStr($s, $2) Then
MsgBox (0, "", "Der Mailserver " & $2 & " wurde gefunden!")
Else
MsgBox (0,"","Der Mailserver " & $2 & " wurde nicht gefunden!")
EndIf

[/autoit]

Gruß,
UEZ

**UEZ**

Vielleicht so:

[autoit]

$1 = "xy@gmx.de"
$2 = StringRegExpReplace($1, "(.+@)(.+)(\..+)", "$2")

[/autoit]

Gruß,
UEZ

**UEZ**

das wofür GDI+ (meine Meinung) wollte ich nur sagen, dass ich nicht versuchen werde, mit GDI+ anzufangen, sondern eher mit klassischen Beispielen, deswegen das wofür GDI+.

Ich finde es klasse, dass du es für GDI+ gemacht hast

Irgendwann fange ich auch mal damit an...

Gruß,
UEZ

**UEZ**

Das ging mir auch durch den Kopf, um überhaupt sich mit der OOP vertraut zu machen, aber wofür GDI+ (meine Meinung)?

Lieber DirectX, Direct2D o.ä. mit OOP überstetzen...

Ansonsten ein schönes Beispiel für OOP!

Gruß,
UEZ

**UEZ**

Probiere es mal damit:

Spoiler anzeigen

[autoit]

#include <GDIPlus.au3>
#include <GUIConstants.au3>
#Include <GuiButton.au3>
#Include <WindowsConstants.au3>

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

Global Const $STM_SETIMAGE = 0x0172
$hMainWindow = GUICreate("Test", 320, 256)
$Pic = GUICtrlCreatePic("", 0, 0)
GUICtrlSetState(-1, $GUI_DISABLE)

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

_GDIPlus_Startup ()
$image = _GDIPlus_ImageLoadFromFile("c:\Program Files (x86)\AutoIt3\Examples\GUI\Torus.png")
$hBmp = _GDIPlus_BitmapCreateHBITMAPFromBitmap($image)
GUICtrlSendMsg($Pic, $STM_SETIMAGE, 0, $hBmp)
_WinAPI_DeleteObject($hBmp)
_GDIPlus_ImageDispose($image)
_GDIPlus_Shutdown()
GUISetState()

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

While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
GUIDelete()
Exit
EndSelect
WEnd

[/autoit]

Du musst nur den Pfad zur Bilddatei entsprechend anpassen!

Gruß,
UEZ

**UEZ**

Zum Beispiel, wenn ich mit F5 in SciTE dein Skript starte, dann wird die Größe des SciTE Fensters verändert.

Ach ja, getestet auf Win7 x64.

Gruß,
UEZ

**UEZ**

Sehr schön schnell!

Drei Fehler tauchen bei mir auf:
1) Farbfilter: totaler Absturz -> !>21:55:58 AutoIT3.exe ended.rc:-1073741819
2) Das Fenster, wo ich dein Proggy starte, wird verändert
3) Extension -> Clear:
Bildbearbeitung.au3 (521) : ==> Expected a "=" operator in assignment statement.:
$info[$i-1]=FileReadLine($file)
$info^ ERROR
In welchem Format muss ich die Farbe eingeben?

Gruß,
UEZ

**UEZ**

Probiere doch mal AutoIt Windows Screenshooter, wobei du ein Doppeltklick mit der rechten Maustaste auf das entsprechende Fenster in der Listview links machst.

Sag' bitte mal bescheid, ob es funzt oder nicht.

Gruß,
UEZ

**UEZ**

UBound($aArray, 2) -1 sollte dir die Spalten zurück geben.

Gruß,
UEZ

Beiträge von UEZ

Check Ping Status v1.05 Build 2014-09-19 Beta

Check Ping Status v1.05 Build 2014-09-19 Beta

Ganz Simpler Countdown

Bilder im Script

_ArraySort() Probelm

Zählen über Button Click

Active Directory Funktionen - Neue Version 1.5.0.0 freigegeben!

GDI+ Kollision von Kreisen.

Active Directory Funktionen - Neue Version 1.5.0.0 freigegeben!

Active Directory Funktionen - Neue Version 1.5.0.0 freigegeben!

Aus txt Zeilen auslesen

Variable teilen?

Variable teilen?

OOPGDIP UDF - GDI+ mit Objekten

OOPGDIP UDF - GDI+ mit Objekten

Transparente Bilder einfach einfügen.

Bildbearbeitungseffekte / -filter

Bildbearbeitungseffekte / -filter

CaptureScreen funktioniert nicht

Array-Spalten