Очень смешно. Тут курсач горит )))
Так будет правильно или нет?
прямоугольник с линиями - "вызов процедуры или ф-ии"
Код программы такой.
Цитата:
procedure TForm1.Button1Click(Sender: TObject);
begin
With image1.Canvas do Begin
Brush.Color:=clWhite;
Pen.Color:=clBlack;
image1.canvas.Rectangle(50,50,450,300)
End;
end;
end.
|