;/-######################
;/-WinApi Tutorial#######
;/-Von Leonard Dahlmann##
;/-######################
;Vorraussetzungen für dieses Tutorial:
;Schleifen
;MessageRequester
;Variablen
;Um das alles kennenzulernen,
;guckt euch einfach mal die Tutorials
;auf www.purearea.net an.
;-F: Was ist die Winapi?
; A: Die Winapi enthält viele Befehle,
; mit denen man die volle Kontrolle über
; Windows hat. Man kann diese Befehle
; in PB ohne Einschränkung benutzen.
;-F: Wie benutze ich diese befehle in PB?
; A: Winapi Befehle kann man ganz einfach
; in PB benutzen, man schreibt sie einfach
; als Befehl hin.
;-F: Wo finde ich Informationen zur Winapi?
; A: Die Winapi enthält über 10000 Befehle.
; Eine englische Dokumentation gibt es auf
; http://msdn.microsoft.com .
;Los gehts!
;Machen wir doch einfach mal unser erstes kleines Programm.
;Der GetTickCount_() Befehl gibt uns zurück, wie viel Zeit
;in Millisekunden seit dem letzten Start von Windows vergangen
;ist. Der Befehl hat keine Parameter.
;Den Befehl aufrufen, wie eine normale PB Funktion,
;und den Rückgabewert in einer Variable speichern.
Zeit = GetTickCount_()
;Den Wert ausgeben.
MessageRequester("Hallo Welt","Es sind "+Str(Zeit)+" millisekunden seit dem hochfahren von Windows vergangen!")
;Ein anderes leichtes Beispiel ist der Befehl beep
;Als Paramter erwartet er die Tonhoehe und die Tonlaenge
;des Tons, welcher ausgegeben werden soll.
;Also beep_(Tonhoehe,Tonlaenge)
Beep_(1000,1000)
;Oder eine kleine Melodie, mit einer For-Next Schleife
For I = 0 To 10
Beep_(I*100,I*10)
Next
;Spielt mit dem Befehl einfach mal ein bisschen rum.
;Das war es auch erstmal mit dem ersten Teil des WinApi tutorials.
;cu
;leo
wäre cool, wenn irgendjemand viell. noch ein paar Tutorials zum übernehmen von WinAPI Beispielen aus anderen Sprachen macht. Das check ich nämlich noch überhaupt nicht.