BlockRead

[Alex Cones]

Как культурные программисты пишут такие вещи:?

SetLength(Data, 5);
ZeroMemory(@Data[0], Length(Data) * SizeOf(Integer));
...
BlockRead(F, Data[0], SizeOf(Integer));
BlockRead(F, Data[1], SizeOf(Integer));
BlockRead(F, Data[2], SizeOf(Integer));
BlockRead(F, Data[3], SizeOf(Integer));
BlockRead(F, Data[4], SizeOf(Integer));

Data : Array of Integer;

[Selestis]

Ну, в цикле можно, ведь так? =)

[Alex Cones]

В цикле такие вещи пишут некультурные программисты. Там что-то в параметрах BlockRead надо намутить...

Изобретатель велосипедов

Ъ!

[Selestis]

Что значит мутить?!

for i:=0 to 5 do
BlockRead(F, Data[i], SizeOf(Integer));

Я гарантирую, что всё будет нормально...

В цикле такие вещи пишут некультурные программисты

Хмм, а городить огород из "стопятьсоттыщ" обращений к процедуре - культурно?

[Alex Cones]

Есть вариант в одну строку, правда я не помню, на что нужно домножать третий параметр.

[Selestis]

На количество элементов.
Могу ошибаться:

BlockRead(F, Data[0], SizeOf(Integer)*Length(Data))

[Alex Cones]

Угу. Спасибо.

[Selestis]

Там что-то в параметрах BlockRead надо намутить

Я думаю это должно было относиться к обращению к адресу массива: адрес массива не является адресом его первого элемента (у динамического), оттуда и косяки могли вылезти...

[p51x]

Если обращений очень мало, то это может быть оптимизация... Разворачивание циклов, например.