Как записать в файл массив размером 8 точек на миллион

← →
yuraspb © (2006-11-10 19:06) [0]

Как записать в файл массив размером 8 точек на миллион?

← →
Ketmar © (2006-11-10 19:10) [1]

точно так же, как 2x2.

← →
Percent (2006-11-10 19:10) [2]

массив размером 8 точек на миллион

О! Новая единица размерности массива - точка!

← →
Jeer © (2006-11-10 19:24) [3]

Percent (10.11.06 19:10) [2]

Я присел - 8 точек на миллион type Extended (к примеру) ... не, сегодня не удается посчитать.

← →
yuraspb © (2006-11-10 19:28) [4]

примеры товарищи, примеры )

← →
yuraspb © (2006-11-10 19:29) [5]

Percent - шутник просто ужассс )
Ketmar - мозг

← →
Anatoly Podgoretsky © (2006-11-10 19:34) [6]

> yuraspb (10.11.2006 19:06:00) [0]

Записать миллион раз по 8 точек
или один раз, но сразу миллион.
А тебе все равно как, например так write(F, buf, 1)

← →
Anatoly Podgoretsky © (2006-11-10 19:36) [7]

> Jeer (10.11.2006 19:24:03) [3]

Почему Extended, а не аrray of Point3d?

← →
Anatoly Podgoretsky © (2006-11-10 19:37) [8]

Тебя куда - в Начинающие, в Прочее или в Корзину?

← →
yuraspb © (2006-11-10 19:37) [9]

У меня массив array[1..8,1..1000000] of real

← →
Anatoly Podgoretsky © (2006-11-10 19:37) [10]

Давай сначала попробуем с Начинающие, там посмотрим

← →
Anatoly Podgoretsky © (2006-11-10 19:41) [11]

real какой? А это тип или переменная?
Допустим современный, тогда это 64 мб.

Пиши как посоветовал Write(F, Buf, 1) наиболее подходящее, только тип, переменную и файл создай должного типа.

← →
Anatoly Podgoretsky © (2006-11-10 19:42) [12]

Кстати тебе ко мне на сайт или на Королевство за статьей "Файлы Паскаля", приводить ее тут полностью не стоит.

← →
vopros (2006-11-10 19:49) [13]

Господин местный Босс,

Во-первых у Вас отличный сайт, но вот форум...
1. Почему главная цель половины народу - постебаться?
2. Почему нельзя изменять и удалять свои сообщения?
3. Почему не взять современный дизан?

← →
yuraspb © (2006-11-10 19:50) [14]

cсылочку киньте плиз

← →
Джо-со-смарта (2006-11-10 19:55) [15]

Насчет п. 2, 3. Есть хорошая пословица насчет своего самовара в Туле.

← →
Percent (2006-11-10 19:56) [16]

У меня массив array[1..8,1..1000000] of real

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

← →
Anatoly Podgoretsky © (2006-11-10 19:56) [17]

> vopros (10.11.2006 19:49:13) [13]

Вообще то цель не постебаться, а так попутно и не постебаться, а поприкалываться.
С остальным во первых не сюда, во вторых не на форумы

← →
Percent (2006-11-10 19:58) [18]

Я присел - 8 точек на миллион type Extended (к примеру) ... не, сегодня не удается посчитать

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

← →
Anatoly Podgoretsky © (2006-11-10 20:00) [19]

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

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

← →
Percent (2006-11-10 20:02) [20]

Фотоаппарат! Угадал?!

← →
MikePetrichenko © (2006-11-10 20:07) [21]

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

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

← →
Anatoly Podgoretsky © (2006-11-10 20:09) [22]

> Percent (10.11.2006 20:02:20) [20]

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

← →
Percent (2006-11-10 20:13) [23]

зачем иначе real

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

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

← →
Ketmar © (2006-11-10 20:30) [24]

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

← →
@!!!ex (2006-11-10 22:08) [25]

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

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

← →
SergP © (2006-11-11 06:22) [26]

> 3. Почему не взять современный дизан?

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

← →
Anatoly Podgoretsky © (2006-11-11 11:39) [27]

а больше на диван похоже и с современым русским языком порядок

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

← →
SergP © (2006-11-11 13:14) [28]

> > 3. Почему не взять современный дизан?

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

Это действительно данные с 8 каналов АЦП.
Их нужно както сохранять и загружать.

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

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

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

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

← →
saxon (2006-11-13 11:18) [32]

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

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

> Jeer (13.11.2006 11:08:30) [30]

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

← →
vopros (2006-11-13 17:14) [34]

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

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

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

> И что данный АЦП выдает данные в 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

ставлю 10000 всё работает

Ставь.
Также срочно сообщи место получения.
И попробуй не то поставь - вернем все взад.

32k максимум, кто знает ответ что делать ?

Двойка.

Определись с типом файла, в которых хочешь писать.

Как записать в файл массив размером 8 точек на миллион Найти похожие ветки