|
Тема |
Delphi 6, ама много странно нещо |
|
Автор |
Lizard (приятел) |
|
Публикувано | 29.05.02 11:04 |
|
|
procedure TForm1.Button2Click(Sender: TObject);
type
TA=record
r1 : longword; {4 bytes}
end;
TB=record
r2 : double; {8 bytes}
end;
TC=record
r1 : longword; {4 bytes}
r2 : double; {8 bytes}
end;
var
a,b,c : integer;
begin
a:=SizeOf(TA);
b:=SizeOf(TB);
c:=SizeOf(TC);
ShowMessage(format('a=%d b=%d c=%d',[a,b,c]));
end;
На колко мислите е равно c?
може би c=12
и аз така мислех, ама Delphi-то е на друго мение с=16?!
Някакви идей?
|
| |
|
|
|