Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.05.07;
Скачать: CL | DM;

Вниз

Перемещение указателя в текстовом файле   Найти похожие ветки 

 
ZZZ_ZZZ ©   (2006-04-19 13:23) [0]

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


 
Плохиш ©   (2006-04-19 13:32) [1]

Текстовые файлы - это файлы последовательного доступа, поэтому перемещатыся в них можно только в одном направлении, читая каждый байт.


 
ZZZ_ZZZ ©   (2006-04-19 13:36) [2]

и еще такая проблема:

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

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


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


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

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


 
balepa ©   (2006-04-19 13:49) [4]


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


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


 
имя   (2006-04-19 14:35) [5]

Удалено модератором
Примечание: Правила учить


 
KygECHuK ©   (2006-04-19 14:47) [6]

.
 .
 .
decimalseparator := ".";
s:=formatfloat("00000000.00",r);
 .
 .
 .


 
ANB ©   (2006-04-19 15:26) [7]


>
> ZZZ_ZZZ ©   (19.04.06 13:23)

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


 
ZZZ_ZZZ ©   (2006-04-19 16:16) [8]

Благодарю, помогли здорово!



Страницы: 1 вся ветка

Текущий архив: 2006.05.07;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.074 c
1-1142855469
TStas
2006-03-20 14:51
2006.05.07
Ограничение числа экземпляров


3-1142424440
Sollo
2006-03-15 15:07
2006.05.07
dbExpress + QReport


3-1142013327
Megabyte
2006-03-10 20:55
2006.05.07
Не хочет коннектиться в с включенным LoginPrompt


2-1145249159
Bolek
2006-04-17 08:45
2006.05.07
pervasiv&delphi


15-1144826480
syte_ser78
2006-04-12 11:21
2006.05.07
Ваши юношеские заблуждения (компьютерные)