Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.15;
Скачать: [xml.tar.bz2];




Вниз

MessageBox() and ShowMessage() - some troubles или 


Raptor   (2002-02-12 22:44) [3]

2 Fellomena
Функция ShowMessage - это делфийская функция и потому она будет корректно работать при подстановке вместо строки String символа Char. Функция же MessageBox - виндовая. Ей нужно корректно задать в качестве строкового параметра строку, заканчивающуюся нулем. А при приведении Char к PChar не получится такая строка, так как пременная типа String есть ничто иное как указатель, а Char это статический тип.
То, что сообщения никакие не выводились, не означает, что ошибок не было. Если попробуешь этот же код:
MessageBox(0, PChar(Chr(param)), "Message from DLL", 0);
запустить в проекте из под делфы, сразу же получишь ошибку от user32.dll.
Посему надо сделать так, как указывали выше, или так (что то же самое):

Var
s:String;
...............
s:=Chr(param);
MessageBox(0, PChar(s), "Message from DLL", 0);
...............




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.15;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.023 c
7-46526           Red Alert             2002-01-13 08:01  2002.04.15  
Блин! Во в голову вдарило-то! Вопрос про Com-порт..


3-46291           alexandervasjuk       2002-03-21 14:06  2002.04.15  
MySQL. Что день грядущий мне готовит?


14-46505          Alx2                  2002-03-07 16:35  2002.04.15  
Напилася я пьяна... не дойти мне до дому...


1-46412           sdram                 2002-04-02 16:41  2002.04.15  
Как вывести в отчете значения формул из базы.


14-46486          lel                   2002-03-06 10:51  2002.04.15  
RSDN magazine продается на Кузнецком мосту 8))