Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2014.02.23;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.51 MB
Время: 0.003 c
15-1377606242
Пит
2013-08-27 16:24
2014.02.23
1c8: среда разработки


15-1379058915
Цукор5
2013-09-13 11:55
2014.02.23
Домен SU (за и против)


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


15-1378655580
Error-Code-0xDEADBEEF
2013-09-08 19:53
2014.02.23
Идея стартапа


2-1367565141
Scrooge_
2013-05-03 11:12
2014.02.23
Сортировка по алфавиту





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский