Рисование на форме

[niva622]

как нарисовать крест на форме Delphi.Вы немогли бы мне скинуть готовый код Delphi (Крест) с подробным описанием.Пожалуйста я очень хочу научиться многому в Delphi.Я мучился минут 40 нечего неполучилось.

[merax]

unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
procedure FormPaint(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormPaint(Sender: TObject);
begin
Form1.Canvas.MoveTo(350, 430);// вертикальная
Form1.Canvas.LineTo (350, 10);// линия
Form1.Canvas.MoveTo(600, 220);// горизонтальная
Form1.Canvas.LineTo(100, 220);//линия
end;
end.
// Устроит ???

[zetrix]

niva622 вы уже вроде задавали этот вопрос... Вас не устроил ответ Virtson-a?

[Virtson]

Сообщение от niva622

Пожалуйста я очень хочу научиться многому в Delphi.Я мучился минут 40 нечего неполучилось.

))
как именно ты мучился ?
что нарисовалось то ..

[Prowler]

Сообщение от niva622

как нарисовать крест на форме Delphi.Вы немогли бы мне скинуть готовый код Delphi (Крест) с подробным описанием.Пожалуйста я очень хочу научиться многому в Delphi.Я мучился минут 40 нечего неполучилось.

Одному мученику создали крест, а потом на нём распяли... Учитесь на ошибках