Hilfe bei Projekt mit Koordinaten

[hamsterchen]

Hallo!

Ich hätte da mal ein Problem :cry: und zwar muss ich ein Porgramm programmieren, welches beispielsweise ein Rechteck oder Quadrat zeichnet, indem ich ihm Koordinaten dafür gebe. Das alles soll natürlich oop sein und mit Delphi. Es sollte auch möglichst einfach sein, damit ich da auch durchblicke!

Wäre echt lieb! :)

[dfried]

Hallo erstmal,

bitte ändere erst mal den Titel deines Posts, "Hilfe" braucht hier fast jeder!!!
Wo hast du konkret Probleme bzw. was hast du bsher schon versucht um dein Problem zu lösen?

Nur als Hinweis: Fertige Programme bekommst du hier vermutlich keine geschrieben :)

[Bernhard Geyer]

Frage: Ist es 'ne Hausaufgabe?

Falls ja: Hier werden keine Hausaufgaben für dich erledgt. Da mußt du schon etwas mehr Engagement an den Tag legen und genauer sagen wo du Probleme hast damit wir dir Tipps geben können.

[hamsterchen]

Neee, das habe ich auch nicht erwartet :)
Ich hab nur keine Ahung wie, also mit was ich dass denn am besten machen kann. Ich kenne eben kaum Befehle und hab keine Ahnung wie ich dann auf die Koordinaten zugreifen kann!

Nein es ist keine Hausuafgabe, sondern eine Übung für die Schule!

[Ferber]

Sagt Dir TPoint was ? :gruebel:

[hamsterchen]

Ähm nein, aber vielleicht ja bald :)

[Khabarakh]

Im SDK gibt es einen wunderbaren Überblick über den Graphics-Namespace und einen "Getting Started"-Teil.

[Bernhard Geyer]

Für den Anfang nimmst Du einfach 'ne TPaintBox und fügst in's OnPaint-Event folgenden Code ein:

Delphi-Quellcode:

  PaintBox1.Canvas.Brush.Color := clRed;
  PaintBox1.Canvas.FillRect(Rect(10, 10, 100, 100));

Anschließend kannst Du Edit-Controls hinzufügen und die Koordinaten für Rect(....) aus Text der Edit-Controls füllen lassen. Anschließend spielst du etwas mit den Properties von Canvas.Brush herum um zu sehen welche möglichkeiten du hast. Ich denke wenn du kapierst was hier passiert kannst du dein Programm verbessern.

[hamsterchen]

ok danke! werd das gleich mal ausprobieren! :coder:

[Khabarakh]

Hmm, scheint doch kein .Net-Thema zu sein :stupid: .

[Ferber]

Dann brauchst Du nur mehr Eingabefelder (TEdit) und schon ist der ganze Zauber fertig.
Such auch mal in der OH (TPoint, TRect, Line ...).
Um die Eingabe als Zahl zu kriegen, musst Du sie noch in Integer umwandeln.

Delphi-Quellcode:

x:=StrToInt(Edit1.Text)

:gruebel:
@Khabarakh: :stupid:

[Bernhard Geyer]

Zitat:

Zitat von Khabarakh

Hmm, scheint doch kein .Net-Thema zu sein :stupid: .

Oder "nur" VCL.NET.

[Khabarakh]

Zitat:

Zitat von Bernhard Geyer

Zitat:

Zitat von Khabarakh

Hmm, scheint doch kein .Net-Thema zu sein :stupid: .

Oder "nur" VCL.NET.

Wenn das an einer deutschen Schule gelehrt wird, sind unsere Kultusminister endgültig verrückt :stupid: .

@hamsterchen: Für den OOP-Aspekt könntest du z.B. so eine Grundklasse entwerfen:

Delphi-Quellcode:

type
  TFigur = class
  public
    procedure Paint(ACanvas: TCanvas); virtual; abstract;
  end;