W
Ich habe übrigends die Formel von xontec ausprobiert und es funktioniert.
Einfach aus Spass am probieren:
class TForm1 : public TForm
{
__published: // Von der IDE verwaltete Komponenten
void __fastcall FormMouseMove(TObject *Sender, TShiftState Shift,
int X, int Y);
private: // Anwender-Deklarationen
public: // Anwender-Deklarationen
double x1,y1;
__fastcall TForm1(TComponent* Owner);
};
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
x1=10,y1=10;
}
void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift,
int x2, int y2)
{
Canvas->MoveTo(x1,y1);
Canvas->LineTo(x2,y2);
Caption=sqrt(pow((x1-x2),2)+pow((y1-y2),2));
}
Ich setzte da lieber darauf, das die meistens doch noch Lernbereitschaft besitzen
Genau, das sehe ich auch so, akari.
Wir waren alle mal Anfänger, nur gab es das herrliche internet noch nicht.
Heute beschafft man sich einen Teil seines Wissens eben so.
CFR
