Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как записать в файл массив размером 8 точек на миллион [D5, D6, D7, Win2k, WinXP]

Страницы: < 1 2 3 4 5 6 7 8 9 10 >
yuraspb © (2006-11-10 19:06:00)
Как записать в файл массив размером 8 точек на миллион?

yuraspb (2006-11-13 17:55:00) [161]

> И что данный АЦП выдает данные в Real?
> Кроме того ответ ты давно получил, даже с кодом
> write(F, buf, 1)
> Этого достаточно для записи одной командой сразу весь массив.
>
>

Сделал как Вы сказали:

// çàïèñü ôàéëà
Tal = record
name: string[20]; // ñòðàíà
m:array[1..8,1..1000000] of integer;

end;

var
Form1: TForm1;
f: file of Tal; // ôàéë çàïèñåé - áàçà äàííûõ

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

var
al: Tal;
begin

{ Seek(f, FileSize(f)); // óêàçàòåëü çàïèñè â êîíåö ôàéëà }

assignFile(f, 'c:\als.db');

if FileExists('c:\als.db') then
reset(f)
else
rewrite(f);

with al do
begin

m[1,100]:=324;
name:='sdfsdf';

end;
write(f, al); // çàïèñàòü ñîäåðæèìîå ïîëåé çàïèñè â ôàéë
end;

end.

пишет stack overflow

Ketmar (2006-11-13 17:33:00) [162]
>[34] vopros 13-Nov-2006, 17:14
>тебя никто не спрашивал !
а-я-яй, какие мы грозные. неко, не зуди. твои публичные испражнения скучны.

vopros (2006-11-13 17:14:00) [163]

> почему бы тебе не пойти нафиг. на другой форум. пришёл,
> понимаешь, тупит, ещё и возмущается. сгинь.

тебя никто не спрашивал !

Anatoly Podgoretsky (2006-11-13 11:22:00) [164]
> Jeer (13.11.2006 11:08:30) [30]

И пусть сходит статью почитает, для того и писалось.

Anatoly Podgoretsky (2006-11-13 11:18:00) [165]

> Это действительно данные с 8 каналов АЦП.

И что данный АЦП выдает данные в Real?
Кроме того ответ ты давно получил, даже с кодом
write(F, buf, 1)
Этого достаточно для записи одной командой сразу весь массив.

saxon (2006-11-13 11:18:00) [166]

> @!!!ex (10.11.06 22:08) [25]

Так вот кто тут "Господин местный Босс". :)

Jeer (2006-11-13 11:08:00) [167]

> Их нужно както сохранять и загружать.
>

1. Нам не нужно.
2. Разберись с чтением/записью текстового файла, например.
3. Разберись с преобразованием FloatToStr(..)
4. Разберись с обращением к элементам массива по индексам.

yuraspb (2006-11-13 10:59:00) [168]
Это действительно данные с 8 каналов АЦП.
Их нужно както сохранять и загружать.

SergP (2006-11-11 13:14:00) [169]
> > 3. Почему не взять современный дизан?

Кстати если взять то что вы понимаете под "современным дизайном" то посещение форума значительно сократится. Ибо под "современным дизайном" обычно подразумевается никому не нужное значительное увеличение размеров контента. Здесь люди общаются. И мне например важна информация, а не всякие там картинки и прочие "красоты". А за лишний трафик мне платить не особо хочется. Да и серверу лишний трафик тоже не пойдет на пользу.
ИМХО.

Anatoly Podgoretsky (2006-11-11 11:39:00) [170]
а больше на диван похоже и с современым русским языком порядок

Современный диван

SergP (2006-11-11 06:22:00) [171]
> 3. Почему не взять современный дизан?

А это что значит? Ну "дизан" - это вроде как "дизайн" с ошибкой.
Вот что значит "современный"? А здесь какой?

@!!!ex (2006-11-10 22:08:00) [172]

> vopros (10.11.06 19:49) [13]
> Господин местный Босс,
>
> Во-первых у Вас отличный сайт, но вот форум...
> 1. Почему главная цель половины народу - постебаться?
> 2. Почему нельзя изменять и удалять свои сообщения?
> 3. Почему не взять современный дизан?

1) Потому что достает тупо отвечать на одни и теже банальные вопросы по 7 раз в неделю.
2) Слово не воробоей...
3) На вкус и цвет...

Ketmar (2006-11-10 20:30:00) [173]
>[13] vopros 10-Nov-2006, 19:49
почему бы тебе не пойти нафиг. на другой форум. пришёл, понимаешь, тупит, ещё и возмущается. сгинь.

Percent (2006-11-10 20:13:00) [174]
зачем иначе real

Чиста для real'ного фотоаппарата... для реальных пацанов! :-)

Или он читает какие-то данные с восьми каналов.
А это - массив для хранения.
С запасом.
Кхм...

Anatoly Podgoretsky (2006-11-10 20:09:00) [175]
> Percent (10.11.2006 20:02:20) [20]

Не знаю я ответа, но 8 мегапикселей, на фотоаппарат не похоже, зачем иначе real, правда может он с типом ошибся, про графику например начитался, а там норма реальные числа. Кто его знает он же про все упорно молчит.

MikePetrichenko (2006-11-10 20:07:00) [176]

> У меня массив array[1..8,1..1000000] of real
>
> Если не секрет, для чего такое "чудо" надо?

Круто. Это, если я не ошибаюсь? 64000000 байт (поправьте, посчитал real как 8 байт). Куда же жто все в стек то?

Percent (2006-11-10 20:02:00) [177]
Фотоаппарат! Угадал?!

Anatoly Podgoretsky (2006-11-10 20:00:00) [178]

> Если не секрет, для чего такое "чудо" надо?

Не сображаешь? Это же 8 мегапикселей, а ну быстро на рекламные сайты, ищи у кого 8 мегапикселей.

Percent (2006-11-10 19:58:00) [179]
Я присел - 8 точек на миллион type Extended (к примеру) ... не, сегодня не удается посчитать

В стэке... (голова кружиццо...)...

Percent (2006-11-10 19:56:00) [180]
У меня массив array[1..8,1..1000000] of real

Если не секрет, для чего такое "чудо" надо?

Страницы: < 1 2 3 4 5 6 7 8 9 10 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »