Вниз
Скачать: CL | DM;

Получение символов   Найти похожие ветки 

 
lobach ©   (2006-10-01 06:30) [0]

Здравствуйте мастера!!!
У меня есть переменная типа String, мне нужно получить первые 3 символа, подскажите пожалуйста, как это сделать.


 
Fay ©   (2006-10-01 06:56) [1]

Copy


 
Fay ©   (2006-10-01 06:57) [2]

Ну или
s[1], s[2] и s[3]


 
X9 ©   (2006-10-01 08:17) [3]

S2 := Copy(S, 1, 3);


 
lobach ©   (2006-10-05 12:51) [4]

А как послндние 3 символа получить


 
Stakan ©   (2006-10-05 12:53) [5]

lobach ©   (05.10.06 12:51) [4]
Так - же как и первые.
А длина String определяется ф-ей Length


 
Kolan ©   (2006-10-05 12:54) [6]

Length(S) = длинна строки = последний символ. Остальное подсказали уже.


 
han_malign ©   (2006-10-05 12:54) [7]


> А как послндние 3 символа получить

- Copy(S,(Length(S) - 2), 3)
- StrUtils.Left/RightStr


 
lobach ©   (2006-10-05 12:55) [8]

Так первые три это 1,2,3, а последние могут быть какими, длинна неизвестна


 
MacroDenS ©   (2006-10-05 13:06) [9]


Так первые три это 1,2,3, а последние могут быть какими, длинна неизвестна

смотри [6] + [7]


 
lobach ©   (2006-10-05 13:06) [10]

Спасибо за 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;


 
@!!ex ©   (2006-10-05 13:31) [11]

А если расширение файла не 3 символа?(*.conf - конфига мультиОСных серверов, *.h - хедеры в С++ и т.д.....) :))

ExtractFileExt

Может стоит сначало почитать какие ниьт книжки по основам программирования? Фаронов, например.... ПРограммирование на Turbo Pascal 7.0


 
Amoeba ©   (2006-10-05 13:34) [12]


> Мне надо-было расширение файла узнать

С этого и надо было начинать вопрос!

Стандартная ф-ия ExtractFileExt чем не угодила? Расширение вовсе не обязано бть из 3-х символов. Так что твой код никуда не годится по всем статьям.


 
Наиль ©   (2006-10-05 15:27) [13]


> мне нужно получить первые 3 символа


> Мне надо-было расширение файла узнать

Гениально!



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.026 c
3-1156506680
иван8511
2006-08-25 15:51
2006.10.22
Перехватить ошибку Key violation


2-1159864794
Игорь_
2006-10-03 12:39
2006.10.22
QuickSort для массивов с элементами разных типов.


2-1159968384
Виктория
2006-10-04 17:26
2006.10.22
TMemo


2-1159539190
Isaev
2006-09-29 18:13
2006.10.22
Скрыть курсор


3-1156448842
Рустем
2006-08-24 23:47
2006.10.22
Проблема с триггером в MySQL...




   Наверх