Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/3: Рейтинг темы: голосов - 3, средняя оценка - 5.00
4 / 4 / 0
Регистрация: 14.11.2010
Сообщений: 341
1

Поиск всех команд имеюющий данний текст + создание лабела

06.06.2011, 03:29. Показов 553. Ответов 4
Метки нет (Все метки)

Люди помогите осуществить пожалуста

Окно программы
IP адрес Кнопка
_________________________________________|
|________________Открыть_________________|
|000.000.000.000 Удалить___________________|
|172.16.31.253 Удалить_____________________|
|172.16.17.43 Удалить______________________|
|172.16.20.128 Удалить_____________________|
|193.104.85.129 Удалить____________________|
|________________Сохранить_______________|
Кнопка открить открывает файл указанный там
Исчит весь текст где пишет <IP = от 000 до 255 с 4 ....> по очереди если находит
добавляет лебел(создает) + напроти него кнопку удалить при ее нажатии удаляется текст<IP = от 000 до 255 с 4 ....> с файла и лебел + кнопка (должно бить пример <IP = "000.000.000.000"> тогда добавить то что в ""
кнопка сохранить сохраняет текст уже с существующими ипами
а которые удалени били удаляет текст в файле <ip = "....">
Тяжело!!!
если чтото не понятно напишите
либо форму создам либо напишу
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.06.2011, 03:29
Ответы с готовыми решениями:

Поиск всех ячеек, содержащих введенный текст
Нужен код, который ищет на листе Excel, введенную фамилию (не обязательно только фамилию) и...

Поиск файлов на всех дисках с расширением *.bat найти в них конкретный текст и заменить
Добрый день! Хочу сделать батник. Ни как не могу найти как сделать поиск файлов на всех дисках с...

Подчеркнутая буква у лабела, расположеного рядом с текстфилдом.
Доброго времени суток! Следующая проблема при украинизации преложения : Пытаюсь сделать, чтоб у...

Изменить текст ошибок стандартных команд
Имеется некоторый скрипт, использующий стандартные утилиты Linux (find и т.д.). При задании...

4
1903 / 1014 / 123
Регистрация: 08.12.2009
Сообщений: 2,792
Записей в блоге: 2
06.06.2011, 04:18 2
Delphi
1
2
3
4
5
6
7
8
9
10
11
procedure DeleteAll(_del_text: String; var S: String);
var
  m: Integer;
begin
  m := pos(AnsiLowerCase(_del_text), AnsiLowerCase(s));
  While m > 0 do
    begin
      Delete(s, m, Length(_del_text));
      m := pos(AnsiLowerCase(_del_text), AnsiLowerCase(s));
    end;
end;
Эта функция удаляет из строки s все встречающиеся там значения куски со значениями _del_text.
Ну, а загрузка:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
var
  fl: TextFile;
  s, buf: String;
begin
  AssignFile(fl, 'IP.txt');
  Reset(fl);
  While not EOF(fl) do
    begin
      ReadLn(fl, buf);
      s := s + buf + #10#13;
    end;
  CloseFile(fl);
end;
Далее я смутно понял задание. Если я правильно понял, нужно перебрать 256^4 вариантов. Это выполняется крайне долго. Опиши ещё раз задание полностью.

Добавлено через 35 минут
ой, ошибся с 256^4 вариантами. Но всё же, что значит проверить существование IP?
В смысле нужно искать в тексте IP? Чтобы именно четыре подряд идущих числа (0..255), разделяющихся точками шли определялись как IP, и предлагалось бы их удаление?
0
5576 / 2182 / 456
Регистрация: 20.11.2009
Сообщений: 7,265
Записей в блоге: 1
06.06.2011, 10:31 3
Сложно понять мысль автора,
Цитата Сообщение от Skmaestro Посмотреть сообщение
добавляет лебел(создает) + напроти него кнопку удалить при ее нажатии удаляется текст
я так понял в этом фрагменте, то что нужно удалить, оно записано в файле, теперь ищем что именно, находим, и теперь создаем для каждой такой находки лейбл и кнопку удаляющую текущую запись?
0
4 / 4 / 0
Регистрация: 14.11.2010
Сообщений: 341
06.06.2011, 14:36  [ТС] 4
даю пример
В ip.txt пишет
Новой документ
<add ip"172.16.20.128"> <add ip"193.104.85.129">
<add ip"139.134.69.54">

Оно создает 3 лебела и 3 кнопки
если нажать на 1 кнопку удаляется лебел и сама кнопка тоисть 1 у нас будет
172.16.20.128 (удалить)
нажал на удалить ^ и такого текста нету осталось
193.104.85.129 (удалить)
139.134.69.54 (удалить)
потом когда нужму на кнопку сохранить чтоби документ сохранился
не так(<add ip"172.16.20.128"> <add ip"193.104.85.129"> <add ip"139.134.69.54">)
а так(<add ip"193.104.85.129"> <add ip"139.134.69.54">)
прикол в чем? что он не виводит адд ип и " и < а только сам ип и если удалить сохранит без него и удалит соответсвующий ему лебел токо которий слева от него
но обезательно создавать кнопку и лабел лабел имя = ип кнопку просто удалить
как понимаю
кнопка удалить делает
delete_text <add ip"integer">
там невипдимое мемо может и бить точно не знаю
ну очень нада
а можно и сделать через листбокс 2 раза чтобы удалить
0
429 / 337 / 36
Регистрация: 31.05.2011
Сообщений: 1,156
06.06.2011, 14:49 5
правельно заданный вопрос, уже половина ответа
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
06.06.2011, 14:49

Создание команд в c++
Всем доброго дня! Собственно я решил попробовать сделать тестовую библиотеку для C++ ,однако...

Поиск команд ASM
Здравствуйте. Я пытаюсь отловить с помощью своего модуля,функцию другого модуля. Составляю...

Последовательное выполнение всех команд в bat-файле
Всем привет, ребят, помогите пожалуйста с проблемкой, в бат файле выполняются не все команды, а...

Создание объединения команд.
Здравствуйте, уважаемые программеры. Возникла необходимость выполнить задание на объединение...

Сократить текст программы, т.е. ряд команд заменить одной
Необходимо сократить текст программы, т.е. ряд команд заменить одной, при этом суть выполняемого...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.