Beiträge von ytwinky

ytwinky

Hi th.meger,
eigentlich sollte diese positive Bewertung von Yahtzee-Mega schon gestern
hier stehen, aber das ging nicht, weil ich immer NOCH ein Spiel spielen mußte!
Damit ist das Suchtpotential deutlich höher, als das von Nikotin..
(Was bei Nikotin negativ ist, bedeutet für das Spiel, daß es Klasse ist..)
Mit Rücksicht auf eine mögliche Beteiligung des Spieles im GameContest, werde
ich hier keine Optimierungsvorschläge machen, um nicht in einen schwebenden
Prozeß einzugreifen :rofl2:
[Edit]
Du hättest vllt. deutlicher machen können, daß es NICHT reicht, den Quellcode zu downloaden..
..Modem-Benutzer(also auch ich) würden es dir danken, wenn du deine Dateien bei fileanchor.com(z.B.) lagern könntest..
Gruß
ytwinky

ytwinky

Okay, funzt solala..
..aber richtige Buttons sind das nicht..
Eine mögliche Bezeichnung wäre: Eingefärbter GUI-Bereich, der eine Aktion meldet..
Vielleicht gibt es ja Möglichkeiten?
Gruß
ytwinky

ytwinky

Hi,
das war ja eine tolle Überraschung! Ich habe für FreeScore extra Bildchen
gemacht, damit ich bunte Buttons habe..
Und dann lese ich, daß das ganz einfach geht. Den Tipp habe ich mir sofort
gezogen, damit ich es ausprobieren kann, wenn ich wieder zu Hause bin..
Dumm gelaufen, denn selbst in der neuesten Beta kann AutoIt KEINE bunten
Buttons erstellen(Wobei es mir mehr um die Buttonfarbe geht!)
In welcher Version funktioniert das denn nun ? :rofl2:
Gruß
ytwinky

ytwinky

Es gibt KEINE Möglichkeit ALLE Stellen von Pi darzustellen!
Die reine Rechenvorschrift sind Formeln, die die CPU nicht besonders fordern.
Gruß
ytwinky

ytwinky

Wenn du vergleichen willst, hier ist Pi auf 500 Stellen genau
(Berechnet mit Derive von texas instruments):
3.1415926535897932384626433832795028841971693993751058209749445923078164062862089986280348253421170679821480865132823066470938446095505822317253594081284811174502841027019385211055596446229489549303819644288109756659334461284756482337867831652712019091456485669234603486104543266482133936072602491412737245870066063155881748815209209628292540917153643678925903600113305305488204665213841469519415116094330572703657595919530921861173819326117931051185480744623799627495673518857527248912279381830119491
Gruß
ytwinky

ytwinky

Hi,
ich verstehe das Problem nicht:
$Pi=4*ATan(1) ;s. Hilfe
..genauer wird es nicht..
..vielleicht wird deine CPU ein wenig wärmer.
Sag doch mal, was hast du vor?
Gruß
ytwinky

ytwinky

Ich habe doch schon gesagt, das ich mich nicht zum Thema geäußert habe
Das mit GUISetState(@SW_HIDE, $Form1) habe ich jetzt auch probiert und es geht. Ich weiß aber noch nicht, ob und wofür ich das gebrauchen kann..
..jedenfalls weiß ich jetzt wie es geht..
Gruß
ytwinky

ytwinky

Ja, und ControlId ist der Handle..
.. und state ist der Status.
Wenn das in der o.G. Reihenfolge übergeben wird, dann klappts auch.
Jedenfalls funktioniert das so in der GetSidGUI..
GUICtrlSetState($zuversteckendesFenster, SW_HIDE)
[Edit]
Was ich gesagt habe, ist richtig..
..so richtig, daß ich stolz auf mich sein sollte..
..wenn's zum Thema gehört hätte :oops:
Gruß
ytwinky

ytwinky

Hi BugFix,
versuchs doch einfach mal so, wie's in der Hilfe beschrieben wird

Code

GUICtrlSetState ( controlID, state )

Gruß
ytwinky

ytwinky

Hi Tamor,
ich habe keine Ahnung, wieso es gestern nicht geklappt hat
Mit diesem AutoIt-Skript klappt es aber:

Spoiler anzeigen

C

#include <GUIConstants.au3>
#include <Ftp.au3>
#include <date.au3>
Global $DateiName
Dim $i=0
; == GUI generated with Koda ==
GUICreate("yFTP", 505, 654, 192, 125)
GUICtrlCreateLabel("ytwinky's FTP-Transfer", 72, 0, 330, 41)
GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x000080)
$Group1 = GUICtrlCreateGroup("FTP-Server", 8, 56, 201, 49)
$Server=GUICtrlCreateInput("", 16, 72, 185, 21, -1, $WS_EX_CLIENTEDGE)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("FTP-User", 8, 112, 201, 49)
$User= GUICtrlCreateInput("", 16, 128, 185, 21, -1, $WS_EX_CLIENTEDGE)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("FTP-Passwort", 8, 168, 201, 49)
$Passw= GUICtrlCreateInput("", 16, 184, 185, 21, $ES_PASSWORD, $WS_EX_CLIENTEDGE)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group4 = GUICtrlCreateGroup("Port", 240, 56, 57, 49)
$Port=GUICtrlCreateInput("21", 248, 72, 41, 21, -1, $WS_EX_CLIENTEDGE)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Suchen= GUICtrlCreateButton("DateiSuchen", 352, 64, 75, 25)
$Senden= GUICtrlCreateButton("Senden", 352, 128, 75, 25)
$Quit= GUICtrlCreateButton("Quit", 352, 184, 75, 25)
$Prt= GUICtrlCreateEdit("TransferProtokoll", 0, 224, 505, 425, -1, $WS_EX_CLIENTEDGE)
GUISetState(@SW_SHOW)
While 1
	Switch GuiGetMsg()
		Case $GUI_EVENT_CLOSE, $Quit
			ExitLoop
		Case $Suchen
			$DateiName=FileOpenDialog("UpLoad Datei", "DeskTop", "Alle (*.*)")
			AppendPrt("Transfer von " &$DateiName)
		Case $Senden
			$OpenHnd=_FTPOpen('myFTP')
			AppendPrt("FTPOpen " &"myFTP " &$OpenHnd)
			$ConnHnd=_FTPConnect($OpenHnd, GUICtrlRead($Server), GUICtrlRead($User), GUICtrlRead($Passw))
			AppendPrt("FTPConnect " &$ConnHnd &" " &GUICtrlRead($Server) &" " &GUICtrlRead($User) &" " &GUICtrlRead($Passw))
			$FtpErr=_FtpPutFile($ConnHnd,  $DateiName, 'tamor.gif')
			AppendPrt("FTPPutFile " &$FtpErr &" " & $DateiName)
			$FtpcErr=_FTPClose($OpenHnd)
			AppendPrt("FTPClose " &$FtpErr)
		Case Else
			;-))
	EndSwitch
WEnd
Exit


Func AppendPrt($What)
	GUICtrlSetData($Prt, GUICtrlRead($Prt) &@CrLf &_Now() &" " &$What)
EndFunc

Alles anzeigen

Und hier ist endlich tamor.gif :rofl2:
Im Zip-File ist eine geänderte (fertige, 'deutsche')Version von FTP.Au3 und das
Hauptskript. Ich hoffe, wenn der Transfer mit dem Internet klappt, daß er dann auch in
deinem LAN klappt.
[Edit]
Es wäre vielleicht schneller gegangen, wenn ich den Link auf das Posting von Wolkenloser nicht nur reinkopiert hätte, sondern den Thread auch noch
mal durchgelesen hätte, den da ist einiges dazugekommen, seit ich ihn das letzte Mal angesehen habe..
Gruß
ytwinky

ytwinky

FtpOpen liefert einen Handle für FtpConnect
FtpConnect liefert einen Handle für FtpPutFile
Das Skript liefert jedenfalls für diese beiden Funktionen Handles
und sonst 0 für Fehler
Ich hoffe, ich habe das richtig verstanden, denn für meinen FTP-Server
benutze ich PerfectFTP oder TwoDirs, denn mit denen klappt es
Auf alle Fälle meldet das Protokoll keine Fehler, aber das Inhaltsverzeichnis vom FTPServer leider auch keine Datei..
Also weitersuchen, das muß doch gehen..
[Edit]
Aber mit dem Problem sind wir nicht alleine:
http://www.autoitscript.com/forum/index.php?showtopic=25143&hl=
Gruß
ytwinky

ytwinky

Hi TamOr,
einen Fehler habe ich schon selbst gefunden und im Skript berichtigt:
_FTPConnect liefert einen FileHandle zurück, der dann für _FTPPutfile benutzt werden muß..
Das kommt davon, wenn man Sachen anfängt und dann liegenläßt, tut mit leid
Im Original steht, daß das Handle für FTPPutFile() von FTPConnect() geliefert wird..
Dafür muß $i geDimt werden..
Ich muß erst mal deine Sachen anschauen.
Gruß
ytwinky

ytwinky

Hi TamOr,
ich habe gedacht, es wäre einfacher..
..mit anderen Worten ich habe es auch noch nicht geschafft.
Es sollte ja auch schnell gehen:

Spoiler anzeigen

C

#include <GUIConstants.au3>
#include <FTP.au3>
#include <date.au3>


; == GUI generated with Koda ==
GUICreate("yFTP", 622, 451, 192, 125)
$server=GUICtrlCreateInput("server", 104, 56, 121, 21, -1, $WS_EX_CLIENTEDGE)
$user=GUICtrlCreateInput("user", 104, 104, 121, 21, -1, $WS_EX_CLIENTEDGE)
$passw=GUICtrlCreateInput("password", 104, 152, 121, 21, $ES_PASSWORD, $WS_EX_CLIENTEDGE)
$Suchen=GUICtrlCreateButton("DateiSuche", 368, 56, 75, 25)
$Senden=GUICtrlCreateButton("Senden", 368, 104, 75, 25)
$Quit=GUICtrlCreateButton("Quit", 368, 152, 75, 25)
$Port=GUICtrlCreateInput("21", 240, 56, 57, 21, -1, $WS_EX_CLIENTEDGE)
$Prt=GUICtrlCreateEdit("TransferProtokoll", 104, 192, 353, 249, $ES_OEMCONVERT, $WS_EX_CLIENTEDGE)
GUISetState(@SW_SHOW)
While 1
	Switch GuiGetMsg()
		Case $GUI_EVENT_CLOSE, $Quit
			ExitLoop
		Case $Suchen
			$DateiName=FileOpenDialog("UpLoad Datei", "DeskTop", "Alle (*.*)")
			AppendPrt("Transfer von " &$DateiName)
		Case $Senden
			$FTPHnd=_FTPOpen("myFTP")
			AppendPrt("FTPOpen " &"myFTP " &$FTPHnd)
			$FTPHnd=_FTPConnect($FTPHnd, GUICtrlRead($Server), GUICtrlRead($User), GUICtrlRead($passw))
			AppendPrt("FTPConnect " &$i)
			$i=_FTPPutFile($FTPHnd, GUICtrlRead($Suchen), "tamor.gif")
			AppendPrt("FTPPutFile " &$i)
			$i=_FTPClose($FTPHnd)
			AppendPrt("FTPClose " &$i)
		Case Else
			;-))
	EndSwitch
WEnd
Exit


Func AppendPrt($What)
	GUICtrlSetData($Prt, GUICtrlRead($Prt) &@CrLf &$What &" " &_Now())
EndFunc

Alles anzeigen

Vielleicht hilft dir das ja schon ein Stück weiter ?
Gruß
ytwinky

ytwinky

In der Hilfe steht, daß es eine Option gibt:

Code

FtpBinaryMode Changes how FTP files are transferred.
1 = Binary (default)
0 = ASCII

Ich habe das erstmal nur übersetzt und es ist auch noch nicht fertig
'Ich habe keine Ahnung, was das macht' ist die reine Übersetzung von
'I dont got a clue what this does' oder so
Mit den 'Spezial-Flags bin ich noch nicht fertig..
Gruß
ytwinky

ytwinky

Hi TamOr,
ich habe leider kein fertiges AutoIt-Skript, um das zu testen, vielleicht hilft dir ja erstmal meine (vorläufige) Übersetzung ins Deutsche(ich bin nicht ganz sicher)?
Hast du den Übertragungs-Modus auf Binär gesetzt?
Stimmt der Port?
(Nach UserName und Paßwort frage ich natürlich nicht )
Gruß
ytwinky

ytwinky

Hi TamOr,
liefern die _FTP..-Funktionen keinen Fehler zurück?
Warum fragst du die nicht mal ab?
Ich denke mal, dies kennst du schon..
Gruß
ytwinky

ytwinky

Per Sachsen-Anhalter durch die Galaxis :rofl2:
@weedhead:
Ich habe nicht ohne Grund zwei verschiedene Funktionen für die Skripts entwickelt..
Denn jede Funktion ermittelt andere Sachen.
Sie lassen sich mglw. verbinden, aber ob das Sinn macht?
Laufwerke ermitteln ist, wie ich gesagt habe, eine Hilfe auf der Such nach meinen
USB-Sticks(die sich als Laufwerke tarnen, die Feiglinge)
Während das andere sich nur um die CDVD-Laufwerke kümmern soll.
btw:
peethebee hat im Posting vom 02.06.2006 14:40 gezeigt, wie der spoiler benutzt wird, probiers ruhig mal, sieht einfach besser aus..
Gruß
ytwinky

ytwinky

Wir nehmen es aber nicht übel|hören es genauso gerne:
sachsen-anhaltinisch
Schau mal in den anderen Thread, da poste ich gleich was Neues..
Gruß
ytwinky

ytwinky

Naja, ich wollte natürlich nicht zugeben, daß ich keine virtuellen Laufwerke benutzen kann,
also habe ich auf die Schnelle mal die DaemonTools 3.xyz installiert und ein Iso-File gemountet.
(Das Erste, was ich gefunden habe, war vom VMServer das Windows.Iso)
Ich muß mal schauen, was ich in meiner CDVD-Sammlung noch so finde..
(Es sollte halt schnell gehen..)
[Edit]
Das funzt ja astrein, prima..
..manchmal kann ich auch schnell sein:

Code

Vorhanden sind A: C: D: E: F: G: H: I: J: K: W: Z:
A:	GENERIC FLOPPY DRIVE
C:	Festplattenpartition
D:	Festplattenpartition
E:	Festplattenpartition
F:	Festplattenpartition
G:	Festplattenpartition
H:	Festplattenpartition
I:	Festplattenpartition
J:	Festplattenpartition
K:	Festplattenpartition
L:	Generic DVD-ROM Rev. 1.0
M:	RemovableMedia
N:	RemovableMedia
O:	RemovableMedia
P:	RemovableMedia
S:	RemovableMedia
U:	Festplattenpartition
V:	Festplattenpartition
W:	TEAC CD-W516EB
Z:	TSSTcorp DVD-ROM SH-D162C

Alles anzeigen

..und kucke an, sogar 'n 2. DVD-Laufwerk(L: ) habe ich..
Dankeschön
Gruß
ytwinky

ytwinky

Hi BugFix,
hast du mal geschaut, wie es hiermit bei dir aussieht?
Denn deine Version von GetNameFromRegistry($Lw) läßt sich dort nicht so ohne Weiteres einfügen..
[Edit]
Ich habe jetzt mal ein Programm zum Mounten virtueller Laufwerke installiert..
Das Laufwerk wird erkannt, aber ich kann es nicht trennen..
In der Registry finde ich auch keinen Hinweis auf ein virtuelles Lw.
Hmmm. was ist das ?
Gruß
ytwinky

Beiträge von ytwinky

Yahtzee(Mega)

Hintergrundbild

Hintergrundbild

Berechung von Pi

Berechung von Pi

Berechung von Pi

GUISetState und @SW_HIDE

GUISetState und @SW_HIDE

GUISetState und @SW_HIDE

ftp upload

ftp upload

ftp upload

ftp upload

ftp upload

ftp upload

ftp upload

CD/DVD-Laufwerke erkennen (open-close)

CD/DVD-Laufwerke erkennen (open-close)

CD/DVD-Laufwerke erkennen (open-close)

CD/DVD-Laufwerke erkennen (open-close)