Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Число d MessageBox 
:(
    Опции темы
MacTep
Дата 3.7.2005, 15:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1292
Регистрация: 4.8.2003
Где: г. Самара

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



В данном коде
Код

Application.MessageBox(num,'abc',MB_ICONWARNING);

num - число (integer). При запуске программы выдется ошибка о несовместимости типов: String и PAnsiChar. Что делать? Не могу исправить данную ошибку. Что я уже только не делал...

Это сообщение отредактировал(а) MacTep - 3.7.2005, 15:37


--------------------
(A)bort, (R)etry, (I)gnore = Haфиг, Heфиг, Пoфиг ... :)
PM MAIL   Вверх
Rrader
Дата 3.7.2005, 15:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Inspired =)
***


Профиль
Группа: Экс. модератор
Сообщений: 1535
Регистрация: 7.5.2005

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



Цитата

При запуске программы выдется ошибка о несовместимости типов: String и PAnsiChar

Не может такого быть, если num - число! smile


--------------------
Let's do this quickly!
Rest in peace, Vit!
PM MAIL Skype   Вверх
December
Дата 3.7.2005, 15:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Antitheorist
****


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

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



А ту ли функцию ты вызываешь? Если посмотреть справку по TApplication.MessageBox, то можно увидеть следующее:
1) первый параметр должен быть стринг
2) второй - pchar
3) третий - одно из приведённых знчачений, и MB_ICONWARNING там не значится.
Попробуй
Код

Application.MessageBox(inttostr(num),pchar('abc'),[MB_OK]);



--------------------
Для друзей с винграда - скидки на разработку сайтов
PM MAIL WWW ICQ   Вверх
MacTep
Дата 3.7.2005, 17:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1292
Регистрация: 4.8.2003
Где: г. Самара

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



December, он не на третий параметр ругается. Если написать
Код

Application.MessageBox('text','caption',MB_ICONWARNING);
,
то все будет отлично работать! А вот число не хочет выводить! В чем дело?


Цитата(Rrader @ 3.7.2005, 15:44)
Не может такого быть, если num - число!
Попробуй сам!



--------------------
(A)bort, (R)etry, (I)gnore = Haфиг, Heфиг, Пoфиг ... :)
PM MAIL   Вверх
Pakshin A. S.
Дата 3.7.2005, 17:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

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



Код

Application.MessageBox(PChar(IntToStr(num)), 'some text', mb_ok + mb_iconinformation);

PM   Вверх
MacTep
Дата 3.7.2005, 20:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1292
Регистрация: 4.8.2003
Где: г. Самара

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



Pakshin A. S., а ты сам попробовал? smile Так не получается! smile Я так уже делал! нужен другой выход! smile


--------------------
(A)bort, (R)etry, (I)gnore = Haфиг, Heфиг, Пoфиг ... :)
PM MAIL   Вверх
Yanis
Дата 3.7.2005, 20:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

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



2 MacTep
Если честно, то я что то не совсем понимаю в чём проблема. Нужно вывести число в MessageBox'е? Тогда так:
Код

var
  Num: Integer;
begin
  Num := 666;
  Application.MessageBox(@IntToStr(Num)[1], PChar('Caption'), MB_ICONINFORMATION);
end;

Или так тоже не рабоатет smile


--------------------
user posted image *щёлк*
PM MAIL WWW ICQ   Вверх
December
Дата 3.7.2005, 20:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Antitheorist
****


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

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



MacTep, ты хоть объясни чётко, что тебе нужно. Это?
Код

Application.MessageBox(pchar(inttostr(num)),'abc',MB_ICONWARNING);


Добавлено @ 20:48
Yanis
Одновременно писали smile


--------------------
Для друзей с винграда - скидки на разработку сайтов
PM MAIL WWW ICQ   Вверх
MacTep
Дата 3.7.2005, 20:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1292
Регистрация: 4.8.2003
Где: г. Самара

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



А если перед число надо написать что-то типа такого?
Код

Application.MessageBox('Число: '+@IntToStr(Num)[1], PChar('Caption'), MB_ICONINFORMATION);

Так не работает? Как поступить в данном случае?
Добавлено @ 20:54
December, ну я же говорю, так не работает! Мне надо вывести число с пояснением, типа: "Это число: "+num. Сейчас понятно?


--------------------
(A)bort, (R)etry, (I)gnore = Haфиг, Heфиг, Пoфиг ... :)
PM MAIL   Вверх
Yanis
Дата 3.7.2005, 20:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

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



Код

Application.MessageBox(PChar('Число: '+IntToStr(Num)), PChar('Caption'), MB_ICONINFORMATION);


Это сообщение отредактировал(а) Yanis - 3.7.2005, 20:55


--------------------
user posted image *щёлк*
PM MAIL WWW ICQ   Вверх
MacTep
Дата 3.7.2005, 21:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1292
Регистрация: 4.8.2003
Где: г. Самара

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



Yanis, спасибо! smile Тему можно считать закрытой! smile


--------------------
(A)bort, (R)etry, (I)gnore = Haфиг, Heфиг, Пoфиг ... :)
PM MAIL   Вверх
Pakshin A. S.
Дата 3.7.2005, 21:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

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



smile Найди отличие от моего кода!!!! И Вротой Pchar() в заголовке не нужен!!! Вы посчитали, что не работает?! Я воспринимаю это как оскорбление!:angry:

Это сообщение отредактировал(а) Pakshin A. S. - 3.7.2005, 21:12
PM   Вверх
MacTep
Дата 4.7.2005, 12:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1292
Регистрация: 4.8.2003
Где: г. Самара

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



Pakshin A. S., не злись! Отличие все же есть! Второй PChar может и не нужен, но лишним он тоже не будет! smile Спасибо тебе тоже за обсуждение данного вопроса!


--------------------
(A)bort, (R)etry, (I)gnore = Haфиг, Heфиг, Пoфиг ... :)
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

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


 




[ Время генерации скрипта: 0.0827 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.