Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

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

Автор: lebaon 5.4.2006, 17:23

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

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

Автор: Romikgy 5.4.2006, 17:29

uses Windows;

Автор: _hunter 5.4.2006, 17:30

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

Автор: Moskalev 5.4.2006, 17:33

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

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

Код


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

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

  else Result:=0;
end;

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

Автор: Snowy 5.4.2006, 18:01

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

)

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

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

Автор: lebaon 5.4.2006, 19:41

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