Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 31.01.2013, 05:32   #11
Volkogriz
Форумчанин
 
Аватар для Volkogriz
 
Регистрация: 11.10.2007
Сообщений: 384
По умолчанию

Огромное всем спасибо!!!!!!!!
Я Даже и не ожидал помощи в это время,
Теперь есть три часа поспать благодаря вам!
Ещё раз спасибо!!!
С уважением,
Volkogriz!
Не количеством плюсов измеряется репутация человека...!
Volkogriz вне форума Ответить с цитированием
Старый 31.01.2013, 15:45   #12
3D Hunter
Сумрачная тень
Форумчанин
 
Аватар для 3D Hunter
 
Регистрация: 05.03.2009
Сообщений: 689
По умолчанию

чисто для справки автору темы.то,что предложил вам кольша,называется расширение типов и такая возможность использовать тип как класс,появилась в хе3.у вас,видимо,более ранняя версия,поэтому компилятор выдал ошибку.
"ковыряю изнутри" (с)
3D Hunter вне форума Ответить с цитированием
Старый 31.01.2013, 23:25   #13
XeruH
Форумчанин
 
Регистрация: 17.09.2010
Сообщений: 229
По умолчанию

Цитата:
Сообщение от Кольша Посмотреть сообщение
Я так полагаю с ip мучаетесь?
Код:
for x := 0 to StringList1.Count-1 do
  if (StringList1[x]<>'') and (StringList2.IndexOf(StringList1[x])=-1) and(copy(StringList1[x],StringList1[x].length-3,4)='AbCd') then
    StringList2.Add(StringList1[x]);
Как то так..
Этот код ведь не работает! Вернее, рано или поздно появится ошибка Out of bounds.
Я б лучше использовал
Код:
 for x := Pred(StringList1.Count) downto 0 do
или while
Правильно заданный вопрос - половина ответа!
XeruH вне форума Ответить с цитированием
Старый 31.01.2013, 23:30   #14
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

Цитата:
Этот код ведь не работает!
этот код отлично работает, ибо в нем нет delete.
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 01.02.2013, 00:09   #15
XeruH
Форумчанин
 
Регистрация: 17.09.2010
Сообщений: 229
По умолчанию

Цитата:
Сообщение от Пепел Феникса Посмотреть сообщение
этот код отлично работает, ибо в нем нет delete.
Действительно. Что-то я с первого сообщения зациклился на этом удалении.
Правильно заданный вопрос - половина ответа!
XeruH вне форума Ответить с цитированием
Старый 02.02.2013, 03:42   #16
Volkogriz
Форумчанин
 
Аватар для Volkogriz
 
Регистрация: 11.10.2007
Сообщений: 384
По умолчанию

Да делфя у меня седьмая!)
С пятой перешёл!)
Не могу к новым интерфейсам адаптироваться!
Не количеством плюсов измеряется репутация человека...!
Volkogriz вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Удалить пустые строки из TStringList apromix Общие вопросы Delphi 5 14.09.2016 12:14
Поиск и удаление символа в TStringList sariman Общие вопросы Delphi 2 25.07.2012 23:56
Куда деваются строки в TStringList JekaDefer Общие вопросы Delphi 64 18.05.2012 21:18
Удаление дублирующихся строк в TStringList Alex Cones Общие вопросы Delphi 4 28.05.2010 20:33
Добавление в TMemo, последней строки из TStringList OPF_Nik Помощь студентам 3 31.01.2010 17:35