Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.11.18;
Скачать: 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 вся ветка

Текущий архив: 2007.11.18;
Скачать: CL | DM;

Наверх




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


2-1193467708
VladimirK
2007-10-27 10:48
2007.11.18
Экспорт в MS Excel


5-1163327689
Poisent
2006-11-12 13:34
2007.11.18
Помогите с редактором свойств.


3-1183986357
временный Чайник
2007-07-09 17:05
2007.11.18
KA Dao и картинка


15-1192522701
Kirillys
2007-10-16 12:18
2007.11.18
не могу войти в чат