Извините, ничего не найдено.

Не расстраивайся! Лучше выпей чайку!
Регистрация
Справка
Календарь

Вернуться   www.boolean.name > Программирование игр для мобильных телефонов > MidletPascal > Библиотеки

Ответ
 
Опции темы
Старый 23.11.2011, 13:02   #1
treycerok
Оператор ЭВМ
 
Аватар для treycerok
 
Регистрация: 11.11.2011
Адрес: Ростов-на-Дону
Сообщений: 41
Написано 9 полезных сообщений
(для 17 пользователей)
Лампочка Замена символов в строке

и так есть код

var i:integer;
s:string;
begin
s:='gui_des';
setcolor(0);
for i:=1 to Length(s) do
begin
if s[i]='_' then s[i]:='+';

end;
drawtext(s,0,0);
repaint;
delay(2000);
end.


Вообщем не фурычит обращение к символу по его номеру в строке.... каким другим способ можно решить эту задачу? мне нужна замена определенного символа
(Offline)
 
Ответить с цитированием
Старый 23.11.2011, 13:57   #2
alexprey
ПроЭктировщик
 
Регистрация: 22.10.2010
Сообщений: 196
Написано 16 полезных сообщений
(для 30 пользователей)
Ответ: Замена символов в строке

getChar вроде. И не забываем сперва обращаться к доку
__________________
Для меня нет ничего не реального в кодинге, но мне лень
gainOS - прорыв в проектировании ОС на MIDlet Pascal
(Offline)
 
Ответить с цитированием
Старый 23.11.2011, 15:17   #3
treycerok
Оператор ЭВМ
 
Аватар для treycerok
 
Регистрация: 11.11.2011
Адрес: Ростов-на-Дону
Сообщений: 41
Написано 9 полезных сообщений
(для 17 пользователей)
Ответ: Замена символов в строке

да, так и решил , после минут десяти раздумий, просто привычно как в турбике, можно обращаться как к массиву ... =)

Делал циклом, но решил либу написать на J2ME ))слава богу ещё ума хватает на это)
если кому станет интересно,то могу и доделать до лучшего библиотеку)щас пока просто заменяется один символ,на другой, всё внутри вообщем)

Хотя если сделать так :
r:='abvgd';
r2:='абвгд';
s:=replacer('a12sasbwvsagffd',r,r2);
будет таковым возврат - a12sasбwвsaгffд
=)
Вложения
Тип файла: rar Lib_replace.rar (5.7 Кб, 159 просмотров)

Последний раз редактировалось ViNT, 24.11.2011 в 14:13.
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Deport (19.10.2012)
Старый 23.11.2011, 18:28   #4
alexprey
ПроЭктировщик
 
Регистрация: 22.10.2010
Сообщений: 196
Написано 16 полезных сообщений
(для 30 пользователей)
Ответ: Замена символов в строке

эх.
function Replace(strIn, patern: string): string;
 var p,len: integer;
      return: string;
begin
 return := '';
 len := Length(patern);
 p := Pos(strIn, patern);
 while (p >= 0) do
 begin
  return := return + Copy(strIn, 0, p)+patern;
  strIn := Copy(strIn, p+len, Length(strIn));
  p := Pos(strIn, patern);
 end;
 Result := return;
end;
Ну как то так
__________________
Для меня нет ничего не реального в кодинге, но мне лень
gainOS - прорыв в проектировании ОС на MIDlet Pascal
(Offline)
 
Ответить с цитированием
Старый 23.11.2011, 20:19   #5
treycerok
Оператор ЭВМ
 
Аватар для treycerok
 
Регистрация: 11.11.2011
Адрес: Ростов-на-Дону
Сообщений: 41
Написано 9 полезных сообщений
(для 17 пользователей)
Ответ: Замена символов в строке

Сообщение от alexprey Посмотреть сообщение
эх.
Ну как то так

да всё, то что я написал вполне удовлетворяет мои потребности)) и с моими задачами нормально справляются, но спасибо за ответ)
(Offline)
 
Ответить с цитированием
Старый 24.11.2011, 06:16   #6
YellowAfterlife
ПроЭктировщик
 
Аватар для YellowAfterlife
 
Регистрация: 19.02.2011
Сообщений: 134
Написано 81 полезных сообщений
(для 219 пользователей)
Ответ: Замена символов в строке

Текущая реализация немного... примитивная, что ли?

Хорошая реализация для замены одного совпадения:
// заменить(где, что, чем):результат
public static String replace(String whereString whatString with) {
    
int i where.indexOf(what);
    if (
== -1) return where;
    return 
where.substring(0i) + with where.substring(what.length());

__________________

Мой сайт-блог. Игры, обновления, примеры для Haxe, JavaScript(+HTML5), GameMaker, Love2d...
(Offline)
 
Ответить с цитированием
Старый 18.12.2011, 04:22   #7
bormotan
Оператор ЭВМ
 
Регистрация: 12.10.2011
Адрес: Воронеж
Сообщений: 46
Написано 2 полезных сообщений
(для 2 пользователей)
Сообщение Ответ: Замена символов в строке

Сообщение от treycerok Посмотреть сообщение
setcolor(0);
эммммм. а с каких это пор setcolor берет всего один параметр. вроде их три................
..............
(Offline)
 
Ответить с цитированием
Ответ


Опции темы

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +1, время: 03:09.


vBulletin® Version 3.6.5.
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Перевод: zCarot
Style crйe par Allan - vBulletin-Ressources.com