Einzelnen Beitrag anzeigen

pagan1900

Registriert seit: 27. Mär 2006
25 Beiträge
 
#2

problemstellung Zeichnen der lösung umformuliert

  Alt 4. Jun 2006, 19:26
Ich habe folgendes problem
Ich möchte den inhalt eines Arrays Grafisch dastellen

gegeben ist ein Vorgängerpfeilarray, in dem sind alle vorganger knoten gespeichert und zwar so

Arrayspeicherplatz |1|2|3|
|3|0|0|

ich benöige ja 2 punkte um eine linie zu zeichnen!
Die Knotenkoordinaten selbst hab ich in 2 arrays abgespeichert Kx,Ky

Ich hatte mir dies wie folgt gedacht
Da locali von 1-n geht(wobein di anzahl der im graphen vorkommenden knoten dastellt)
das ich dann
Delphi-Quellcode:
 procedure TfrmUebung.Button4Click(Sender: TObject);
  var locali:integer;
      x1,x2,y1,y2:integer;
  begin
    for locali:=1 to n do
     begin
       x1:=kx[locali];
       y1:=ky[locali];
       x2:=kx[pre[locali]];
       y2:=ky[pre[locali]];
       Algo_loesung_dastellen(imgGraph,x1,x2,y1,y2,KRadius,Offset);
     end
  end;
nur das klappt leider nicht und es kommt das hier dabei herraus(siehe anhang, aber wieso??
und wie kann ich es verhinder, dass er die pfeile zeichnet die keine vorgaenger haben
Miniaturansicht angehängter Grafiken
problem_133.jpg  
  Mit Zitat antworten Zitat