HOME    FORUMS    MEMBERS    RECENT POSTS    LOG IN  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

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

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

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

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

Репутация: 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..
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
домен в адресной строке. 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.XYZ