Форум: "Начинающим";
Текущий архив: 2005.12.18;
Скачать: [xml.tar.bz2];

Вниз

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

---

← →
Amoeba ©   (2005-12-01 10:33) [5]

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

---

← →
Думкин ©   (2005-12-01 10:54) [6]

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

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.

---

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

Форум: "Начинающим";
Текущий архив: 2005.12.18;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.015 c