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

Вниз

Как в масив добавить результат полученный с анализа изображения?   Найти похожие ветки 

 
DoktorX   (2006-11-17 01:23) [0]

Я делаю так

for i:=0 to 5 do
{*}  begin
{*}  Temp.Picture.LoadFromFile(ExtractFilePath(Application.Exename)+"22\"+InttoStr(i)+".bmp");
{*}  for x:=0 to mask_width-1 do
{*}  for y:=0 to mask_height-1 do
{*}  if Temp.Canvas.Pixels[x,y]=clblack then
{*}  begin
{*}  masks[i]:=masks[i]+1;
{*} end
{*}  else masks[i]:=masks[i]+0;


 
DoktorX   (2006-11-17 01:24) [1]

по иделии masks[0]=0000000001111111110000000000111111


 
Джо ©   (2006-11-17 01:25) [2]

>Как в масив добавить результат полученный с анализа изображения?
masks[i]:=masks[i]+1;

Это разве не оно самое?


 
Германн ©   (2006-11-17 01:26) [3]

Переведи на русский. Что нужно. Простыми словами, пож-сста.


 
RASkov   (2006-11-17 01:49) [4]

> по иделии
тут и в самом деле не совсем понятно...
может masks нужен такой masks: array [0..5, mask_width, mask_height);
if Temp.Canvas.Pixels[x,y]=clblack then masks[i, x, y]:=1 else masks[i, x, y]:=0;


 
MikePetrichenko ©   (2006-11-17 06:37) [5]

Что-то темы зачастили про массивы и мемо.
может стоит литературы по языку почитать?
А мемо, по-моему, пора в культовый компонент возводить. Памятники ему ставить...



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

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

Наверх




Память: 0.47 MB
Время: 0.058 c
6-1153152312
cando
2006-07-17 20:05
2006.12.03
слежка за портом


15-1163498467
DelphiN!
2006-11-14 13:01
2006.12.03
Перенос Delphi6 на другой компьютер


15-1163158307
Андрей ББББ
2006-11-10 14:31
2006.12.03
проблемы с Windows XP


2-1163846665
Youngkoder
2006-11-18 13:44
2006.12.03
TStrings


2-1163785251
ProgRAMmer Dimonych
2006-11-17 20:40
2006.12.03
Опять торможу. Какая функция в Turbo Pascal отвечает...