Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2014.09.21;
Скачать: CL | DM;

Вниз

Ошибка компиляции функций виндовс   Найти похожие ветки 

 
Евгений07 ©   (2013-10-17 20:47) [0]

Доброго времени

Добавил в один старый проект файлы из другого
Компиляция выдает ошибки, пример:

function TClientThread.GetErrorString(kod: DWORD = FORMAT_MESSAGE_FROM_SYSTEM): string;
var  Buffer: array [0..2047] of Char;
begin
 FormatMessage(kod, nil, WSAGetLastError, $400, @Buffer, SizeOf(Buffer), nil);
 Result := Buffer;
end;

Ошибка Incompatible types array and char указывает на @Buffer
Возможно в старом проекте другие настройки?


 
Евгений07 ©   (2013-10-17 21:35) [1]

Proekt->Options->Compiler
снять галку Typed @ operator

Вопрос закрыт


 
NoUser ©   (2013-10-18 03:58) [2]

function Err2Str(Err :Cardinal): string;
const
L = 2048;
begin
SetLength(Result, L);
SetLength(Result, FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM, nil, Err, LANG_USER_DEFAULT, PChar(Result), L-1, nil) );
end;



Страницы: 1 вся ветка

Текущий архив: 2014.09.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.005 c
15-1392038991
Мистер Хэ
2014-02-10 17:29
2014.09.21
_DynArrayAddRef/_NewUnicodeString/_NewAnsiString/_NewWideString


2-1381992380
i2e
2013-10-17 10:46
2014.09.21
не изменяется курсор


15-1392553681
Разведка
2014-02-16 16:28
2014.09.21
как свернуть все процедуры и функции


15-1392204896
Eleon
2014-02-12 15:34
2014.09.21
Юмор. Обучение On-line Delphi 7 за две недели!


15-1390926828
Rouse_
2014-01-28 20:33
2014.09.21
Голосование на знак "Мастер Delphi"