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;