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:

Textpuffer

 
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
Andy19312



Anmeldungsdatum: 22.10.2005
Beiträge: 428

BeitragVerfasst am: 13.05.2009, 21:02    Titel: Textpuffer Antworten mit Zitat

Könnte mir jemand sagen, wie man den Textpuffer lesen könnte?

Ich meine wenn ich z.B. mit input "Bitte geben Sie was ein:",text
eingebe, dann wird ja der Variabele text ein String übergeben.

Nun ist es so, dass ich gerne wüsste, beim wievielen Buchstabe ich gerade mit der Eingabe bin.

Dies ist leider für mein Chatprogramm notwendig und ich wäre über jede Hilfe dankbar.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
isiprimax



Anmeldungsdatum: 02.01.2009
Beiträge: 77

BeitragVerfasst am: 13.05.2009, 21:16    Titel: Antworten mit Zitat

Glaub das ginge nur in einer Schleife, in der du jeden Buchstaben einliest.

Code:
Dim As String chat_text, char

Do
   Sleep 1
   char = InKey
   chat_text = chat_text + char
   Locate 1,1 : Print Len (chat_text),chat_text
Loop Until char = Chr(13)

Print chat_text
sleep


So in etwa. Nur muss man das noch erweitern.


Zuletzt bearbeitet von isiprimax am 13.05.2009, 21:34, insgesamt einmal bearbeitet
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Andy19312



Anmeldungsdatum: 22.10.2005
Beiträge: 428

BeitragVerfasst am: 13.05.2009, 21:17    Titel: Antworten mit Zitat

genau das hatte ich auch schon gedacht, ist es sonst nicht anderst möglich?
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Mao



Anmeldungsdatum: 25.09.2005
Beiträge: 4409
Wohnort: /dev/hda1

BeitragVerfasst am: 13.05.2009, 21:24    Titel: Antworten mit Zitat

Nein.
_________________
Eine handvoll Glück reicht nie für zwei.
--
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Muttonhead



Anmeldungsdatum: 26.08.2008
Beiträge: 565
Wohnort: Jüterbog

BeitragVerfasst am: 13.05.2009, 21:29    Titel: Antworten mit Zitat

http://www.freebasic-portal.de/index.php?s=code&id=84

Im FreeBasic-Portal hab ich das gefunden, ein Ersatz für INPUT.
dieser Code lässt sich recht einfach mit einer Stringlängenbegrenzung ausstatten.

Mutton
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
MOD
Fleißiger Referenzredakteur


Anmeldungsdatum: 10.09.2007
Beiträge: 1003

BeitragVerfasst am: 13.05.2009, 21:47    Titel: Antworten mit Zitat

Einen eigenen INPUT-Ersatz plus Textlängenbegrenzung hab ich in log-n-process eingebaut. Du kannst ja mal in den Code reinschauen, so um die Zeile 380-400 oder so. (Code gibt es samt Projekt in den Projektvorstellungen)
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Andy19312



Anmeldungsdatum: 22.10.2005
Beiträge: 428

BeitragVerfasst am: 16.05.2009, 23:13    Titel: Antworten mit Zitat

Ich wollte mich nochmal bedanken.....
Es hat mir auf jedem Fall weitergeholfen:)
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