Warnung bei Type Helper loswerden

[Mathias]

Bei diesem kleinen Code-Schnipsel kommt eine Warnung, das "v" nicht initialisiert ist.
Genau dies macht ja die procedure init.

Code: Alles auswählen

program Project1;

  {$modeswitch typehelpers}

type
  TVec2 = array[0..1] of single;

  TVec2fHelper = type Helper for TVec2
    procedure init;
  end;

  procedure TVec2fHelper.init;
  begin
    Self := [0, 1];
  end;

var
  v: TVec2;

begin
  v.init;   // project1.lpr(21,3) Warning: Variable "v" does not seem to be initialized
  WriteLn(v[0], v[1]);
end.  

Klar ich könnte folgendes machen, aber dies würde nach meiner Meinung null Sinn machen.

Code: Alles auswählen

var
  v: TVec2 = (0, 0);  

oder

Code: Alles auswählen

 {$WARNINGS OFF}
 v.init;   // project1.lpr(21,3) Warning: Variable "v" does not seem to be initialized
 {$WARNINGS ON}

Ist dies so gewollt ?

[PascalDragon]

Bei diesem kleinen Code-Schnipsel kommt eine Warnung, das "v" nicht initialisiert ist.
Genau dies macht ja die procedure init.

Der Compiler hat keine Ahnung, dass Init das macht.

Klar ich könnte folgendes machen, aber dies würde nach meiner Meinung null Sinn machen.

Code: Alles auswählen

var
  v: TVec2 = (0, 0);  

oder

Code: Alles auswählen

 {$WARNINGS OFF}
 v.init;   // project1.lpr(21,3) Warning: Variable "v" does not seem to be initialized
 {$WARNINGS ON}

Deklariere halt eine passende, typisierte Konstante und nutze die zur Initialisierung:

Code: Alles auswählen

const
  Vec2Default: TVec2 = (0, 1);
var
  v: TVec2;
begin
  v := Vec2Default;
end.

Oder wenn dein initaler Wert tatsächlich mit allem Werten 0 ist, dann kannst du auch v := Default(TVec2) nutzen.

Und wenn du bestimmte Werte angeben kannst, könntest du in deinem Helper auch einen Konstruktor deklarieren (parameterlose Konstruktoren sind nicht erlaubt, das schließt auch Konstruktoren mit nur optionalen Parametern mit ein).

[corpsman]

Übrigens, wenn es dir um eine Vector mathe Lib geht, da würde ich mal einen Blick auf uvectormath.pas empfehlen, da sind auch Typehelper drin

[Mathias]

Und wenn du bestimmte Werte angeben kannst, könntest du in deinem Helper auch einen Konstruktor deklarieren (parameterlose Konstruktoren sind nicht erlaubt, das schließt auch Konstruktoren mit nur optionalen Parametern mit ein).

Von dem habe ich auch schon gelesen, und genau wegen diesen Parametern habe ich es dann sein gelasen.
Dieses Beispiel wird korrekt ausgeführt, nur sehe ich keinen Sinn hinter diesem zwingendem Parameter,

Code: Alles auswählen

{$modeswitch advancedrecords}
{$modeswitch typehelpers}
type
  TMat = array[0..1, 0..1] of single;

  TMatHelper = type Helper for TMat
    constructor init(dummy: byte);
  end;

  constructor TMatHelper.init(dummy: byte);
  begin
    Self := [[1, 0], [0, 1]];
  end;

var
  m: TMat;

begin
  m.init(123);
  WriteLn(m[0, 0]); // -> 1
end.    

Übrigens, wenn es dir um eine Vector mathe Lib geht, da würde ich mal einen Blick auf uvectormath.pas empfehlen, da sind auch Typehelper drin

Danke für den Link, sieht recht spanned aus.