HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   ANTICHAT > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

  #21  
Старый 04.04.2010, 18:50
Ss[x]dD
Познающий
Регистрация: 07.06.2009
Сообщений: 30
С нами: 8909709

Репутация: 0
По умолчанию

ну т.е. если пользоваться кодом #17 то сдвиг идет слева-направо (с начала строки в конец строки) вотъ хотелось бы чтобы наоборот все осуществлялось.
 
Ответить с цитированием

  #22  
Старый 04.04.2010, 19:36
JnK
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
С нами: 10060964

Репутация: 52
По умолчанию

Писал же:
Вместо:
insert('_',S,Paste[i]+j);
использовать:
insert('_',S,length(s)-Paste[i]+j);

Берем длину сообщения: length(s)
Вычитаем из нее нужное число: Paste[i]
добавляем сдвиг : j (это что бы не учитывались ранее вставленые _ )

Вот исправленый пример во 2 варианте:
PHP код:
procedure TForm1.Button1Click(SenderTObject);
const
  
Delimiter=',';
  
Replacement='_';
var
  
I:integer;
  
Num,Str:string;
begin
  Str
:=edit1.text;
  
Num:=edit2.text+Delimiter;
  
I:=0; {новая позицияс уже добавлеными символами}
  While 
length(Num)>do
  
begin
    insert
(Replacement,Str,length(Str)-strtoint(copy(Num,1,pos(Del  imiter,Num)-1))+I);
    
delete(Num,1,pos(Delimiter,Num));
    
inc(I);
  
end;
  
edit1.Text:=Str;
end

Последний раз редактировалось JnK; 04.04.2010 в 19:40..
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
AlfaBrute build 3121 e1kwaeR Skype, IRC, ICQ, Jabber и другие IM 43 05.11.2010 21:20
домен в адресной строке. Cthulchu Болталка 10 03.07.2009 22:39
Хакерский сленг Utochka Болталка 18 20.06.2007 12:24
«Красный Крест» запрещает использование своего символа на аптечках в компьютерных игр dinar_007 Болталка 4 13.02.2006 07:35



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.