Type TPonit kann kein wert zugeordnet werden warum?

[gandime]

Hi,
ich möchte bei einem type:

Delphi-Quellcode:

type
  TSumo = class
  private
    pt_posi,pt_speedi:TPoint;
  public
    constructor create;
    procedure mal_dich;
  published
    property pt_pos:TPoint read pt_posi write pt_posi;
    property pt_speed:TPoint read pt_speedi write pt_speedi;
end;

so einen Wert setzen:

Delphi-Quellcode:

constructor Tsumo.create;
begin
  self.pt_pos.x:=0;//Fehler beim compilen
  self.pt_pos.y:=0;
  self.pt_speed.x:=0;
  self.pt_speed.y:=0;
end;

Fehler:

Zitat:

[DCC Fehler] unt_types.pas(77): E2064 Der linken Seite kann nichts zugewiesen werden

warum geht das nicht was mache ich falsch?


mfg
gandime

[Apollonius]

Du kannst Teilen von Record-Propertys keine Werte zuweisen. Innerhalb der Klasse kannst du die Felder benutzen.

[teebee]

So geht es:

Delphi-Quellcode:

constructor Tsumo.create;
begin
  pt_pos := Point(0,0);
  pt_speed := Point(0,0);
end;

[Thorben_Ko]

Oder versuchst auf die Property zuzugreifen und wie Apollonius schon gesagt hat geht das nicht. Aber warum machst du den umweg über die Property? Greiff doch direkt auf die Variablen zu...

Delphi-Quellcode:

constructor Tsumo.create; 
begin 
  self.pt_posi.x:=0;// <- So geht das
  self.pt_posi.y:=0; 
  self.pt_speedi.x:=0; 
  self.pt_speedi.y:=0; 
end;

[Hawkeye219]

Hallo,

als kleine Ergänzung für den Zugriff von außen: klick

Gruß Hawkeye

[gandime]

ok thx für die hilfe und noch eine abschliesende frage:
gibt es eine möglichkeit bei TPoint oder einer ähnlichen Komponente eine Kommazahl als Wert zu nutzen?

[DeddyH]

Zitat von gandime:

gibt es eine möglichkeit bei TPoint oder einer ähnlichen Komponente eine Kommazahl als Wert zu nutzen?

Was meinst Du? Eine Art TPoint mit Float-Werten? Kannst Du Dir doch locker selber definieren.

Delphi-Quellcode:

type TFloatPoint = record
  X,Y: double;
end;

[gandime]

stimmt danke