[unity]

помогите пожалуста
хочу написать прогу в 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
зарание спасибо

[unity]

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

вот понял что для эмуляции нажатия иотпускания надо юзать SimulateKeystroke()
тока как это всё оформлять

[angvelem]

Эх, если бы всё выше изложенное да на более понятном русском языке, то и помочь было бы легче.

[unity]

дайте код кликера на delphi
самого простого который просто жмёт одну кнопку (например кнопку F3) с интервалом в 1 секунду

я посмотрю и буду задавать вопросы по тем аспектам которых я непонял

мне тут писали:

Код:

procedure SimulateKeyDown(Key : byte); 
begin 
 keybd_event(Key, 0, 0, 0); 
end; 

procedure SimulateKeyUp(Key : byte); 
begin 
 keybd_event(Key, 0, KEYEVENTF_KEYUP, 0); 
end; 

я вставил в delphi 7 и нечё у мя незаработало
мне надо посатреть хоть как там что оформлять

[angvelem]

Дали процедуры, а кто их будет вызывать? Вызывай их хотя бы по таймеру.
P.S. Даже в таком случае визуального результата видно не будет.

[unity]

во у мя когда открываеш delphi такой код по умолчанию:

Код:

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.

вопрос куда мне эти процедуры пихать?

какя вобще структура кода должна быть?