- Код: Выделить всё
var
a: array of Char;
begin
SetLength(a, 8);
if a[0]='' then
ShowMessage('equal')
else
ShowMessage('not equal');
end;
FPC выдает "not equal"
Borland выдает "equal"
Можете пояснить?
p.s. Lazarus 0.9.28, Delphi 7
Модератор: Модераторы
var
a: array of Char;
begin
SetLength(a, 8);
if a[0]='' then
ShowMessage('equal')
else
ShowMessage('not equal');
end;
FillChar(a,8,#0)
почему для дельфы #0='', а для лазаря #0<>''
Вернуться в Free Pascal Compiler
Сейчас этот форум просматривают: Google [Bot] и гости: 4