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

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

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

Перемещение указателя в текстовом файле [D7, XP]

ZZZ_ZZZ © (2006-04-19 13:23:00)
Добрый день!
для перемещения я использую процедуру seek(f,n), но выдается сообщение о несовместимости типов. Какую использовать?
var
f:textfile;
s:string;
begin
assignfile(f,'c:\1.txt');
rewrite(f);
s:='12345';
seek(f,3);
write(f,s);

ZZZ_ZZZ (2006-04-19 16:16:00) [1]
Благодарю, помогли здорово!

ANB (2006-04-19 15:26:00) [2]

>
> ZZZ_ZZZ © (19.04.06 13:23)

Использовать другие способы доступа к файлам :
1) через манипуляторы (FileOpen, FileCreate, FileRead, FileWrite)
2) через потоки (TStream)

KygECHuK (2006-04-19 14:47:00) [3]
.
.
.
decimalseparator := '.';
s:=formatfloat('00000000.00',r);
.
.
.

(2006-04-19 14:35:00) [4]
Удалено модератором
Примечание: Правила учить

balepa (2006-04-19 13:49:00) [5]

> Плохиш © (19.04.06 13:39) [3]

Поддерживаю.

Плохиш (2006-04-19 13:39:00) [6]

> как сделать, чтобы вместо запятой стояла точка?

А вот на этот вопрос отвечать не буду. Это уже как запуздырить иконку туда где часики, круглые сутки здесь мусолиться.

ZZZ_ZZZ (2006-04-19 13:36:00) [7]
и еще такая проблема:

r:=12.34;
s:=formatfloat('00000000.00',r);

Получается s=00000012 ,34
как сделать, чтобы вместо запятой стояла точка?
Заранее благодарен.

Плохиш (2006-04-19 13:32:00) [8]
Текстовые файлы - это файлы последовательного доступа, поэтому перемещатыся в них можно только в одном направлении, читая каждый байт.

Наверх

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