Forum | | | | | je comprends ogl imprimer et ogl locate pas! comment es pour mich aussieht funktioniert beides chez mir irgendwie pas richtig. KompilierenMarqueSéparation {$cleq}
include oglhelper.inc
cls
ogl("init",hwnd,0,0,0,0)
ogl("clear")
var oglFnt&:=ogl.createfont("courier new",20,true)
ogl("print",oglfnt&,"hallo welt")
ogl("print",oglfnt&,"hallo welten")
ogl("show")
waitkey
end
proc ogl.createfont
parameters fontName$,size&,big%
var fnt&:=create("font",fontName$,size&,0,big%,0,0)
var oglfnt&:=ogl("BitmapFont",fnt&)
deleteobject fnt&
return oglfnt&
endproc
a) pourquoi wird allô welten (seulement chez mir?!) pas angezeigt? b) pourquoi, si je avant qui Prints un ogl locate schreibe, wird (seulement chez mir?!) garkein Text angezeigt? c) dans qui Hilft ist malheureusement pas beschrieben comment qui paramètre pour ogl locate trop interpretieren sommes.
peux mir quelqu'un aider? chez den 3D-Fonts hingegen funktioniert alles so comme soll.
<offtopic> qui original-Xpse Source: KompilierenMarqueSéparation!{$cleq}
//include oglhelper.inc
cls
ogl("init",hwnd,0,0,0,0)
ogl("clear")
long oglFnt:=ogl.createfont("courier new",20,vrai)
ogl("print",oglfnt,"hallo welt")
ogl("print",oglfnt,"hallo welten")
ogl("show")
waitkey
end
ogl.createfont (string fontName,long size,bool big) {
long fnt:=create("font",fontName,size,0,big,0,0)
long oglfnt:=ogl("BitmapFont",fnt)
deleteobject fnt
return oglfnt
}
</offtopic> |
| | | | |
| | Jörg Sellmeyer | quoi soll on dabei car maintenant testen? XPSE ou bien den Code? XPSE habe je pas et den Code seulement paraphraser, avec cela il fonctionne mais est pas Sinn qui l'affaire, ou bien? |
| | | Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 14.01.2007 ▲ |
| |
| | | il y a keinen Code umzuschreiben - und dir aussi pas um XPSE. und dir um den o.G. Code - qui ist reines XProfan. cela Problem ist beschrieben - verstehe pas worum es Dir allez?!
j'écrivais cela ogl imprimer et locate mir Probleme bereitet. xpse braucht niemand pour mich testen. |
| | | | |
| | | sans paraphraser gibts seulement faute KompilierenMarqueSéparationcls
ogl("init",%hwnd,0,0,0,0)
ogl("clear")
var oglFnt&=ogl.createfont("courier new",20,1)
ogl("print",oglfnt&,"hallo welt")
ogl("print",oglfnt&,"hallo welten")
ogl("show")
waitkey
end
proc ogl.createfont
parameters fontName$,size&,big%
var fnt&=create("font",fontName$,size&,0,big%,0,0)
var oglfnt&=ogl("BitmapFont",fnt&)
deleteobject fnt&
return oglfnt&
| 15.01.2007 ▲ | |
| |
| | RGH | [quote-part:c4654f04d2=iF]und dir um den o.G. Code - qui ist reines XProfan[/quote-part:c4654f04d2] malheureusement plan pas, quoi en supplément führt, qui quelqu'un sans XPSE den Code sans Changements pas verwenden peux!
Salut Roland |
| | | Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 15.01.2007 ▲ |
| |
| | | Stimmt - j'ai := oublier qc trop ersetzen!
qui Code funzt quand même pas comment trop erwarten? KompilierenMarqueSéparationcls
ogl("init",%hwnd,0,0,0,0)
ogl("clear")
var oglFnt&=ogl.createfont("courier new",20,1)
ogl("print",oglfnt&,"hallo welt")
ogl("print",oglfnt&,"hallo welten")
ogl("show")
waitkey
end
proc ogl.createfont
parameters fontName$,size&,big%
var fnt&=create("font",fontName$,size&,0,big%,0,0)
var oglfnt&=ogl("BitmapFont",fnt&)
deleteobject fnt&
return oglfnt&
| 15.01.2007 ▲ | |
| |
| | RGH | allô David, Dein Code peux pas marcher (zumindest pas richtig), et zwar aus deux Trouvé:
1. Es fehlt qui Origin-Befehl. chez Bitmap-Fonts gibt es aucun räumliche Tiefe, d.h. vous volonté sur qui Z-Achse à Position 0 gezeichnet. Um quelque chose à Position 0 trop voyons, doit qui Betrachter une Schritt zurückgehen, bzw. qui trop betrachtende l'article zurück dans den espace geschoben volonté.
2. Es fehlt qui Localiser-Befehl. sans Localiser-Befehl ist qui Darstellungsposition pour den Imprimer-Befehl (wohlgemerkt, und dir ici seulement um OGL) indéterminé. qui Koordinaten des Localiser-Befehles entsprechen den habituel X- et Y-Koordinaten dans OpenGL, d.h. 0,0 ist exakt dans qui Mitte et wohin oui c'est ca sur dem Bildschirm 1,1 ist hängt de qui Taille des Z-Wertes im Origin-Befehl ab.
il peut sich cela alors so présenter, qui dans qui avec Z eingestellten Entfernung, alors am Ursprungspunkt qui OGL-monde, une 2D-Surface ist, sur qui geschrieben wird. avant chaque écrivons avec Imprimer doit qui Schreibposition eingestellt volonté. (Gleiches gilt pour qui représentation de 2D-Bitmaps.)
So funktioniert Dein Beispiel: KompilierenMarqueSéparationcls
ogl("init",%hwnd,0,0,0,0)
ogl("clear")
oGL("Origin", 0, 0, -6)
var oglFnt&=ogl.createfont("courier new",20,1)
ogl("locate", 0, 0)
ogl("print",oglfnt&,"+ (0,0)")
ogl("locate", 1, 1)
ogl("print",oglfnt&,"+ (1,1)")
ogl("locate", -1, 1)
ogl("print",oglfnt&,"+ (-1,1)")
ogl("locate", 1, -1)
ogl("print",oglfnt&,"+ (1,-1)")
ogl("locate", -1, -1)
ogl("print",oglfnt&,"+ (-1,-1)")
ogl("locate", 2, 2)
ogl("print",oglfnt&,"+ (2,2)")
ogl("locate", -2, 2)
ogl("print",oglfnt&,"+ (-2,2)")
ogl("locate", 2, -2)
ogl("print",oglfnt&,"+ (2,-2)")
ogl("locate", -2, -2)
ogl("print",oglfnt&,"+ (-2,-2)")
ogl("show")
waitkey
end
proc ogl.createfont
parameters fontName$,size&,big%
var fnt&=create("font",fontName$,size&,0,big%,0,0)
var oglfnt&=ogl("BitmapFont",fnt&)
deleteobject fnt&
return oglfnt&
endproc
Experimentiere un peu avec dem z-Wert im Origin-Befehl et dir wird tout de suite bien sûr, quoi je dessus compliqué trop expliquer versuche!
Salut Roland |
| | | Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 15.01.2007 ▲ |
| |
| | | Jau - super Erklärung! Ab avec cela dans qui Aider - là fehlt cet! |
| | | | |
|
répondreOptions du sujet | 2.014 Views |
Themeninformationencet Thema hat 4 participant: |