![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Ошибка в procedure ... message
Dosian © (2007-06-13 05:52:00)Помогите пожалуйста с проблемой!
То ли я туплю, то ли хрен его знает, что это такое!
Например пишу...
.....
private
procedure WMWindowPosChanging(var msg: TWMWindowPosChanging); message wm_WINDOWPOSCHANGING;
public
.....
Выдаёт ошибку : [Error] Unit1.pas(49): Undeclared identifier: 'public'
Иными словами, после вставки message выдаёт ошибку синтаксиса!
Vladimir Kladov (2007-06-13 20:51:00) [1]Зачем же сразу книгу, это и в FAQ написано.
=BuckLr= (2007-06-13 13:42:00) [2]
> Это вопрос???
Нет, совет :)
MTsv DN (2007-06-13 13:34:00) [3]> Да. А мессагу вешать на форму, к примеру
Это вопрос??? Тогда:
function TForm1.Form1Messege(...): boolean;
begin
Result := false;
if Msg.message = wm_WINDOWPOSCHANGING then
begin
...
Result := true;
end;
end;
И...читайте homm'a:
Вопрос по КОЛ? Читать книгу и глупостей не спрашивать. Вомоему вовсех местах, где можно написано, что в КОЛ нет классов.
=BuckLr= (2007-06-13 11:09:00) [4]Да. А мессагу вешать на форму, к примеру
homm (2007-06-13 05:55:00) [5]Вопрос по КОЛ? Читать книгу и глупостей не спрашивать. Вомоему вовсех местах, где можно написано, что в КОЛ нет классов.