![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ПРИВЕТ ВСЕМ! Можно ли как-то в режиме 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