Variablen Verwendung

[Mb123]

danke erstmal an Muetze1 ! (:

Delphi-Quellcode:

var
  Form1: TForm1;
  q:integer;

  Type
  TVektor = Record
    a, b, c: Integer
  End;

Var
  aVektor: TVektor;
  bVektor: TVektor;
  cVektor: TVektor;
implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin

  aVektor.a := 1;
  aVektor.b := 0;
  aVektor.c := 160;

  bVektor.a := 0;
  bVektor.b := 1;
  bVektor.c := 7;

while aVektor.a <> 0 do
begin

q:= bVektor.c DIV aVektor.a;


end;

end;

end.

So meintest du das doch oder ? ich hab nur noch nich so ganz verstanden wie du das mit der funktion meinst ? kann man dann nachher den kompletten vektor einem anderen vektor zuweisen ?
ich hab noch nie so richtig mit records und so gearbeitet, deswegen bin ich da nich so fit !
wenn du mir das nochmal etwas erklären könntest mit der funktion wär das spiitze !