SizeOf

← →
неважно (2005-11-30 22:53) [0]

var St:String[20]; begin Caption:=IntToStr(SizeOf(St));

Дык...почему же он равен 21 ???

← →
DrPass © (2005-11-30 22:57) [1]

Тип ShortString имеет еще один байт, в котором хранится его длина

← →
неважно (2005-11-30 23:13) [2]

2 DrPass © (30.11.05 22:57) [1]
А как-нибудь это обойти можно???

← →
Anatoly Podgoretsky © (2005-11-30 23:18) [3]

неважно (30.11.05 23:13) [2]
А зачем?

← →
Сайбель Алексей © (2005-11-30 23:19) [4]

-1

Потому, что в S[0] (нулевой байт) хранится длина короткой строки. 20+1=21.

При обычных установках:

procedure TForm1.FormCreate(Sender: TObject); var s : string; n0,n1,n2 : integer; begin s := ""; n0 := sizeOf(s); s := "1"; n1 := sizeOf(s); s := "2"; n2 := sizeOf(s); Caption := Format("%d %d %d",[n0,n1,n2]) end;

Попробуй. Удивись еще больше. Надо length.

SizeOf Найти похожие ветки