Deutsches Lazarusforum

Einfach mal lesen:


Deshalb wunderts mich ja... Eigentlich hat das beides nichts miteinander zu tun.
Ich habe jetzt herausgefunden womit es zusammenhängt. Ich hatte, um zu testen ob GetKeyState die Klicks erfasst eine Showmessage eingebunden. Dadurch wird das Form nicht mehr "Selected" (Ka wie ...

Hallo Winni,
einen Maushook habe ich auch probiert und obwohl es jetzt super funktioniert mit dem erfassen von den Clicks, kann ich keinen Hook verwenden. Irgendwas ändert der Hook daran, wie sich die Maus bewegt, denn der Spieler dreht sich jetzt auf eine sehr ungenaue und unzuverlässige weise. Das ...

Ja das hab ich mir schon gedacht. Deswegen hatte ich ja zu einem pardon für "KeyPreview" gefragt, also eine Funktion, die alle Mouse Events erst ans Form weiter leitet, denn ich habe einen ogcContext über dem Form. Ich kann für den Context keine Mouse Events abfragen, da es von OpenGl erstellt wurde ...

Winni hat geschrieben: Di 17. Jan 2023, 22:24 Hi!

Ist Dir schon mal aufgefallen, dass Mäuse keine Keys haben??

Das Event, dass Du suchst, heisst OnMouseDown.

Versuchs doch mal damit.

Winni

Ich habe jetzt denText und den Betreff überarbeitet. (Peinliche xD)

Ups ich meine natürlich FormMouseDown ^^

Hallo Pascal Freunde,
ich habe mal wieder ein kleines Problem. Kleinen 3D Spiel, woran ich gerade arbeite, funktioniert die FormMouseDown nicht wenn ich die Maus betätige.
Ich hatte mit der Tastatureingabe ein ähnliches Problem und die Formeinstellung KeyPreview hat dieses gelöst. Damit wurden die ...

Die Property KeyPreview der Form auf true setzen.
Vielen Dank das wars. Nachdem ich die Tabstops von den Buttons entfernt hatte ging es zwar mit dem Anzeigen, sobald man jedoch auf einen geklickt hat, war eben der Fokus jetzt auf dem Button und nicht mehr auf dem Form. KeyPreview schreitet da ein ...

Falls es noch jemanden interessiert:
Mein Fehler war nicht der Loop oder Processmessages, FormKeyUp funktioniert auch, wenn man mit der Maus über anderen Objekten ist. FormKeyUp scheint jedoch nicht mehr zu funktionieren, sobald ein TabStop auf einem Objekt liegt(Auch wenn dieser invisible:=false ...

Um mal aus anderen Richtungen sich dem Probelm zu nähern, wann würde denn Form1.FormKeyUp überhaupt eintreten? Theoretisch liegt ja über dem kompletten form bis auf die Headleiste der ogc Context (die Zeichenfläche). Geht FormKeyUp dann überhaupt? Die Maus befindet sich ja auf dem Context und falls ...

Ich habe es jetzt in OnActivate gepackt und die Schleife funktioniert. Leider funktionieren die Tastenabfragen immer noch nicht

Das habe ich. Von OnFormCreate ausgelöst initialisiert eine Procedure die Scene. Da habe ich Player.create(4,4,0);

Ich habe mit dem Debugger nachgeschaut und für a sagt er bzw an der Stelle wo der Fehler auftritt:
"Cannot access memory at adress 0x20".

Das verstehe ich nicht weil ich die Werte doch alle Deklariert habe. Kann mir jemand weiterhelfen?

Anfängerfehler: Man sieht mit der Deklaration alleine nicht was du im Code gemacht hat. Weil ein SIGSEGV passiert im Code.

Selbstverständlich, mein Fehler. Die Proceduren aus der Klasse sind wie folgt:

constructor TEntity.Create(x,y,z:Real);
begin
inherited Create;
FPosition:=vec3(x,y,z);
V ...

Einen schönen guten Abend,
ich versuche gerade eine mini Physics engine zu schreiben und hau hier mal wieder was mit den Klassen durcheinander. Ich brauche eine Klasse, mit der ich Objekten in der Scene als Entity beschreibe. Dafür habe ich folgende Klasse aufgestellt:

type TEntity = class ...

Das sind alles sehr coole Lösungen. Ich habe eine Holzhackermethode verwendet und eine ID die ich sowieso in jeder Blockklasse vergeben habe, abfragen lassen:
if BlockTypeID = TWood_1.BlockTypeID then ABlockList.Add(TWood_1.create(x,y,z));
Ich werde aber meine Code mit euren Ideen verbessern ...