|
Вопрос # 2 296/ вопрос открыт / |
|
Здравствуйте!
подскажи пожалуйста что означает:\\"POS\\"
Приложение: Переключить в обычный режим- procedure TForm1.Button1Click(Sender: TObject);
- var s:shortString;
- k:integer;
- begin
- s:=edit1.Text;
- while length(s)>0 do
- begin
- k:=POS(' ',s);
- if k=0 then begin
- edit2.Text:=s;
- break;
- end
- else
- delete(s,k,1);
- end;
-
 |
Вопрос задал: joke (статус: Посетитель)
Вопрос отправлен: 11 января 2009, 20:59
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: min@y™
Это функция поиска позиции начального символа первого вхождения подстроки в строку. В любой книжке по паскалю, не говоря уж о справке (F1), есть описание этой функции.
В данном случае k:=POS(' ',s); - это поиск первого пробела в строке s.
 |
Ответ отправил: min@y™ (статус: Доктор наук)
Время отправки: 11 января 2009, 21:12
|
Мини-форум вопроса
Всего сообщений: 1; последнее сообщение — 13 января 2009, 23:18; участников в обсуждении: 1.
|
Паровоз (статус: 10-ый класс), 13 января 2009, 23:18 [#1]:
А что, F1 не раблтает?
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|