Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как из строки program_#12345#.exe вырезать прочесть 123456

elfebet © (2006-04-14 13:17:00)
Как?

Сергей М. (2006-04-14 16:05:00) [1]

> elfebet © (14.04.06 15:48) [8]

В управдомы.

_RusLAN (2006-04-14 16:02:00) [2]
"В правильно заданом вопросе, заключается половина ответа", ну может чуть по-другому было сказано.

Что значит

elfebet © (14.04.06 13:17)
из строки program_#12345#.exe вырезать прочесть 123456?

Где критерий, по какому определяется что надо вырезать из строки.
Может это просто символы с 11 по 15
может это просто получить 5 символов с конца строки начиная с пятого
А може все таки получить все символы которые стоять между парой каких-то определенных знаков (#) и тогда задача разбивается
- на получение позиции первого знака-разделителя
- на получение позиции второго знака-разделителя
- копирование всех символов с первой позиции по вторую
А дальше если посмотреть в хелп, в раздел по работе со строками, можно найти все готовые функции и процедуры.

Если для вас сложно самостоятельно решить такую задачу то лучше сменить профессию.

elfebet (2006-04-14 15:48:00) [3]

> Народ, так у вас у всех 12345 получается, а надо 123456...

упс...

balepa (2006-04-14 13:53:00) [4]
А по моему совету должно нормально получиться (если мозг в порядке) :)

begin...end (2006-04-14 13:38:00) [5]
Народ, так у вас у всех 12345 получается, а надо 123456...
:о)

easy (2006-04-14 13:29:00) [6]

> Как из строки program_#12345#.exe вырезать прочесть
> 123456

function ParseStr(s:string;quote:char):string; var i:integer; begin result:=''; i:=pos(quote,s); if i<>0 then begin delete(s,1,i); i:=pos(quote,s); if i<>0 then result:=copy(s,1,i-1); end; end; procedure TForm1.Button1Click(Sender: TObject); begin showmessage(ParseStr('program_#12345#.exe','#')); end;

031178 (2006-04-14 13:24:00) [7]
Считаешь символы в строке, находишь #, запоминаешь его номер в строке, остальные сиволы записываешь в отдельную строку до тех пор пока не встится # и все !!!

balepa (2006-04-14 13:24:00) [8]

> Der Nechk@ssoff ©

Умный стал. Иди Paint запускай

elfebet
Цикл + мозги (Вроде функции есть по поиску строки в строке если известно что искать)

Сергей М. (2006-04-14 13:23:00) [9]
SomeStringList.Delimiter := '#';
SomeStringList.DelimitedText := 'program_#12345#.exe';
ShowMessage(SomeStringList[1]);

Der Nechk@ssoff (2006-04-14 13:20:00) [10]

> Как?

Молча.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »