Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

Weiter mit Mausklick

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC.
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
mb1994



Anmeldungsdatum: 25.04.2009
Beiträge: 2
BeitragVerfasst am: 25.04.2009, 13:39    Titel: Weiter mit Mausklick Antworten mit Zitat
Ich sollte ien Kleines Programm für die Suchle schreiben. Wir sollten einen Kleiner Text schreiben wo jede zeile erst nach einem Mausklich erscheint. Den Text habe ich schon aber ich kann nur mit einem Tastendruck auf die nächste zeile gehen. Kann mir da jamnd Helfen?
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
MOD
Fleißiger Referenzredakteur


Anmeldungsdatum: 10.09.2007
Beiträge: 1003
BeitragVerfasst am: 25.04.2009, 14:24    Titel: Antworten mit Zitat
Code:
Dim As Integer x,y,b
Print "1"
Do
   If GetMouse(x,y,,b)=0 And b=1 Then Exit Do
   Sleep 1
Loop
Print "2"
Sleep


Das sollte doch so funktionieren.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Sebastian
Administrator


Anmeldungsdatum: 10.09.2004
Beiträge: 5969
Wohnort: Deutschland
BeitragVerfasst am: 25.04.2009, 14:24    Titel: Antworten mit Zitat
Hallo,

willkommen im Forum!

Die Maus wird in FreeBASIC mit GETMOUSE abgefragt. Ein Beispiel, wie dein Programm aussehen könnte, habe ich hier hochgeladen: http://www.freebasic-portal.de/index.php?s=fbporticula&mode=show&id=849

Viele Grüße!
Sebastian
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
mb1994



Anmeldungsdatum: 25.04.2009
Beiträge: 2
BeitragVerfasst am: 25.04.2009, 14:37    Titel: Antworten mit Zitat
Danke hat alles super funktioniert!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC. Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz