необходимо разьяснение действий

[DeepPurple]

мне необходимо разобраться что для чего и как действует( а главное что значит)

const
  WM_CLICKBN=WM_USER+1;
.....................
 public
    procedure ButtonClick(Sender: TObject);
    procedure WMCLICKBN(var M: TMessage); message WM_CLICKBN;
......................
procedure TForm1.ButtonClick(Sender: TObject);
begin
  PostMessage(Form1.Handle,WM_CLICKBN,Integer(Sender),0);
end;
......................
procedure TForm1.WMCLICKBN(var M: TMessage);
var
  bn: TButton;
  i: Integer;
begin
  bn := TButton(M.WParam);
  if not (bn is TButton) then Exit;
  for i := 0 to High(BA)-1 do
  begin
    if BA[i]=bn then
    begin
      Move(BA[i+1],BA[i],SizeOf(TButton)*(High(BA)-i));
      Break;
    end;
  end;
  SetLength(BA,High(BA));
  FreeAndNil(bn);
end;

я хочу разобраться что это за метод, класс или ** что
PostMessage(Form1.Handle,WM_CLICKBN ,Integer(Sender),0);
и как он работает(насколько я знаю это перехватчик сообщений но хотелось бы поподробней) хотелось бы узнать что значит каждый параметр в данной строчке,
зачем( и что делает)
procedure WMCLICKBN(var M: TMessage); message WM_CLICKBN;
и зачем заводится константа( да еще и равная какой то другой константе которая не обьявлена).

[mihali4]

Общий подход - ставим курсор на непонятное слово и жмем заветную пимпу F1. Подробнее и точнее, чем это сделали разработчики из Борланда в штатном хэлпе, объяснить будет трудно...

Буквосочетание "ХЗ" расценивается как скрытый мат и карается баном. На первый раз прощаю...

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

я хочу разобраться что это за метод, класс или ** что
PostMessage(Form1.Handle,WM_CLICKBN ,Integer(Sender),0);
и как он работает(насколько я знаю это перехватчик сообщений но хотелось бы поподробней) хотелось бы узнать что значит каждый параметр в данной строчке,

насмешили
это функция посылки сообщения окну, без ожидания ответа.
параметры:
1)Хендл окна которому будем слать сообщение
2)сообщение(его цифренное обозначение)
3)первый(wParam)параметр сообщения
4)второй(lParam)параметр сообщения

зачем( и что делает)
procedure WMCLICKBN(var M: TMessage); message WM_CLICKBN;

процедура обработки этого события.

и зачем заводится константа( да еще и равная какой то другой константе которая не обьявлена).

для обозначения нового типа сообщений.
(и кто тут не обьявлен? WM_USER константа из модуля messages)

еще вопросы, пока я добрый?

[DeepPurple]

большое спасибо, получается что при нажатии на кнопку окну формы отсылается сообщение, как только сообщение message WM_CLICKBN; будет получено включается процедура WMCLICKBN. которая используя первый параметр (wParam)=Integer(Sender) являющийся так сказать ссылкой на кнопку, ищет данную кнопку в массиве.
задам вот такой вопрос:
что такое хендл окна? и можно ли отправлять сообщение какому либо компоненту а не форме?
где указано что procedure WMCLICKBN(var M: TMessage); message WM_CLICKBN; это процедура именно обработки события поступления сообщения?

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

хендл это дискриптор окна(описатель)
запомните окно это необязательно форма
дескриптор имеют например многие классы компонентов формы(Едиты, мемо, баттоны и тд)

да это процедура которая выполнится именно при поступлении сообщения message WM_CLICKBN

[Neeter]

можно ли отправлять сообщение какому либо компоненту а не форме?

Для этого существует метод Perform
http://www.delphisources.ru/pages/fa...rm_method.html

что такое хендл окна?

Handle - это число - уникальный идентификатор окна в системе.
Ссылка с которой взял определение

[DeepPurple]

на данный момент это все что я хотел узнать, спасибо=)

[virtuhay266]

Меня учили, что break - это не хорошо.

[vovk]

Сообщение от virtuhay266

Меня учили, что break - это не хорошо.

а почему нехорошо не говорили?

[Stilet]

а почему нехорошо не говорили?

по той же причине что и отках от GOTO - деструктуризация и усложнение анализируемости кода )
Впрочем это на вкус разработчика...