Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.05;
Скачать: CL | DM;

Вниз

Помогите пожалуйста!   Найти похожие ветки 

 
Man-In-Red ©   (2002-07-23 20:22) [0]

Как можно программно проверить, есть ли на каком-то прямоугольном отрезке изображения загруженном в Image, точка определенного цвета, допустим красная?


 
Man-In-Red ©   (2002-07-23 21:30) [1]

Мастераааааа, помогите пожалуйста мне, пожалуйста…


 
TTCustomDelphiMaster ©   (2002-07-23 22:10) [2]

Canvas.Pixels


 
Man-In-Red ©   (2002-07-23 22:43) [3]

Это я понимаю, но все никак не могу сделать быстренький алгоритм поиска красной точки в определенной прямоугольной области на картинке в Image…
Помогите пожалуйста, нужно очень


 
Dmk ©   (2002-07-24 01:45) [4]

VCL Reference
ScanLine, Height example

procedure TForm1.Button1Click(Sender: TObject);

// This example shows drawing directly to the BitMap
var
x,y : Integer;
BitMap : TBitMap;
P : PByteArray;
begin
BitMap := TBitMap.create;
try
BitMap.LoadFromFile("C:\Program Files\Common Files\Borland Shared\Images\Splash\256color\factory.bmp");
for y := 0 to BitMap.Height -1 do
begin
P := BitMap.ScanLine[y];
for x := 0 to BitMap.Width -1 do
P[x] := y;

end;
Canvas.Draw(0,0,BitMap);
finally
BitMap.Free;
end;
end;
//...
Так вот. У TImage тоже есть битмап.

P := MyImage.Picture.Bitmap.ScanLine;
NeedColor := P[x];



Страницы: 1 вся ветка

Текущий архив: 2002.08.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.007 c
6-13744
Shadow[LF]
2002-05-23 11:35
2002.08.05
игровой сервер на pop3


6-13763
kettle
2002-05-13 21:25
2002.08.05
О портах NMEcho.


1-13614
Freeze
2002-07-25 07:08
2002.08.05
Масштаб картинки TImage


8-13725
novicer
2002-03-30 12:44
2002.08.05
как запрограммировать такую штуку


3-13533
UserL
2002-07-15 13:42
2002.08.05
Как закинуть тип DataTime?