Показать сообщение отдельно
  #1  
Старый 14.07.2011, 21:15
unity unity вне форума
Прохожий
 
Регистрация: 14.07.2011
Сообщения: 43
Репутация: -2279
По умолчанию создание программы

помогите пожалуста
хочу написать прогу в delphi 7
а как незнаю в школе учили тока в паскале абс=)

вот это полу паскаляСловестный код программы:
Код:
program unity
var
c,n:real;
r:integer;
begin
тут код праграмки которая узнаёт цвет пикселя который
находиться под курсором мышки в момент нажатия и записыват код цвета
в переменную: с;
r:=1;
while r=1 do  //если верно то цикл делаеться, сделал так чтоб программа работала всегда
 while n=c do // будет ждать пока неизмениться цвет пикселя
  begin
  тут код програмы который узнаёт какой щас цвет у того пикселя (на который раньше
  кликнули мышкой) и записывает в переменную: n;
  end;
  while n<>c do //когда цвет пикселя изменился будет жать до тех пор пока он нестанет такимже
  begin
  тут код програмы который узнаёт какой щас цвет у того пикселя (на который раньше
  кликнули мышкой) и записывает в переменную: n;
  тут код програмки которая жмёт на кнопку (например на F1)
  end;
 end;
end.

вот описание программы которая мне нужна:
программы жмёт на какуюто кнопку(например F1) (желательно чтоб эту кнопку можно было выбрать в окне программы , но можно и даже лучше чтоб жала то что праписано в её коде (так я быстрей мб пойму что там и кчему)) жмёт до тех пор пока у задоного пикселя цвет изменён (т.е
цвет пикселя отличаеться от того цвета который бал раньше)
как тока цвет стал такойже програма перестаёт жать до тех пор пока цвет неизмениться сново

желательно поподробней объяснить как такое сделать в delphi
зарание спасибо
Ответить с цитированием