Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Frage zu firemonkey (https://www.delphipraxis.net/206497-frage-zu-firemonkey.html)

Schuby 2. Jan 2021 05:23

AW: Frage zu firemonkey
 
Liste der Anhänge anzeigen (Anzahl: 2)
Erstmal Danke für die vielen Antworten.

Ich habe jetzt GLScene genommen und es sieht auch schon sehr gut aus.
Mit der linken Maus Taste kann ich schon das Grid in allen Seiten bewegen.

Aber wie mache ich es das ich den Mittelpunkt vom Grid verschieben kann.
Bin die ganze Zeit bei Youtube und suche nach Demo.

Delphi-Quellcode:
procedure TForm1.GLSceneViewer1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
  if Shift=[ssLeft] then
  Begin
    GLCamera1.MoveAroundTarget(my-y,mx-x);
  end;
  if Shift=[ssRight] then
  Begin
    ????
  end;
  mx:= x;
  my:= y;
end;
Hat jmd einen Tipp für mich ?

mfg schuby

mmw 2. Jan 2021 10:54

AW: Frage zu firemonkey
 
Hallo,

das müsste eigentlich schon reichen, als Beispiel -

Delphi-Quellcode:
GLXYZGrid1.XSamplingScale.Max:=0.5;
GLXYZGrid1.XSamplingScale.Min:=-0.5;

GLXYZGrid1.YSamplingScale.Max:=0.5;
GLXYZGrid1.YSamplingScale.Min:=-0.5;

GLXYZGrid1.ZSamplingScale.Max:=0.5;
GLXYZGrid1.ZSamplingScale.Min:=-0.5;
es wäre besser einen neuen Thread aufzumachen.

http://www.anderswallin.net/cam/

ist zwar fuer Python/C++ aber kann man vielleicht mal gebrauchen.

Gruß


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:54 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz