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

Обрезать строку по определёной длине   Найти похожие ветки 

← →
dreamse   (2005-10-27 08:46) [0]

Подскажите как обрезать строку по какзанной длине

что то типа obrezka("aaaaaaaaaaaaaaaaaaaaaaaaa",5)

получаеться aaaaa

---

← →
ЮЮ ©   (2005-10-27 08:55) [1]

function  obrezka(S: string; LengthWanted: integer): string
begin
 Result := S;
 if Length (S) <= LengthWanted then Exit;
 SetLegth(Result , LengthWanted);
end

---

← →
stud ©   (2005-10-27 09:05) [2]

ну если использовать string наверное проще
result :=copy(s,1,lengthwonted)

---

← →
ЮЮ ©   (2005-10-27 09:09) [3]

>stud ©   (27.10.05 09:05) [2]
obrezka в один оператор совсем уж не круто :)

---

← →
Zacho ©   (2005-10-27 09:11) [4]

А ещё есть процедура Delete(var S: string; Index, Count:Integer)
:-)

---

← →
dreamse   (2005-10-27 09:51) [5]

Спасибо !

---

← →
dreamse   (2005-10-27 09:54) [6]

> ЮЮ

Ругаеться на SetLegth что делать ?

---

← →
dreamse   (2005-10-27 09:55) [7]

Сам парюсь !!! SetLength

---

← →
msguns ©   (2005-10-27 11:48) [8]

LeftStr, RightStr + uses StrUtils

---

← →
ORA-00000 ©   (2005-10-27 12:37) [9]

Мда... А еще есть куча других способов...

---
(~|~)

---

← →
arhis   (2005-10-27 12:44) [10]

delete(string,Wantedlength,Length(string));

---

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

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



Память: 0.46 MB
Время: 0.031 c