| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Получение символов [D7, XP]
lobach © (2006-10-01 06:30:00)Здравствуйте мастера!!!
У меня есть переменная типа String, мне нужно получить первые 3 символа, подскажите пожалуйста, как это сделать.
Наиль (2006-10-05 15:27:00) [1]
> мне нужно получить первые 3 символа
> Мне надо-было расширение файла узнать
Гениально!
Amoeba (2006-10-05 13:34:00) [2]
> Мне надо-было расширение файла узнать
С этого и надо было начинать вопрос!
Стандартная ф-ия ExtractFileExt чем не угодила? Расширение вовсе не обязано бть из 3-х символов. Так что твой код никуда не годится по всем статьям.
@!!ex (2006-10-05 13:31:00) [3]А если расширение файла не 3 символа?(*.conf - конфига мультиОСных серверов, *.h - хедеры в С++ и т.д.....) :))
ExtractFileExt
Может стоит сначало почитать какие ниьт книжки по основам программирования? Фаронов, например.... ПРограммирование на Turbo Pascal 7.0
MacroDenS (2006-10-05 13:06:00) [4]
Так первые три это 1,2,3, а последние могут быть какими, длинна неизвестна
смотри [6] + [7]
lobach (2006-10-05 13:06:00) [5]Спасибо за Length. Мне надо-было расширение файла узнать, я так сделал:
var
s:String;
ext3:Integer;
ext2:Integer;
ext1:Integer;
ext:String;
begin
s:='file.ext';
ext3:= Length(S);
ext2:= Length(S)-1;
ext1:= Length(S)-2;
ext:= s[ext1]+s[ext2]+s[ext3];
end;
lobach (2006-10-05 12:55:00) [6]Так первые три это 1,2,3, а последние могут быть какими, длинна неизвестна
Kolan (2006-10-05 12:54:00) [7]Length(S) = длинна строки = последний символ. Остальное подсказали уже.
han_malign (2006-10-05 12:54:00) [8]
> А как послндние 3 символа получить
- Copy(S,(Length(S) - 2), 3)
- StrUtils.Left/RightStr
Stakan (2006-10-05 12:53:00) [9]lobach © (05.10.06 12:51) [4]
Так - же как и первые.
А длина String определяется ф-ей Length
lobach (2006-10-05 12:51:00) [10]А как послндние3 символа получить
X9 (2006-10-01 08:17:00) [11]S2 := Copy(S, 1, 3);
Fay (2006-10-01 06:57:00) [12]Ну или
s[1], s[2] и s[3]
Fay (2006-10-01 06:56:00) [13]Copy
| |
