Einzelnen Beitrag anzeigen

phipsphips

Registriert seit: 17. Jan 2008
3 Beiträge
 
Delphi 2007 Professional
 
#1

TPoint3D; Inkompatible Typen bei Polygon3D Methode

  Alt 17. Jan 2008, 14:17
hi,

ich möchte mir einen 3D Plot erstellen und benutze dafür die TDraw3D Komponente, welche sich unter TeeChart Std befindet.

Dort möchte ich die Methode TCanvas3D.Polygon3D(TPoint3D[]) benutzen.

In die Methode muss ein Array übergeben werden des Typs Point3D. Dieser ist so weit ich das verstehe das gleiche wie der Typ point nur eben mit 3 Koordinaten.
Da Point3D allerdings nicht in Delphi als Typ hinterlegt ist erstelle ich ihn mir selbst durch:

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, chart, ExtCtrls, TeeProcs, TeEngine, teedraw3d, StdCtrls, TeCanvas;

type
TPoint3D = packed record
X: Longint;
Y: Longint;
Z: Longint;
end;

zusätzlich habe ich auch mal noch versucht als ich diese function mit eingebunden hatte, da sie auch in der types.pas steht für Points:

function Point3D(X, Y, Z: Integer): TPoint3D;
begin
Result.X := X;
Result.Y := Y;
Result.Z := Z;
end;

So weit wie ich das verstanden habe, habe ich mir jetzt einen Datentyp erstellt, der vergleichbar ist mit dem vorhandenen Typ Point, allerdings drei Koordinaten besitzt, oder?

Dann definiere ich folgendes array:

array3d : array [0..5] of TPoint3d

und weiße den einzelnen Punkten noch ihre Werte zu.

Und dann rufe ich die Methode auf:

draw3d1.Canvas.Polygon3D(array3d);

mit der er nun eigentlich ein 3D Polygon erstellen sollte, oder?

Das Problem ist nun, dass beim Compilieren immer die Fehlermeldung erscheint, dass es sich um Inkompatible Typen handelt,
also array3d stimmt nicht mit dem Typ überein, der an die Methode übergeben werden soll.

Woran liegt das? Mache ich irgendwas falsch bei der Typendeklaration? Oder rufe ich die Methode falsch auf?

Ich komme nicht dahinter und habe auch schon so einiges probiert und auch leider nirgends eine Antwort gefunden...
Ich hoffe, einer von euch kann mir helfen, wäre super!

Danke schonmal euch allen!

phips
  Mit Zitat antworten Zitat