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

Вниз

Удаление строки в файле делфи   Найти похожие ветки 

 
Ponchik ©   (2013-04-19 00:42) [0]

Здравствуйте. Удаляю строку в файле через delete(i), но при удалении символы удабираются,а курсор остается на этой же строке (теперь пустой,но имеющейся). как сделать,чтоб при удалении курсор помещался в конец последней строки без пустой?


 
Германн ©   (2013-04-19 01:55) [1]


> Здравствуйте. Удаляю строку в файле через delete(i)

Отсюда, пожалуйста подробнее. Какая процедура delete(i) удаляет строку в файле? И как вы в файл "засунули" курсор?


 
O'ShinW ©   (2013-04-19 09:15) [2]

по телепатору выходит, что вопрос  про удаление терминирующих LF CR (#10#13)

Все равно, код в студию, не понятно что надо


 
brother ©   (2013-04-19 10:48) [3]

имхо разговор про #13#10


 
Kilkennycat ©   (2013-04-20 10:41) [4]

вообще-то, 4 варианта.


 
Sha ©   (2013-04-20 12:50) [5]

Это ж очевидно. Любая работа с файлами выполняется через TMemo.


 
petvv   (2013-04-22 22:07) [6]

Удалено модератором


 
petvv   (2013-04-22 22:09) [7]

обычный парсер. Завтра буду на работе скину свой с уладением и никаких костылей с Tmemo. Только бы не забыть )))


 
petvv   (2013-04-22 22:21) [8]

Ну, а по вопросу, как строки проходиш ???

Код в студию, а то телепаты в отпуске


 
petvv   (2013-04-22 22:37) [9]

Если уж на прямую из файлов не умеешь удалять, то помолчал бы и не вводил бы челоека в заблуждение


 
petvv   (2013-04-22 22:47) [10]

Прямая работа с текстовым файлом и удаление строк в цикле по количеству (счёту цикла)(без парсера) и замена в строках определённых символов на свои пример дам, но завтра. А ейчас PB ))).


 
Ega23 ©   (2013-04-23 08:15) [11]

Есть мнение, что "завтра" ты уже ничего не дашь...


 
Kilkennycat ©   (2013-04-23 08:16) [12]


> А ейчас PB

penurious brain


 
petvv   (2013-04-25 21:40) [13]

PointBlank

Запарился забыл (Не отмазка)

Солью весь поект, там всё доступно


 
petvv   (2013-04-25 21:42) [14]

Ega23 © За болобола никогда не прокатывал е сли забыл так работа такая. Сказалкину знасит кину нечего ёрничать


 
Ega23 ©   (2013-04-25 21:56) [15]


> Сказалкину знасит кину нечего ёрничать


Я к тому, что ежели будешь матюгаться - рискуешь получить бан.


 
petvv   (2013-04-25 22:10) [16]

чёт от тебя только болобольство одно. А если бы человек смотрел, что копирует и вставляет в свой проект:

begin
F:=TStringList.Create;
F.LoadFromFile(FileName);
 for I := F.Count - 1 downto 0 do begin
  if Pos(Word, F.Strings[I]) > 0 then
   F.Delete(I);
 end;
F.SaveToFile(FileName);
ShowMessage(IntToStr(F.Count));
F.Free;

Но это тупо по его случаю. Если кого то обидел извиняйте, но это не с моего проекта, а с тырнета. Пишу из дома, завтра (напомнить :)))))))))))


 
Ega23 ©   (2013-04-25 22:34) [17]

Если файла не существует, или нет доступа на его чтение, или нет доступа на его запись, то в твоём коде утечка памяти.


 
Германн ©   (2013-04-25 23:49) [18]


> petvv   (25.04.13 22:10) [16]
>
> чёт от тебя только болобольство одно. А если бы человек
> смотрел, что копирует и вставляет в свой проект:
> 1
> 2
> 3
> 4
> 5
> 6
> 7
> 8
> 9
> 10
>  
> begin
>  F:=TStringList.Create;
>  F.LoadFromFile(FileName);
>   for I := F.Count - 1 downto 0 do begin
>    if Pos(Word, F.Strings[I]) > 0 then
>     F.Delete(I);
>   end;
>  F.SaveToFile(FileName);
>  ShowMessage(IntToStr(F.Count));
>  F.Free;
>
> Но это тупо по его случаю.

А где же тот самый курсор, который должен помещаться в конец последней строки без пустой?


 
Ega23 ©   (2013-04-26 00:46) [19]


> А где же тот самый курсор

Насколько я понял, он это дело через Мемо делал.


 
Германн ©   (2013-04-26 01:47) [20]


>  Ega23 ©   (26.04.13 00:46) [19]
>
>
> > А где же тот самый курсор
>
> Насколько я понял, он это дело через Мемо делал.
>

В этом как раз нет сомнений, кроме одного что это мог быть и РичЭдит. :)
Я высказался против заявления Но это тупо по его случаю, которое следует после примера в petvv   (25.04.13 22:10) [16].
Ведь вопрос то автора был не совсем про удаление строки в файле. А
> как сделать,чтоб при удалении курсор помещался в конец последней
> строки без пустой?
Понятно, что сей вопрос нифига не понятен. Но зачем с умным видом заявлять, что мой пример самое то! :)


 
Anatoly Podgoretsky ©   (2013-04-26 11:19) [21]

И файлик размером в пару сотен мегабайт


 
Ega23 ©   (2013-04-26 11:44) [22]


> И файлик размером в пару сотен мегабайт


Текстовый?


 
brother ©   (2013-04-26 11:48) [23]

а че бы и нет?


 
Ega23 ©   (2013-04-26 11:51) [24]


> а че бы и нет?


"Война и Мир" полностью занимает 5.5 метров. В FB2. В юникоде.


 
brother ©   (2013-04-26 12:31) [25]

считаем это логом аппаратуры за год)


 
brother ©   (2013-04-26 12:32) [26]

автономной... на сев. полюсе...)


 
Anatoly Podgoretsky ©   (2013-04-26 13:42) [27]

> Ega23  (26.04.2013 11:44:22)  [22]

Ну например лог, ничего
особенного


 
Anatoly Podgoretsky ©   (2013-04-26 13:43) [28]

> Ega23  (26.04.2013 11:51:24)  [24]

Это только один том, а если 40
томов?


 
Ega23 ©   (2013-04-26 13:43) [29]


> считаем это логом аппаратуры за год)


> Ну например лог, ничего особенного


Объясните мне: нахрена это всё писать в один файл? Это же неудобно!


 
Ega23 ©   (2013-04-26 13:46) [30]


> Это только один том, а если 40 томов?


Это вся "Война и мир". Все 2 тома, 4 части. 40 томов - кому это надо, пардон май френч? Это-ж ̶ё̶бзастрелиться можно, сколько.


 
Anatoly Podgoretsky ©   (2013-04-26 19:37) [31]

> Ega23  (26.04.2013 13:46:30)  [30]

Кому
застрелиться,
а некоторые
на этом
деньги
делают.


 
Anatoly Podgoretsky ©   (2013-04-26 19:38) [32]

> Ega23  (26.04.2013 13:43:29)  [29]

Дареному коню в зубы не
смотрят.



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

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

Наверх




Память: 0.54 MB
Время: 0.007 c
11-1249702092
Ruzzz
2009-08-08 07:28
2014.02.23
Создание для KOL эквивалента Layouts из Qt


2-1366724200
delphistorm
2013-04-23 17:36
2014.02.23
получить значение нода в IXMLDOMNode


2-1366714345
Дмитрий
2013-04-23 14:52
2014.02.23
Пишу тест на делфи


9-1194986041
Greg
2007-11-13 23:34
2014.02.23
Создание своего класса в Delphi 7


2-1367219961
Евдоким
2013-04-29 11:19
2014.02.23
В потоке проверка MainForm.Enabled возвращает неверное значение.