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

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

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 11.06.2012, 09:34   #31
ych_del
Форумчанин
 
Аватар для ych_del
 
Регистрация: 06.02.2011
Сообщений: 149
По умолчанию

Бли-и-ин...

Должно быть либо

if sEdit1.Text='' then M := M;
Application.MessageBox(PChar(M), 'Îáðàùåíèå ïðîãðàììû', MB_OK or MB_ICONINFORMATION);

Либо

if sEdit1.Text='' then
Application.MessageBox(PChar(M), 'dsadas', MB_OK or MB_ICONINFORMATION)
else

Перед else точки с запятой не должно быть, о чем тебе и говорит компилятор. Ты же убрал и явно лишнее M := M, и добавил лишнюю точку с запятой. Должно быть так:

Код:
if sEdit1.Text='' then
   Application.MessageBox(PChar(M), 'dsadas', MB_OK or MB_ICONINFORMATION)
else begin
Профессиональный конвертор галлюцинаций заказчика в алгоритмическую структуру.
ych_del вне форума Ответить с цитированием
Старый 11.06.2012, 09:36   #32
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Нормальная тактика - по каждой ошибке компиляции постить на форум. А заглянуть в описание синтаксиса команд мозгов не хватает? Поставь еще в разных местах кучу точек с запятой и бомби форум вопросами - почему не компилируется
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 11.06.2012, 09:45   #33
m1zantrop
Форумчанин
 
Регистрация: 11.04.2012
Сообщений: 103
По умолчанию

Цитата:
Сообщение от ych_del Посмотреть сообщение
Бли-и-ин...

Должно быть либо

if sEdit1.Text='' then M := M;
Application.MessageBox(PChar(M), 'Îáðàùåíèå ïðîãðàììû', MB_OK or MB_ICONINFORMATION);

Либо

if sEdit1.Text='' then
Application.MessageBox(PChar(M), 'dsadas', MB_OK or MB_ICONINFORMATION)
else

Перед else точки с запятой не должно быть, о чем тебе и говорит компилятор. Ты же убрал и явно лишнее M := M, и добавил лишнюю точку с запятой. Должно быть так:

Код:
if sEdit1.Text='' then
   Application.MessageBox(PChar(M), 'dsadas', MB_OK or MB_ICONINFORMATION)
else begin
так я и не понял, то надо ; то не надо. спасибо
m1zantrop вне форума Ответить с цитированием
Старый 11.06.2012, 10:57   #34
Shouldercannon
Участник клуба Подтвердите свой е-майл
 
Аватар для Shouldercannon
 
Регистрация: 26.01.2008
Сообщений: 1,897
По умолчанию

Перед else никогда не ставь ;.
Shouldercannon вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Отменить сортировку в NextGrid George2010 Компоненты Delphi 3 09.01.2011 16:34
Можно ли отменить последние действие? casio23 Общие вопросы Delphi 4 29.12.2010 19:16
Отменить предыдущее действие на канве rubik Общие вопросы Delphi 4 19.04.2010 22:52
Как отменить поток RIO Общие вопросы Delphi 11 12.10.2009 00:29
Действие для кнопки segail Microsoft Office Excel 7 25.07.2009 19:04