Вниз
Скачать: CL | DM;

Как определить длину элемента структуры?   Найти похожие ветки 

← →
cvg   (2007-10-25 14:34) [0]

Есть некая структура, допустим

type MyRec = record
a:int;
b:string;
end;
MyArr := array of MyRec;
var A:MyArr;

Может оказаться, что в ней заполнены элементы нулевой и второй. Есть некая функция, которая должна изменить все элементы b. Я пишу:

procedure func;
var i:integer;
begin
 for i := low(A) to high(A) do
  if length(A[i]) > 0
  then A[i].b := "b";
end;

Но на length(A[i]) транслятор ругается матом. Как еще можно попытаться определить, присутствует ли в структуре непустая i-тая запись?


← →
Palladin ©   (2007-10-25 14:36) [1]

SizeOf


← →
clickmaker ©   (2007-10-25 14:37) [2]

if Trim(A[i].b) = ""


← →
homm ©   (2007-10-25 14:39) [3]

> [0] cvg   (25.10.07 14:34)
> присутствует ли в структуре непустая i-тая запись

Что такое пустая запись?


← →
Ega23 ©   (2007-10-25 14:43) [4]

if length(A[i].b) > 0


← →
Ega23 ©   (2007-10-25 14:44) [5]

Пардон, фигня будет.
как сказал clickmaker ©
if Trim(A[i].b) = ""


← →
cvg   (2007-10-25 14:55) [6]

Спасибо всем, но необходимость уже отпала, т.к. выяснилось, что "пустых" записей программа не делает :)


← →
homm ©   (2007-10-25 14:57) [7]

> [6] cvg   (25.10.07 14:55)
> выяснилось, что "пустых" записей программа не делает

Я тебе больше, скажу, их в природе существовать не может…


← →
Anatoly Podgoretsky ©   (2007-10-25 15:05) [8]

> cvg  (25.10.2007 14:34:00)  [0]

Ой новый орел, там же непонятный член int



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.019 c
8-1169730583
olegnik
2007-01-25 16:09
2007.11.18
Трансформирование растров


4-1178683894
6h
2007-05-09 08:11
2007.11.18
Как определить имя пользователя запустившего приложения?


15-1190725346
Piter
2007-09-25 17:02
2007.11.18
Синхронизация в PHP, многопоточность


2-1193118690
Quart
2007-10-23 09:51
2007.11.18
INSERT INTO


2-1193398035
Alex_C
2007-10-26 15:27
2007.11.18
Как в своей форме перехватить открытие диалога выбора файла?




   Наверх