Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 06.11.2015, 17:59   #1
S_007
Форумчанин
 
Регистрация: 22.11.2014
Сообщений: 109
По умолчанию

Не могу подружить Дата Модуль с диалоговым окном
ошибки:
Цитата:
[DCC Error] Data_Modul.pas(285): E2003 Undeclared identifier: 'MessageBox'
[DCC Error] Data_Modul.pas(285): E2003 Undeclared identifier: 'Handle'
[DCC Error] Data_Modul.pas(285): E2003 Undeclared identifier: 'MB_YESNO'
[DCC Error] Data_Modul.pas(285): E2003 Undeclared identifier: 'MB_ICONWARNING'
[DCC Error] Data_Modul.pas(285): E2003 Undeclared identifier: 'MB_APPLMODAL'
[DCC Error] Data_Modul.pas(287): E2003 Undeclared identifier: 'IDYES'
[DCC Error] Data_Modul.pas(289): E2003 Undeclared identifier: 'IDNO'
Как это объявить?

Код:
procedure TDM.ADOTable3BeforeEdit(DataSet: TDataSet);
var r:integer;
  begin
    r := MessageBox(Self.Handle, PChar('Sie sind im Bezug einen vom Artz nicht gepr
               оften Bericht zu löschen! Jetzt löschen?') ,
         PChar('Mamma-Script'), MB_YESNO + MB_ICONWARNING + MB_APPLMODAL);
     case r of
          IDYES :
          begin DBVertGridEh1.ReadOnly := true; end;
          IDNO :
          begin DBVertGridEh1.ReadOnly := false; exit; end;
      end;
end;
Вопрос решен...

Код:
uses
  Windows;

Последний раз редактировалось Stilet; 06.11.2015 в 18:50.
S_007 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
messagebox delphi malicious_devil Помощь студентам 3 01.06.2014 11:24
DataModule в dll 5cek Общие вопросы Delphi 6 20.03.2014 15:38
Application.MessageBox в Delphi XE2 DmitryVisuals Общие вопросы Delphi 7 26.04.2013 09:42
Подключение DataModule Quake_SS Общие вопросы Delphi 8 29.03.2011 21:51
DataModule.OnCreate Diablas Общие вопросы Delphi 0 02.08.2010 18:12