| |
|
|
- Page 1 - |
|
funkheld | Hallo, guten Tag. Ich brauche bitte mal eine Grafik-Aiuto per eine Armatur mit Zeiger. Ich möchte folgende Daten als Zeigergrafik Mostra : zahl1! KompilierenMarkierenSeparieren {$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&)
End
Wie kann man das bewerkstelligen das mit dem Zeiger und dem runden Hintergrund, welches auch mit XPSE compiliert werden kann ?
Danke.
Gruss peter |
|
|
| |
|
|
|
| |
|
- Page 1 - |
|
funkheld | Au..., man das sieht ja Toll aus und arbeitet Präzise. Das ist eine wunderbare Grundlage zum weiterarbeiten.
Vielen Dank.
Gruss peter |
|
|
| |
|
|
|
| |
|
| |
|
|
|
| Bei manchen Gradzahlen ist die Ausgabe des gedrehten Zeigers nicht so qualitativ - damit die Ausgabe immer qualitativ ist müsstest einfach nur den Zeiger als quadratisches Bild ablegen z.B. mit 512x512 Pixeln.
|
|
|
| |
|
|
|
funkheld | Hallo, iF, bekommst du das ganze auch mit OGL hin ? Da kann man ja auch schön Rotaten mit dem Zeiger. Nur müsste es in 2D sein.
Danke.
Gruss peter |
|
|
| |
|
|
| |
|
- Page 2 - |
|
|
| Mit Sicherheit,
habe per sowas ja auch die oglhelper und oglui geschrieben: [...]
Die Frage per mich also eher, ob Du Dich da einarbeiten würdest, da dies nicht mehr nur mit "20" Zeilen abgetan ist. Was genau "stört" Dich am Bisherigen? Vlt. kann ich kompensieren. |
|
|
| |
|
|
|
funkheld | Gefällt mir wundebar so.
Bloss ich selber bekomme den Einstieg nicht in die Rotate-Routine mit den Werten. Finde auch keine Beschreibung dafür. Deine OGL oben muss ich mir jetzt mal reinziehen. Sieht gut aus.
Danke.
Gruss peter |
|
|
| |
|
|
|
| Na in der XProfan-Aiuto einfach ogl eingeben, Rotate wird da imho auch gut erklärt.
Braucht halt 3 Floatwerte per x,y,z-Drehung. |
|
|
| |
|
|
|
| Nachtrag: Du meinst vlt. die Rotate-Routine vom obigen Quellcode? Dann: Den Winkel einfach mal 1.000 nehmen, w steht per Winkel (180.000 = 180°) und r per Radius. |
|
|
| |
|
|
|
funkheld |
Deine OGL oben muss ich mir jetzt mal reinziehen. Sieht gut aus.
Sieht optisch wunderbar aus mit OGL, aber nach dem meine eigene Tachokreation 3 Minuten durchlief war der Computer wieder vollgemüllt , leichenstarre und stürzte ab. Das alte OGL-Problem. Das eines der wichtigsten Grafikprodukte in Profan nicht corre... schade.
Gruss peter |
|
|
| |
|
|
|
| Soweit ich weiß klappt nur den TestMode nicht zuverlässig mit XProfan sowie create("hPic","&OGLBMP",... -
alles andere corre imho recht zuverlässig wenn der Treiber nicht so fehlerhaft ist.
Müsstest mal Code zeigen um einzuschätzen. |
|
|
| |
|
|
|
funkheld | Hallo, IF, das ist die alte Layer mit dem OGL. Der Fehler ist noch nicht behoben in XProfan. Wurde schon zigmal hier beschrieben.
....wenn der Treiber nicht so fehlerhaft ist.... Du meinst sicherlich den Treiber in XProfan ?
Ansonsten unter Purebasic passiert das nicht mit dem OGL und in Freebasic auch nicht. Wir sollten den Fehler nicht immer in das Computersystem schieben. Es ist einwandfrei ein Programmfehler in dem Profansystem. Wir drehen uns hier im Kreis.
Gruss peter |
|
|
| |
|
|
|
| Da ich mich nicht bewusst drehe die Nachfrage, welchen Fehler genau Du meinst, auch damit ich ihn zumindest per mich beachten kann. |
|
|
| |
|
|