Большой Воронежский Форум - Показать сообщение отдельно

MHC · 22.12.2009, 16:10

var

arr : array['a'..'f'] of Integer;

c : char;

begin

for c := 'a' to 'f' do

AData.Read(arr[c], 4);

end;

22.12.2009, 16:10	#2
MHC Lucky Сообщений: 284 Регистрация: 31.10.2003 Возраст: 42 Не в сети	var arr : array['a'..'f'] of Integer; c : char; begin for c := 'a' to 'f' do AData.Read(arr[c], 4); end;