Gänsefüßen erstellen

Übersicht BlitzBasic Beginners-Corner

Neue Antwort erstellen

Lifetec

Betreff: Gänsefüßen erstellen

BeitragDo, Apr 27, 2006 16:54
Antworten mit Zitat
Benutzer-Profile anzeigen
Hi, ich will in einn Code z.b
Code: [AUSKLAPPEN]

fenster = CreateWindow ("Testr", 100,100,100,20,fenster,1)


das Wort Test in gänsefüßchen machen so das es dann auf dem Bildschirm ist. Wie mach ich das ???

BtbN

BeitragDo, Apr 27, 2006 17:03
Antworten mit Zitat
Benutzer-Profile anzeigen
Chr() + ASCII-Zeichen von "

Artemis

BeitragDo, Apr 27, 2006 17:08
Antworten mit Zitat
Benutzer-Profile anzeigen
AlsoCode: [AUSKLAPPEN]
fenster = CreateWindow (Chr(34)+"Test"+Chr(34), 100,100,100,20,fenster,1)

Lifetec

BeitragDo, Apr 27, 2006 17:09
Antworten mit Zitat
Benutzer-Profile anzeigen
Danke habt mir sehr geholfen.
 

trooper

BeitragFr, Apr 28, 2006 10:30
Antworten mit Zitat
Benutzer-Profile anzeigen
funktionieren escape zeichen in blitz nicht!?
also:

Code: [AUSKLAPPEN]

fenster = CreateWindow ("\"Test\"", 100,100,100,20,fenster,1)
-- imtane.de.vu --
a cherring ping

Jan_

Ehemaliger Admin

BeitragFr, Apr 28, 2006 10:41
Antworten mit Zitat
Benutzer-Profile anzeigen
Nein,

Bei Basic Dialekten funktioniert das meistens nciht.
bei Bmax könnte es funzen so,
bin mir aber unsicher.
between angels and insects

Artemis

BeitragFr, Apr 28, 2006 12:59
Antworten mit Zitat
Benutzer-Profile anzeigen
Bei BlitzMax gibt es Escape-Zeichen, jedoch anders, als man sie von anderen Sprachen gewohnt ist.
~0 = ASCII-Code 0
~t = Tab (ASCII 9)
~r = Return (ASCII 13)
~n = New line (ASCII 10)
~q = Gänsefüßchen (") (ASCII 34)
~~ = Tilde (~) (ASCII 126)
 

Florian

BeitragFr, Apr 28, 2006 14:46
Antworten mit Zitat
Benutzer-Profile anzeigen
Code: [AUSKLAPPEN]

;~0 = ASCII-Code 0
;~t = Tab (ASCII 9)
;~r = Return (ASCII 13)
;~n = New Line (ASCII 10)
;~q = Gänsefüßchen (") (ASCII 34)
;~~ = Tilde (~) (ASCII 126)


Print Escape_Zeichen_umwandeln$("~qTest~q")
WaitKey

Function Escape_Zeichen_umwandeln$(Zeichen$)
 Lang=Len(Zeichen$)
 
 For Pos=1 To Lang
  If Mid$(Zeichen$,Pos,1)="~" Then
   Pos=Pos+1
   Select Mid$(Zeichen$,Pos,1)
    Case "0"
     Ausgabe$=Ausgabe$+Chr$(0)

    Case "t"
     Ausgabe$=Ausgabe$+Chr$(9)

    Case "n"
     Ausgabe$=Ausgabe$+Chr$(10)

    Case "q"
     Ausgabe$=Ausgabe$+Chr$(34)

    Case "~"
     Ausgabe$=Ausgabe$+Chr$(126)

   End Select
  Else
   Ausgabe$=Ausgabe$+Mid$(Zeichen$,Pos,1)
  EndIf
 Next 
 Return Ausgabe$
End Function
Das große BlitzBasic Community Tutorial
Stackmaschine 2.0

Neue Antwort erstellen


Übersicht BlitzBasic Beginners-Corner

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group