Einzelnen Beitrag anzeigen

Redeemer

Registriert seit: 19. Jan 2009
Ort: Kirchlinteln (LK Verden)
1.018 Beiträge
 
Delphi 2009 Professional
 
#2

AW: Zeichnung zu einer classe, vererbung

  Alt 4. Dez 2021, 11:16
Guten Tag Community.

Ich bin noch recht neu in der Umschulung und habe leider ein kleines Problem.
Mein Programm sieht folgendermaßen aus :

ich habe 3 Edit Felder, 1 Button, 1 Image.
im ersten Edit soll eine Artikelbezeichnung eingegeben werden.
im 2en das Anfangsdatum und im dritten das Enddatum.

sobald ich auf den Button drücke soll sich durch das Datum(das mit den pixelwerten hinterlegt ist wie z.b 01.01.2021 = pixel1.1) ein Rechteck gezeichnet werden.
Man würde für die Eingabe eines Datums kein TEdit nehmen sondern Delphi-Referenz durchsuchenTDateTimePicker. Der hat dann eine Eigenschaft Date. Wenn man unbedingt ein TEdit nehmen möchte, kann man mit Delphi-Referenz durchsuchenStrToDateTime einen String zu einem TDateTime/TDate/TTime/Double (alles dasselbe) konvertieren.
In der Delphi-Referenz durchsuchenDateUtils-Unit gibt es einige Sachen wie Delphi-Referenz durchsuchenMonthOf und Delphi-Referenz durchsuchenDayOf, die dir helfen werden, auf der Canvas das Rect zu zeichnen.

Nun möchte ich aber nicht nur eine Zeichnung sondern dass, das Rechteck auch als Object über eine Unit vererbt wurde und ich durch das Datum die x1 und x2 Position ändern kann nach belieben. aber auch so viele Rechtecke erzeugen kann wie ich möchte die ich per Klicken und Mousemove dann auch verschieben kann.
Das ergibt keinen Sinn. Für Vererbung müsste es zwei Klassen geben, eine Eltern- und eine Kindklasse. Ich sehe hier überhaupt keine Klasse. Benenne doch erstmal die beiden Klassen.
Janni
2005 PE, 2009 PA, XE2 PA
  Mit Zitat antworten Zitat