Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Ошибка компиляции функций виндовс [D7, XP]


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

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

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

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
Возможно в старом проекте другие настройки?


NoUser   (2013-10-18 03:58:00) [1]

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;


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

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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо