![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как определить длину элемента структуры? [D7, XP]
cvg © (2007-10-25 14:34:00)Есть некая структура, допустим
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-тая запись?
Anatoly Podgoretsky (2007-10-25 15:05:00) [1]> cvg (25.10.2007 14:34:00) [0]
Ой новый орел, там же непонятный член int
homm (2007-10-25 14:57:00) [2]> [6] cvg (25.10.07 14:55)
> выяснилось, что "пустых" записей программа не делает
Я тебе больше, скажу, их в природе существовать не может…
cvg (2007-10-25 14:55:00) [3]Спасибо всем, но необходимость уже отпала, т.к. выяснилось, что "пустых" записей программа не делает :)
Ega23 (2007-10-25 14:44:00) [4]Пардон, фигня будет.
как сказал clickmaker ©
if Trim(A[i].b) = ''
Ega23 (2007-10-25 14:43:00) [5]
if length(A[i].b) > 0
homm (2007-10-25 14:39:00) [6]> [0] cvg (25.10.07 14:34)
> присутствует ли в структуре непустая i-тая запись
Что такое пустая запись?
clickmaker (2007-10-25 14:37:00) [7]if Trim(A[i].b) = ''
Palladin (2007-10-25 14:36:00) [8]SizeOf