Zeilen Erklären

[Zeb22]

Moin,
hab da ein Problem

Und zwar würde ich gerne detailiert erklärt bekommen was Pen, Brush und Rectangle genau bedeutet bzw wie man es am besten erklären kann.

Vielen Dank für eure Antworten

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);  // Procedure für die Form
var
 i: Integer;
 j: Integer;
 w: Integer;
begin
 if image1.Width = image1.Height then
 begin
 image1.Canvas.Pen.Color:=clBlack;
 image1.Canvas.Brush.Color:=clWhite;
 image1.Canvas.Rectangle(0,0,image1.Width,image1.Height);
 image1.Canvas.Brush.Color:=clBlack;

[Dunkel]

Pen = Stift
Brush = Pinsel
Rectangle = Rechteck

Sonst noch Fragen? :wink:

[mr_emre_d]

Pen: - Stift
Ist eine Klasse die bestimmte Eigenschaften hat.
Pen.Color; Pen.Style; ...

Brush: - Bürste / Pinsel
Siehe Pen!

Rectangle:
Mit dieser Procedure kannst du ein Rechteck mit der Füllfarbe Brush.Color und Eckenfarbe Pen.Color zeichnen

:P

EDIT: Mist. Da war einer schneller

MfG

[jaenicke]

Schau einmal hier:
http://www.delphiseiten.de/lex11/lex1101.html
http://www.delphiseiten.de/lex11/lex1102.html
Da wird das alles sehr ausführlich erklärt.

Die Delphi-Hilfe (F1) sollte aber auch ganz gut helfen...

[Jens Hartmann]

Zitat:

Schau einmal hier:
http://www.delphiseiten.de/lex11/lex1101.html
http://www.delphiseiten.de/lex11/lex1102.html
Da wird das alles sehr ausführlich erklärt.

Ne schöne Seite, werde ich auch mal durcharbeiten.

[Zeb22]

Hey Danke für die Links, gute infos.

Könnt ihr mir vielleicht in Knappen wörter die Abläufe der 4 Zeilen mal ganz genau erklären.

Ich blick nicht durch warum am Anfang gezeichnet wird und dann unterschiedliche die 2 Farben gemalt werden. Sorry Blick da noch nicht ganz durch

[mkinzler]

Steht doch in #3

[Jens Hartmann]

Mit der einen Zeichnest du den Rahmen und mit der anderen füllst du das Rechteck

[jaenicke]

Ich verstehe vor allem den Sinn dieser Zeile bei dir nicht:

Delphi-Quellcode:

if image1.Width = image1.Height then

Die Ausmaße des Images legst du doch selbst fest, also was bringt es diese in FormCreate abzufragen?

[Zeb22]

Wenn die Formcreate wird geht es los. Warum sollte ich es nicht in Formcreate packen? hm :?: