3 / 3 / 0
Регистрация: 13.09.2010
Сообщений: 11
1

Чтение, поиск, перезапись файла

13.09.2010, 23:15. Показов 1688. Ответов 7
Метки нет (Все метки)

Всем доброго времени суток. в delphi не очень силен но познания и понимание программирования есть.Хочу попросить Вас написать что использовать для решения задачи.
1.Получить содержимое текстового файла(c:/test.txt)
2.Проверить текст на наличие ключевых слов(слова извесны)
3.Вывести сообщение и перезаписать файл полностью со своим заранее измесным текстом(если найдены схождения ключевых слов,елси не найдено то вывести "все гут" и ничего не делать)

зы. код писать ненужно. сам допру
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
13.09.2010, 23:15
Ответы с готовыми решениями:

Чтение и перезапись текстового файла
здравствуйте , помогите пожалуйста, суть проблемы в следующем, есть некий исходный txt файл...

Поиск и удаление текста в *.txt Delphi, перезапись файла
Здравствуйте, подскажите пожалуйста! Вопрос пустяковый если честно но разобраться не могу :cry:...

Перезапись файла
Открываю файл, в memo в нем что то меняю, но когда сохраняю то файл остается пустым. Найдите...

Перезапись Windows файла hosts
изза многочисленных проблем с вирусом который модифицирует файл hosts после чего пользователь при...

7
1336 / 987 / 119
Регистрация: 30.07.2010
Сообщений: 5,297
13.09.2010, 23:22 2
AssignFile, Rewrite, Reset, ReadLn, CloseFile
1
3 / 3 / 0
Регистрация: 13.09.2010
Сообщений: 11
13.09.2010, 23:24  [ТС] 3
iama спасибо.

а чем схождения с ключами искать еще осталось?
0
1336 / 987 / 119
Регистрация: 30.07.2010
Сообщений: 5,297
13.09.2010, 23:26 4
StringReplace, кстати, легче будет через Memo
0
3 / 3 / 0
Регистрация: 13.09.2010
Сообщений: 11
14.09.2010, 02:04  [ТС] 5
спасибо=) сделал . задача была дать юзерам для которых отредактировать файл hosts есть чтото тяжкое прожку которая сама это сделает.(редактировать когда вирус изменил этот файл и набирая вконтакте попадаеш на левый ип).незнаю может косячить будет но пока работает
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
var
  Form1: TForm1;
 
implementation
{$R *.dfm}
procedure TForm1.FormShow(Sender: TObject);
Var f:TextFile;
st:String;
n:string;
position : Integer;
begin
n:=' ';
  AssignFile(f,'C:\WINDOWS\system32\drivers\etc\hosts');
  Reset(f);
While not EOF(f) do
  begin
  ReadLn(f,st);
  n:=n+st;
    end;
     Memo1.text:='127.0.0.1 localhost';
CloseFile(f);
  position := AnsiPos('vkontakte',n);
  if position = 0
then label1.caption:='Все в порядке'
  else begin
  label1.font.Color:=clred;
  label1.caption:='Ахтунг!';
   Button1.Visible:=true;
end;end;
procedure TForm1.Button1Click(Sender: TObject);
begin
memo1.lines.savetofile('C:\WINDOWS\system32\drivers\etc\hosts');
 label1.font.Color:=clgreen;
 label1.caption:='Все в порядке';
 Button1.Visible:=false;
end;
end.
0
1336 / 987 / 119
Регистрация: 30.07.2010
Сообщений: 5,297
14.09.2010, 15:59 6
biz, почему бы не читать сразу в мемо, а лучше в RichEdit? там же и сделать советы, какие строки теоретически опасны фейковыми сайтами
0
420 / 417 / 79
Регистрация: 21.06.2010
Сообщений: 1,362
14.09.2010, 18:06 7
Цитата Сообщение от biz Посмотреть сообщение
'C:\WINDOWS\system32\drivers\etc\hosts'
а еще я бы обратил внимание на это, виндоус не всегда стоит на диске С и не всегда в папке windows поэтому советую использовать системные переменный...
1
3 / 3 / 0
Регистрация: 13.09.2010
Сообщений: 11
14.09.2010, 20:42  [ТС] 8
да то все понятно что доработок много. я в глаза увидел delphi 7 2дня назад. может потом разберусь что к чему
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
14.09.2010, 20:42
Помогаю со студенческими работами здесь

Чтение части файла из файла и показ его в Image
Здравствуйте! Есть большой файл состоящий из записанных один за одним графических файлов. Данные...

Чтение/перезапись файла Excel с хостинга
Здравствуйте! Прошу помощи, а именно, подсказку/совет, как реализовать данный метод: на сайте...

Чтение файла xls и перезапись данных в файл txt
Задача Файл xls в нем данные (текст и числа), алгорит читает файл xls и перезаписывает данные в...

Чтение и перезапись числа в файле
есть файл в нем число допусти 1000, по нажатию на кнопку мне его нужно считать в textBox...после...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru