Переключатель(delphi)

[Brabus]

и для чего это

[Brabus]

мне надо вот что
клик на форме -> запись х и у в edit1 и edit2 -> клик на форме -> запись х и у в edit3 и edit4 -> клик на форме -> запись х и у в edit1 и edit2 -> и так дальше

[Пепел Феникса]

может не стоит делать велосипед на квадратных колесах?
переход через TAB итак есть
мой код по каждому щелчку по форме переводит фокус ввода следующему Эдиту

[Brabus]

я рисую прямую через алгоритм брезенхема. мне для удобства нужно чтобы я нажал на форму - это будет начальная точка, еще раз нажал - это будет конечная точка.

[Пепел Феникса]

а причем тут координаты и Эдиты?

[Brabus]

мне препод сказал построить линию по координатам алгоритмом брезенхейма, координаты можно вводить в эдиты

[Brabus]

в эдитах всё работает, но я хочу для себя сделать чтобы по кликам запоминались координаты начала и конца линии

[Brabus]

я разобрался Пепел Феникса, спасибо Вам за внимание

[Пепел Феникса]

тогда так
(пишу содержимое обработчика)

if Form1.Tag=0
 then begin
         Edit1.Text:=IntToStr(X);
         Edit2.Text:=IntToStr(Y);
         Form1.Tag:=1;
        end
 else begin 
         Edit3.Text:=IntToStr(X);
         Edit4.Text:=IntToStr(Y);
         Form1.Tag:=0;
        end;

вместо Form1.Tag можно использовать любую глобальную переменную(булеву или число)