Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 25.03.2018, 16:07   #1
Palamida
 
Регистрация: 09.11.2017
Сообщений: 9
По умолчанию как сделать чтобы при открытии формы на image рисовалась линия

помогите пожалуйста. у меня на форме есть image. как сделать чтобы при открытии формы на image рисовалась допустим линия. без использования кнопок. можно так сделать?
Palamida вне форума Ответить с цитированием
Старый 25.03.2018, 19:53   #2
Pavia
Лис
Старожил
 
Аватар для Pavia
 
Регистрация: 18.09.2015
Сообщений: 2,409
По умолчанию

Можно. К примеру так.

Код:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls;

type
  TForm1 = class(TForm)
    Image1: TImage;
  private
    { Private declarations }
  public
    procedure AfterConstruction; override;
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

{ TForm1 }

procedure TForm1.AfterConstruction;
begin
  inherited;
  Image1.AutoSize:=True;
  Image1.Picture.Bitmap:=TBitmap.Create;
  Image1.Picture.Bitmap.Width:=300;
  Image1.Picture.Bitmap.Height:=300;
  Image1.Canvas.MoveTo(50,50);
  Image1.Canvas.LineTo(250,250);
end;

end.
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
У дзен программиста программа делает то что он хотел, а не то что он написал .
Pavia вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
как сделать так, чтоб при открытии формы она считывала информацию из строки Kizim Microsoft Office Excel 2 27.07.2017 13:03
Как сделать чтобы при создании формы происходило 2 события? artbotva Общие вопросы Delphi 7 06.05.2012 18:27
Как сделать чтобы при открывании второй формы и закрытия основной не пропадал значок на таскбаре? TwiX Общие вопросы Delphi 2 10.09.2009 20:57
как сделать так чтобы при открытии второй формы олько она была активной doncova1 Общие вопросы Delphi 2 03.02.2007 19:34