VPF::константы сообщений - Форум программистов

lebaon

Дата 5.4.2006, 17:23 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 36
Регистрация: 10.3.2006

Репутация: нет
Всего: нет

возникла такая проблема
нужно сделать окно на winapi
беру пример,
там такая оконная ф-ия

Код


 case msg of
  wm_destroy :
    Begin
     postquitmessage(0); exit;
     Result:=0;
    End
 
   else Result:=0;{поставил сам, так надо}
  end;

пускаю, работает,
нужно обрабатывать такие сообщения, как
wm_paint
wm_create
делаю так

Код



  case msg of
  wm_destroy :
    Begin
     postquitmessage(0); exit;
     Result:=0;
    End

  wm_paint :
  begin
  end
   else Result:=0;
  end;

пишет, что
[ E2066 Missing operator or semicolon
что делать? smile

делфи 2005

Yanis

Дата 5.4.2006, 17:29 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 72
Всего: 111

Это значит, что у тебя пропущена точка с запятой где то в коде.

Это сообщение отредактировал(а) Yanis - 5.4.2006, 17:30

--------------------

*щёлк*

Romikgy

Дата 5.4.2006, 17:29 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 26
Всего: 146

uses Windows;

--------------------

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

_hunter

Дата 5.4.2006, 17:30 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 15
Всего: 98

кажись последний else не в тему
+ зачем эти begin/end?
++ почитай книжку про оператор выбора...

--------------------

Tempora mutantur, et nos mutamur in illis...

Moskalev

Дата 5.4.2006, 17:33 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 2.4.2006
Где: Академгородок

Репутация: нет
Всего: нет

Зачем нужны пустые Begin End?

Может просто сделать так:

Код


case msg of
  wm_destroy :
    Begin
     postquitmessage(0); exit;
     Result:=0;
    End;

  wm_paint : {Действие для события};

  else Result:=0;
end;

Наверное уже опоздал?

Это сообщение отредактировал(а) Moskalev - 5.4.2006, 17:46

Snowy

Дата 5.4.2006, 18:01 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

Цитата(lebaon @ 5.4.2006, 17:23

)

Begin
postquitmessage(0); exit;
Result:=0;
End

точку с запятой после End забыл.

lebaon

Дата 5.4.2006, 19:41 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 36
Регистрация: 10.3.2006

Репутация: нет
Всего: нет

тьфу, блин, действительно ; не хватало, не заметил smile

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »