Чтение из стандартного потока ввода

[Пацак с планеты Земля]

Подскажите пожалуйста как на Delphi реализовать следующие две строчки:

Код: Выделить всё

char *Data = (char *) malloc (NumBytes + 1);
fread(Data, 1, NumBytes, stdin);

Т.е. здесь мы выделяем память для переменной Data, а затем считываем в нее данные из из стандартного потока ввода.

[Vovik]

что-то типа:
var Data : array[0..NumBytes] of byte;
begin
blockread(input,Data,Numbytes+1);
end.