Главная страница
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.008 c
1-13649
Skif
2002-07-23 12:11
2002.08.05
Файлы и папки


8-13735
SPeller
2002-03-28 07:51
2002.08.05
Из JPEG в BMP


1-13652
DKalinin
2002-07-23 13:05
2002.08.05
Подскажите, пожалуйста, как получить список файлов в директории.


1-13619
eruc
2002-07-22 18:08
2002.08.05
Создаем XML-файл


1-13632
dimanew
2002-07-23 06:49
2002.08.05
Как в DBGride сделать подсветку одной строки например на 2 сек?