Extended mit mehr als 18 Stellen

[ichbins]

langsamheit macht nix, so was hab ich schon immer gesucht !!!

zum Thema wie schreibt man eine Typ? Seeeeeeeehr kompliziert. In Type einen Typ deklarieren:

Delphi-Quellcode:

type
  tzahl=class
    protected
      {Versteckte Variablen / Funktionen / Prozeduren / Propertys}
      x:integer;
      function getwertvonx:integer;
      procedure setx(setxto:integer);
    public
      {In anderen Units sichtbare Variablen/Fs/Ps/props}
      property wertvonx read getwertvonx write setx;
  end;

  [...]

procedure tzahl.setx(setxto:integer);
begin
  x:=setxto;
  //Aktion wenn X geschrieben wird (labels verändern etc)
end;   

function tzahl.getwertvonx:integer;
begin
  result:=x;
  //Aktion wenn x ausgelesen wird
end;