Компьютерный форум
Правила
Вернуться   Компьютерный форум > Форум программистов
Перезагрузить страницу Ошибки при компиляции
Ответ
 
Опции темы Опции просмотра
  (#1 (permalink)) Старый
Gudvin Gudvin вне форума
Member
 
Сообщений: 22
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 17.05.2007
По умолчанию 31.05.2007, 14:18

в Delphi7 на showMessage вредничает(так же и на app..mes..box)
[Error] DM.pas(140): Undeclared identifier: 'showMessage'
Ответить с цитированием
  (#2 (permalink)) Старый
EBOL@ EBOL@ вне форума
Member
 
Аватар для EBOL@
 
Сообщений: 512
Сказал(а) спасибо: 0
Поблагодарили 1 раз в 1 сообщении
Регистрация: 11.02.2007
Адрес: Украина, Винница
По умолчанию 31.05.2007, 21:40

неправильно функцию прописал. Дай код
Ответить с цитированием
  (#3 (permalink)) Старый
Gudvin Gudvin вне форума
Member
 
Сообщений: 22
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 17.05.2007
По умолчанию 04.06.2007, 07:29

вот код
procedure TDataModule1.OPER_POSTExecute(Sender: TObject);
begin
if not
DataModule1.IBMARSH_KART.Locate('NOM_1_MARSH_KART' ,Form1.DBEdit19.Text,[lopartialKey])
then showMessage('нет такой маршрутной карты') else
begin
//Form1.DBGrid1.SetFocus;
DataModule1.IBOPER_KART.Post;
DataModule1.IBSODER_MARSH_KART.insert;
DataModule1.IBSODER_MARSH_KARTNOM_DEP_SODER_MARSH_ KART.Value:=DataModule1.IBOPER_KARTNOM_DEP_OPER_KA RT.Value;
DataModule1.IBSODER_MARSH_KARTNOM_YCH_SODER_MARSH_ KART.Value:=DataModule1.IBOPER_KARTNOM_YCH_OPER_KA RT.Value;
DataModule1.IBSODER_MARSH_KARTNOM_OPER_SODER_MARSH _KART.Value:=DataModule1.IBOPER_KARTNOM_OPER_OPER_ KART.Value;
DataModule1.IBSODER_MARSH_KARTNAME_OPER_SODER_MARS H_KART.Value:=DataModule1.IBOPER_KARTNAME_OPER_OPE R_KART.Value;
DataModule1.IBOPER_KART.Refresh;
DataModule1.IBSODER_MARSH_KART.Post;
end


end;
Ответить с цитированием
  (#4 (permalink)) Старый
Gudvin Gudvin вне форума
Member
 
Сообщений: 22
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 17.05.2007
По умолчанию 04.06.2007, 13:38

Цитата:
Сообщение от EBOL@
неправильно функцию прописал. Дай код
вот код
procedure TDataModule1.OPER_POSTExecute(Sender: TObject);
begin
if not
DataModule1.IBMARSH_KART.Locate('NOM_1_MARSH_KART' ,Form1.DBEdit19.Text,[lopartialKey])
then showMessage('нет такой маршрутной карты') else
begin
//Form1.DBGrid1.SetFocus;
DataModule1.IBOPER_KART.Post;
DataModule1.IBSODER_MARSH_KART.insert;
DataModule1.IBSODER_MARSH_KARTNOM_DEP_SODER_MARSH_ KART.Value:=DataModule1.IBOPER_KARTNOM_DEP_OPER_KA RT.Value;
DataModule1.IBSODER_MARSH_KARTNOM_YCH_SODER_MARSH_ KART.Value:=DataModule1.IBOPER_KARTNOM_YCH_OPER_KA RT.Value;
DataModule1.IBSODER_MARSH_KARTNOM_OPER_SODER_MARSH _KART.Value:=DataModule1.IBOPER_KARTNOM_OPER_OPER_ KART.Value;
DataModule1.IBSODER_MARSH_KARTNAME_OPER_SODER_MARS H_KART.Value:=DataModule1.IBOPER_KARTNAME_OPER_OPE R_KART.Value;
DataModule1.IBOPER_KART.Refresh;
DataModule1.IBSODER_MARSH_KART.Post;
end


end;
Ответить с цитированием
  (#5 (permalink)) Старый
EBOL@ EBOL@ вне форума
Member
 
Аватар для EBOL@
 
Сообщений: 512
Сказал(а) спасибо: 0
Поблагодарили 1 раз в 1 сообщении
Регистрация: 11.02.2007
Адрес: Украина, Винница
По умолчанию 09.06.2007, 03:24

Попробуй в interface uses прописать Dialogs
Ответить с цитированием
Ads.
  (#6 (permalink)) Старый
Gudvin Gudvin вне форума
Member
 
Сообщений: 22
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 17.05.2007
По умолчанию 09.06.2007, 07:09

Цитата:
Сообщение от EBOL@
Попробуй в interface uses прописать Dialogs
спасибо все работает...
Ответить с цитированием
Ads
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Выкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Ошибки при компиляции. SADIST C++ Builder 1 19.10.2011 19:47
Поиск ошибки при компиляции v.k.l.chr.by Prolog 0 13.04.2011 19:52
Как исправить ошибки при компиляции JohnD С/С++ 7 03.02.2010 20:51
Ошибки при компиляции исходников VS 7 на родном VS 2008 SERVERserver Visual C++ 2 08.05.2008 00:17
Ошибки при компиляции SendInput и User32.lib challenger Вопросы начинающих программистов 2 19.02.2008 05:01
Как исправить ошибки при компиляции проекта Gift Assembler 9 19.01.2008 12:56
При компиляции программы происходят одни ошибки Antsu C++ Builder 4 01.11.2006 22:23
CodeGuard Log после компиляции появляются ошибки Alex_Sosim C++ Builder 5 31.08.2006 13:48
Появляются ошибки при компиляции компонента Artemon C++ Builder 0 26.07.2006 20:00
Ошибки obj при компиляции как их исправить BD Visual C++ 4 21.02.2006 09:31
DirectX9 Music как исправить ошибки при компиляции nbl Программирование графики 3 01.01.2006 16:03
Invalid Pointer Operation XML как убрать ошибки при компиляции Praetorean C++ Builder 5 24.12.2005 00:47



Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Нardforum.ru - компьютерный форум и программирование, форум программистов