Всем доброго времени суток! Понадобилась помощь. Все перерыл, не знаю как передавать тип, как параметр, как это делает к примеру функция SizeOf. Мы в параметр фенкции передаем тип например Integer, а она в свою очередь возврашает нам размер типа. Я хочу также передавать тип как параметр, а еще использовать переменные типа тип. Чтобы вопрос был понятен вот пример, как я хотел бы чтобы выглядел мой код:
Код:
Var
VarType: AnyType;
...
Procedure MyProc(MyType: AnyType);
Var Buff: Pointer;
begin
...
GetMem(Buff, SizeOf(MyType));
...
FreeMem(Buff);
...
end;
...
begin
MyProc(Integer);
end.
Заранее благодарен за помощь!