| |
|
|
- page 1 - |
|
funkheld | allô, guten journée. il me faut s'il te plaît la fois une Grafik-Aider pour une Armatur avec aiguille. je voudrais folgende données comme Zeigergrafik Montrer : numéro1! KompilierenMarqueSéparation {$cleq}
Declare Ende&, SizeOfMem&, hmap&, hMapView&, win&
declare zahl1!,zahl2!,text1&,text2&
'1024 Bytes Speicher
SizeOfMem& = 1024
'Speicherbereich anlegen
hmap& = CreateFileMapping(-1,0,PAGE_READWRITE,0,SizeOfMem&,"MeinSpeicher")
'Zeiger auf Speicherbereich ermitteln
hMapView& = MapViewOfFile(hMap&,$000F001F, 0, 0, 0)
win& = @Create("Window", 0, "Parent", 20, 20, 500,400)
text1&=@Create("Text",win&,"1",20,20,100,20)
text2&=@Create("Text",win&,"2",20,45,100,20)
ende&=1
While Ende&
sleep 5
if isKey(81)
ende&=0
endif
zahl1!=double(long(hMapview&,11))
zahl2!=double(long(hMapview&,16))
settext text1&,str$(@int(zahl1!+0.5))
settext text2&,str$(@int(zahl2!+0.5))
EndWhile
UnmapViewOfFile(hMapView&)
CloseHandle(hMapView&)
Fin
comment peux on cela bewerkstelligen cela avec dem aiguille et dem runden Hintergrund, welches aussi avec XPSE compilé volonté peux ?
merci.
Gruss peter |
|
|
| |
|
|
|
| |
|
- page 1 - |
|
funkheld | Au..., on cela sieht oui Toll aus et arbeitet Präzise. c'est une wunderbare Grundlage zum weiterarbeiten.
Vielen Dank.
Gruss peter |
|
|
| |
|
|
|
| |
|
| |
|
|
|
| chez manchen Gradzahlen ist qui Ausgabe des gedrehten Zeigers pas so qualitativ - avec cela qui Ausgabe toujours qualitativ ist müsstest simple seulement den aiguille comme quadratisches Bild enlever z.B. avec 512x512 Pixeln.
|
|
|
| |
|
|
|
funkheld | allô, iF, bekommst du cela ganze aussi avec OGL hin ? là peux on oui aussi joli Rotaten avec dem aiguille. seulement devrait es dans 2D son.
merci.
Gruss peter |
|
|
| |
|
|
| |
|
- page 2 - |
|
|
| avec Sicherheit,
habe pour quelque chose comme oui aussi qui oglhelper et oglui geschrieben: [...]
qui Frage pour mich alors plutôt, si Du toi là einarbeiten würdest, là ca pas plus seulement avec "20" Zeilen abgetan ist. quoi oui c'est ca "stört" toi am Bisherigen? Vlt. peux je kompensieren. |
|
|
| |
|
|
|
funkheld | Gefällt mir wundebar so.
Bloss je selber bekomme den Einstieg pas dans qui Rotate-Routine avec den Werten. Finde aussi aucun Beschreibung pour. Votre OGL dessus muss je mir maintenant la fois reinziehen. Sieht bien aus.
merci.
Gruss peter |
|
|
| |
|
|
|
| Na dans qui XProfan-Aider simple ogl eingeben, Rotate wird là imho aussi bien erklärt.
Braucht arrêt 3 Floatwerte pour x,y,z-Drehung. |
|
|
| |
|
|
|
| Nachtrag: Du meinst vlt. qui Rotate-Routine vom obigen Quellcode? ensuite: Den Winkel simple la fois 1.000 prendre, w steht pour Winkel (180.000 = 180°) et r pour Radius. |
|
|
| |
|
|
|
funkheld |
Votre OGL dessus muss je mir maintenant la fois reinziehen. Sieht bien aus.
Sieht optique wunderbar aus avec OGL, mais pour dem mon eigene Tachokreation 3 Minuten durchlief était qui ordinateur wieder vollgemüllt , leichenstarre et stürzte ab. cela vieille OGL-Problem. cela eines qui wichtigsten Grafikprodukte dans Profan pas fonctionne... tant pis.
Gruss peter |
|
|
| |
|
|
|
| Soweit je sais klappt seulement den TestMode pas zuverlässig avec XProfan sowie create(«PCSI»,"&OGLBMP",... -
alles autre fonctionne imho droite zuverlässig si qui Treiber pas so incorrect ist.
Müsstest la fois Code montrer um einzuschätzen. |
|
|
| |
|
|
|
funkheld | allô, IF, c'est qui vieille Layer avec dem OGL. qui faute ist encore pas behoben dans XProfan. Wurde déjà zigmal ici beschrieben.
....si qui Treiber pas so incorrect ist.... Du meinst sicherlich den Treiber dans XProfan ?
Ansonsten sous Purebasic passiert cela pas avec dem OGL et dans Freebasic aussi pas. Wir devrait den faute pas toujours dans cela Computersystem schieben. c'est einwandfrei un Bug dans dem Profansystem. Wir drehen uns ici im Kreis.
Gruss peter |
|
|
| |
|
|
|
| là je mich pas bewusst drehe qui demande, welchen faute oui c'est ca Du meinst, aussi avec cela je ihn zumindest pour mich tenir compte de peux. |
|
|
| |
|
|