Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Problem beim zeichnen von N-Ecken (https://www.delphipraxis.net/97333-problem-beim-zeichnen-von-n-ecken.html)

Tommy0014 8. Aug 2007 23:31


Problem beim zeichnen von N-Ecken
 
Also ich hab erst vor kurzem angefangen delphi zu lernen und wollte ein N-Eck zeichnen mit Canvas.Polygon nun ist mein Problem ich weis net wie ich die Punktdaten eingeben kann? dann hab ich des so eigegeben wie ich es in einer anleitung in google gefunden hab Canvas.Polygon(Point1(150,350), Point2(450,350), Point3(300,200)); nun kam die fehlermeldung
[Fehler] Zeichnen_fuer_Anfaenger33.pas(94): Undefinierter Bezeichner: 'Point1'
[Fehler] Zeichnen_fuer_Anfaenger33.pas(94): Zu viele Parameter
[Fehler] Zeichnen_fuer_Anfaenger33.pas(94): Zu viele Parameter

ich habs dann auch als konstante freischalten wollen ging aber nicht weil ich net weis was ich schreiben muss.. ich habs so geschrieben
Delphi-Quellcode:
const
         Max = 3;
         Points: Array[o..Max] of TPoint = ???
und da komm ich nicht weiter weis jmd was ich da schreiben müss?

danke schonmal im vorraus

mfg
tommy

3_of_8 9. Aug 2007 00:13

Re: Problem beim zeichnen von N-Ecken
 
Delphi-Referenz durchsuchenPoint() ist eine Funktion. TCanvas.Polygon erwartet ein Array. Daher geht das in etwa so:

Delphi-Quellcode:
Canvas.Polygon([Point(150,350), Point(450,350), Point(300,200)]);
Ein konstantes Array deklariert man so:
Delphi-Quellcode:
const <name>: array[<low>..<high>] of <type> = (<value0>, <value1>, ...);
In deinem Fall also in etwa sowas:

Delphi-Quellcode:
const points: array[0..2] of TPoint = ((X=150, Y=350), (X=450, Y=350), (X=300, Y=200));
Kann sein, dass du noch die Kommata durch Semikola ersetzen musst, aber so ungefähr dürfte das passen.

Tommy0014 9. Aug 2007 00:29

Re: Problem beim zeichnen von N-Ecken
 
jop jetzt gehts vielen dank :thumb: :thumb: :thumb:


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:47 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz