Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ПРИВЕТ ВСЕМ! Можно ли как-то в режиме Run-Time определить


@andrew ©   (2002-12-18 13:33:00) 

свой тип... Или как выйти из ситуации.

У меня есть несколько типов,
type TMyType1 = packed record
a: array[0..4] of char;
b: array[0..9] of char;
c: byte;
d:.....................
end;
и т.д.
Так вот возникла ситуация, при которой я не могу сказать каковы объемы массивов. Как-то можно динамически это определить?


Skier   (2002-12-18 14:16:00) [1]

>@andrew
А цель-то какая ?
Может ты не в ту сторону копаешь ?


Digitman   (2002-12-18 14:12:00) [2]


> @andrew


сделать это в run-time невозможно

только - в compile-time


@andrew   (2002-12-18 14:10:00) [3]

>Digitman
т.е. скорее первое :-)


@andrew   (2002-12-18 14:09:00) [4]

>Digitman
Опишу мою задачу, дабы было проще:
Иная программа создала антипед файл и записала в его начало структуру данных. Я читаю начало этого файла и выясняю, что длинна одной записи = len_record, а запись состоит из var1 длинной len1, var2 длинной len2 и т.д. Далее, по идеи я должен определить тип, который будет соответствовать этой записи и читать спокойно файл, применяя BlockRead(f, k, sizeof(TMyType1)), где к: TMyType1. А чтение кокретных данных будет через k.что-то. Не знаю: стало ли понятнее :-), но на большее я не способен :-).


han_malign   (2002-12-18 13:59:00) [5]

Open arrays:

a: array of char;
..........
SetLength(a,len);
Length(a), Low(a)=0, Hight(a)=Length(a)-1


Digitman   (2002-12-18 13:57:00) [6]

Ничччего не понял)

что значит "определить тип" ?

- определить новый тип данных, который в последствии будет использован для, например, создания переменной этого нового типа ?

- определить, какого типа данные, хранящиеся в указанной переменной (или по указанному адресу в памяти) ?


@andrew   (2002-12-18 13:55:00) [7]

Напр., есть вариант
type ....
a: PChar;
al: integer;
b: PChar;
bl: integer;
.............

А потом AllocMem и в al, bl и т.д. записывать сколько выделил
а размер типа вычислять суммирование al, bl и т.д.
Но это сложно, может можно проще?


@andrew   (2002-12-18 13:50:00) [8]

Сорри!!!!!!!!! Сам виноват!!!!!!!!
Немного не то! Мне не надо вычислять размер моего типа или его составляющих! Мне надо определить тип с составляющими того объема, который я получаю в процессе работы программы,
т.е. что-то типа
type ....
a: array og char;
.........
var k: TMyType1;
.....
а потом SetLength(k.a, что-то)
Это понятно не работает, а вот что заработает?


han_malign   (2002-12-18 13:42:00) [9]

RTTI работает только для классов. В Delphi, в отличии от C++, запись классом не является.


Digitman   (2002-12-18 13:38:00) [10]

оч просто

SizeOf(TMyType1.a) возвратит 5
SizeOf(TMyType1.b) возвратит 10


Наверх

Титульная страница Поиск, карта сайта Написать письмо