Thema: Delphi Mesh Import in GLScene

Einzelnen Beitrag anzeigen

Benutzerbild von turboPASCAL
turboPASCAL

Registriert seit: 8. Mai 2005
Ort: Sondershausen
4.274 Beiträge
 
Delphi 6 Personal
 
#4

Re: Mesh Import in GLScene

  Alt 18. Feb 2007, 20:01
Zitat von Bastler:
Wie dem auch sei, könnte mir wer sagen wie ich ein Mesh aus einer *.3ds Datei in eine Freeform importiere?
Ja.

(wenn ich mal Zeit hab mach ich 'n Demo, kann gerade nicht)


Delphi-Quellcode:
uses
  ..., GLFileMD2, GLFile3DS; // <---<<<

procedure TFormX.FormCreate(Sender: TObject);
begin
  GLFreeForm1.LoadFromFile(ExtractFilePath(ParamStr(0)) + 'DP.3ds');
  GLFreeForm1.Scale.Scale(0.05);
  GLFreeForm1.Roll(90); // ggf. drehen etc.
  GLFreeForm1.Turn(90);

  GLActor1.LoadFromFile(ExtractFilePath(ParamStr(0)) + 'waste.md2');
  GLActor1.Material.Texture.Image.LoadFromFile(
    ExtractFilePath(ParamStr(0)) + 'waste.jpg');
  GLActor1.Scale.Scale(0.1);
  GLActor1.Roll(90);
  GLActor1.Turn(90);

  GLActor1.SwitchToAnimation(xyz, TRUE);
end;
Matti
Meine Software-Projekte - Homepage - Grüße vom Rüsselmops -Mops Mopser
  Mit Zitat antworten Zitat