ShowMessage работает, но application.messagebox не - PullRequest
Новая
       29

ShowMessage работает, но application.messagebox не

0 голосов
/ 05 июня 2019 
ShowMessage('MAC  - (Client: '
        + DM.qTmp.FieldByName('CL_NR').AsString + ' , Place: ' + DM.qTmp.FieldByName('CL_DESC').AsString);

Этот код работает нормально, но как я могу это сделать с 

Application.MessageBox('MAC  - (Client: '
            + DM.qTmp.FieldByName('CL_NR').AsString + ' , Place: ' + DM.qTmp.FieldByName('CL_DESC').AsString' , 'Error', 16);

Получены различные ошибки [Ошибка dcc32] untPCName.pas (79): E2010 Несовместимые типы: 'PWideChar' и 'строка 'DELPHI версия 10.2.

1 Ответ

0 голосов
/ 05 июня 2019

Чтобы исправить ошибки "Несовместимые типы", вы должны привести их. Обратите внимание на PChar(...): 

Application.MessageBox(PChar('Whatever'), 'Error', MB_ICONHAND);

Я также заменил магическое число 16 чем-то разумным.

...