Strich in 2ten Formular

[svern]

Hey,

ich versuche gerade krampfhaft einen Strich in meinem 2ten Formular (erst später sichtbar) zu erzeugen.... natürlich klappt es nicht.

Habe in einer Prozedur diesen Quellcode:

Delphi-Quellcode:

 canvas.pen.color:=clred;
               LINKS:=(80+((Akt_KNOTEN -1)*96));    // Ausgangsknoten
               OBEN:=(Y_Werte[Akt_KNOTEN] + 8);     // Ausgangsknoten
               Form2.Canvas.Moveto(LINKS,OBEN);
               ZL:=(((KN_Zielknoten[Akt_KNOTEN]-1)*96)-6); // Zielknoten
               ZO:=(Y_Werte[KN_Zielknoten[Akt_KNOTEN]] +8);
               Form2.Canvas.Lineto(ZL,ZO);

Doch wenn ich dann nach ablauf der Prozedur diese Formular ansehen will (Form2.showmodal), dann ist der Strich nicht da...
weiß jemand warum nicht???
Wie bekomme ich meine Striche?