Beiträge von BugFix

Du hast doch ein Standard-Treeview-Control. Dann kannst du es doch mit der Treeview-UDF bedienen.
Hol dir das Handle des Treeview, mit _GUICtrlTreeView_GetSelection($hWnd) erhältst du das Handle des Item und kannst dann dieses für weitere Funktionen nutzen (z.B. ..._GetText).

Ich hab mal eine Lösung inkl. Verschleierungsfunktion erstellt. Habe ich per PN geschickt. Schließlich sollen deine User nicht Gelegenheit haben, hier nachzulesen, wie sie die Prüfung hintergehen können.

Zitat von NewAnime

Okay habs, musste nur die Variable am Ende durch $GUI ersetzen.

Nein, das ist falsch. $ES_Center ist ein Style für das Label. Da muß nur das entsprechende Include eingebunden werden.

Ich habs dir mal auf die Schnelle gebastelt. Aber wenn du selbst mit Grundlagen-GUI Probleme hast, sehe ich schwarz für ein Spiel.

Na klar. Brauchst doch nur die Konsolenausgabe in einer GUI ausgeben. Das zufällige Zusammenstellen muß doch nicht erst im Moment der GUI-Ausgabe erfolgen, das erledigst du vorher. Und dann zeigst du nur einen nach dem anderen in der zufälligen Folge in der GUI an.

Guckst du:

Global $aTeams[10] = ['Team A', 'Team B', 'Team C', 'Team D', 'Team E', 'Team F', 'Team G', 'Team H', 'Team I', 'Team J']

$aRandomIndex = _GetRandomOrder()
For $i = 0 To UBound($aRandomIndex) -1
ConsoleWrite($aTeams[$aRandomIndex[$i]] & @CRLF)
Next

Func _GetRandomOrder() ; == erstellt ein Array mit Index 0 bis 9 in zufälliger Reihenfolge
Local $sOrder = '', $tmpRandom, $iCount = 0
Do
$tmpRandom = Random(0,9,1)
If Not StringInStr($sOrder, $tmpRandom) Then
$iCount += 1
$sOrder &= $tmpRandom & ' '
EndIf
Until $iCount = 10
Return StringSplit(StringTrimRight($sOrder,1), ' ', 2)
EndFunc

Zitat von NewAnime

also sobald ich das Programm öffne, werden die ganzen Paarungen angezeigt.

Das erste Ergebnis-Array zeigt dir alle Paarungen für alle Spieltage. Jeder spielt einmal gegen jeden. Dazu sind eine von der Gesamtzahl der Mannschaften abhängige Spieltage erforderlich. Deshalb auch die Anzeige: Spieltag | Paarung

Zitat von NewAnime

Wenn ich es schkließe öffnet sich ein weiteres Fenster was mit von Team F alle Heimspiele anzeigt

Das ist nur ein Bsp.-Aufruf. Das kannst du für jede Mannschaft aufrufen. Denn sicher ist es in deinem Game erforderlich, dass du weißt, welchen Gegner an welchem Spieltag deine Mannschaft hat.

Zitat von NewAnime

Beim erneuten schließen bekomme ich alle Spiele vom Spieltag 2 angezeigt.

Wiederum ein Bsp.-Aufruf. Diese Funktion ermöglicht dir alle Paarungen an einem bestimmten Spieltag abzurufen.

Zitat von NewAnime

Was mir aber auffällt ist, dass er nicht die Paarungen jedes mal neu auslost, sondern immer das selbe angezeigt wird.

Zitat von NewAnime

Also das die Paarungen jedesmal neu gemischt werden. Ansonsten weiß man ja jede Saison schon das der erste Spieltag Team A gg Team J antreten muss.

Das wäre ja katastrophal, wenn die Paarungen neu gemischt werden, obwohl der Ligaplan nicht ausgespielt wurde!
Am ersten Spieltag stehen alle Paarungen für die gesamte Saison fest. Da ändert sich bis Saisonende nichts mehr dran.
Für eine neue Saison kannst du dann ja die Mannschaften im Array zufällig umsortieren und dann einen neuen Spielplan generieren.
Das Skriptbsp. von mir ist übrigens, wie du vielleicht bemerkt hast, nur eine Halbsaison. Dieselben Paarungen (nur Heim/Auswärts wechselnd) hast du natürlich dann in der Rückrunde. Überleg dir einfach einen sinnvollen Algorithmus um diese Umverteilung vorzunehmen.
Ich habe auch nicht integriert, dass eine Mannschaft abwechselnd Heim und Auswärts spielt. Das solltest du natürlich in die Funktion _CreatePairs() mit einfließen lassen. Etwas Arbeit soll ja auch für dich bleiben.
Ich wollte dir nur den rechnerischen Anstoß geben, wie man die Kombinationen für beliebig viele (geradzahlige) Mannschaften bilden kann.

Deklariere die Variablen in der Funktion als

Local Static $Variable

Sie wird beim ersten Aufruf initialisiert (falls du einen Startwert zuweist, mit diesem) und behält auch nach Funktionsende den aktuellen Wert. Mit diesem wird dann beim nächsten Funktionsaufruf fortgesetzt.

Suchwort"Hotkey Skript"

[Beispiel] - Benutzer einen beliebigen Hotkey auswählen lassen

Benutze mal die Forensuche, dazu wurden schon mehrere Lösungen gepostet.

Fein, ist gebookmarked.

Na dann wollen wir dir mal helfen

Edit: Ich habe es noch mal überarbeitet und etwas "professionalisiert"
Ich gehe mal von aus, dass immer eine geradzahlige Anzahl an Mannschaften vorhanden ist.

Edit2: Ich habe mal noch 2 Funktionen zum Ermitteln der Spiele eines Teams (Hin- und/oder Rückspiele) bzw. der Paarungen eines bestimmten Spieltages hinzugefügt.

Zitat von Thomas55

In den Zeilen 25-28 dreht sich ja alles nur im Kreis, müßte da nicht etwas rein wie "DoEvents" aus VBA ?

Das wird mit: Opt("GUIOnEventMode", 1) erledigt.

Verwende einfach die GuiMsg $GUI_EVENT_SECONDARYUP / $GUI_EVENT_SECONDARYDOWN und frage dann das Control mit GUIGetCursorInfo() ab.

Ich würde mit EN_FOCUS arbeiten.
- Fokus aktiv: Starte Überwachung
- solange Fokus: nichts ändern
- wenn Fokus nicht mehr aktiv: Änderungen auswerten

Danke, damit komme ich schonmal weiter.

Ich habe jetzt angefangen mir eine API-Bibliothek für Lua zu erstellen.
Aber folgende Funktion bleibt erfolglos. Siehst du einen Fehler? Ich habe zwei Varianten probiert:

local alien = require "alien"


fAPI = {}


fAPI.CreateDirectory = function(_sPath)
	local SECURITY_ATTRIBUTES = alien.defstruct {
	  {'nLength',              'int'},
	  {'lpSecurityDescriptor', 'int'},
	  {'bInheritHandle',       'int'}
	}
	local CreateDirectory = assert(alien.kernel32.CreateDirectoryA)
	CreateDirectory:types{ret = 'int', abi = 'stdcall', 'string', 'pointer'}
	local security = SECURITY_ATTRIBUTES:new()
	local ret = CreateDirectory(_sPath..string.char(0), security())
	return ret, security
end

und:

fAPI.CreateDirectory = function(_sPath)
	local PATH_NAME = alien.defstruct {
	  {'lpPathName', 'string'}
	}
	local SECURITY_ATTRIBUTES = alien.defstruct {
	  {'nLength',              'int'},
	  {'lpSecurityDescriptor', 'int'},
	  {'bInheritHandle',       'int'}
	}
	local CreateDirectory = assert(alien.kernel32.CreateDirectoryA)
	CreateDirectory:types{ret = 'int', abi = 'stdcall', 'pointer', 'pointer'}
	local path = PATH_NAME:new()
	path.lpPathName = _sPath..string.char(0)
	local security = SECURITY_ATTRIBUTES:new()
	local ret = CreateDirectory(path(), security())
	return ret, security
end

Als erstes noch ein Hinweis zur Installation:
In der SciTEStartup.lua ist noch der Eintrag:
LoadLuaFile("alien.lua")
erforderlich.

Ich habe jetzt mal ein wenig damit gespielt, komme aber nicht zum Erfolg.
Hier ein Bsp.

local alien = require "alien"


-- Struktur erstellen
local POINTAPI = alien.defstruct {
      { 'X', 'int'},
      { 'Y', 'int'}
    }


-- Struktur anzeigen
for key,val in pairs(POINTAPI) do
	if type(val) == 'table' then
		for key1,val1 in pairs(val) do
			print(key,key1,val1)
		end
	else
		print(key,val)
	end
end
--[[      Output:
new	function: 02DBF560
offsets	Y	4
offsets	X	0
byval	function: 02A3B710
size	8
types	Y	int
types	X	int
names	1	X
names	2	Y
]]


-- Dll-Aufruf erstellen
local GetCursorPos = assert(alien.user32.GetCursorPos)
    GetCursorPos:types{ret = 'int', abi = 'stdcall', "pointer"}


--~ Zuerst habe ich versucht, ähnlich wie in deinem Bsp., die Funktion "new" anzuwenden.
local pos = POINTAPI:new()          -- ergibt aber nur ein leeres Table?


--~ Das habe ich dann als Parameter für die Funktion verwendet.
local ret = GetCursorPos(pos)
print('Erfolg: '..tostring(ret))    -- Return ist = "0" --> also kein Erfolg


--~ Ich habe nun die Struktur als Parameter übergeben:
local ret = GetCursorPos(POINTAPI)
print('Erfolg: '..tostring(ret))    -- Return ist = "0" --> also auch kein Erfolg


--~ Falls der Aufruf erfolgreich ist (und was muß ich dazu tun) - wie komme ich dann an die Daten?
--~ Ist dafür die Funktion "byval" zuständig? Mit welchen Parametern muß ich sie dann aufrufen

Neue Version v0.9
- Jetzt mit Tipps zu im Skript erstellten Funktionen.

$var: Er wollte ein 2D-Array für die Treffer

Ich hab dir mal eine recht flexible Lösung erstellt. Aber die Container müssen, nach deiner Vorgabe, immer '<div class="verbox">' heißen. Die Tags in den Containern müssen logischerweise auch identisch sein.
Was flexibel ist:
- es wird sowohl @CR als auch @CRLF als Zeilenumbruch erkannt
- der Einzug kann TAB und/oder Leerzeichen enthalten
- die Stringmarkierung erfasst einfache und doppelte Anführungszeichen

Als Ergebnis erhältst du ein Array mit einer Zeile für jeden Container.

Ein bischen splitten, zählen und zusammenfügen

$Pfad = "E:\Musik_Dateien\Karl\Udo_Lindenberg_Unplugged_(Live_Aus_Dem_Hotel_Atlantic)\104 Gegen die Stroemung (feat. Jennifer weist of Jennifer Rostock)\WavFiles\1.wav"
$AusgabeText = _SplittPfad ( $Pfad , 35)
ConsoleWrite($AusgabeText & @crlf)

Func _SplittPfad($_sPath, $_iLen)
Local $aSplit = StringSplit($_sPath, '\'), $sOut = '', $sTmp = ''
For $i = 1 To $aSplit[0]
Switch $i
Case 1
$sTmp = $aSplit[$i] & '\'
Case $aSplit[0]
If (StringLen($sTmp) + StringLen($aSplit[$i])) >= $_iLen Then
$sOut &= $sTmp & @CRLF & $aSplit[$i] & @CRLF
Else
$sOut &= $sTmp & $aSplit[$i] & @CRLF
EndIf
Case Else
If (StringLen($sTmp) + StringLen($aSplit[$i]) +1) >= $_iLen Then
$sOut &= $sTmp & @CRLF
$sTmp = $aSplit[$i] & '\'
Else
$sTmp &= $aSplit[$i] & '\'
EndIf
EndSwitch
Next
Return $sOut
EndFunc