Где Расположить Пиксель?

02.06.2014
10
0
#1
Доброго дня! Написано На примере ниже мы зададим черный цвет пикселю с координатами (10,20):
PHP:
Canvas.Pixels[10,20]:=clBlack;
Дельфи уже сгенирировала код. Где на нем расположить пиксель?
PHP:
unit Unit1; 

interface 

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

type 
TForm1 = class(TForm) 
private 
{ Private declarations } 
public 
{ Public declarations } 
end; 

var 
Form1: TForm1; 

implementation 

{$R *.dfm} 

end.
 

Vadik(R)

Well-known member
12.12.2007
469
0
#2
Придумать либо обработчик события - к примеру, поместить на форму кнопку и сделать действие по нажатию на неё (событие OnFormCreate - не прокатит, результата не увидишь), и там уже задать внутри него пиксель:
Код:
unit Unit1;

interface

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

type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Canvas.Pixels[10, 20] := clBlack;
end;

end.