Текущий архив: 2003.02.17;
Скачать: CL | DM;

Вниз

Позиция в строке.   Найти похожие ветки 

← →
ltexcimer   (2003-02-06 20:03) [0]

Здравствуйте, уважаемые.
Буду очень благодарен за помощь.
Нужно нужно записать символ в сроку в определенную позицию. Ну скажем в позицию 10.
Например есть пустая строка в memo.
Нужно чтобы в 10ой позиции этой строки стоял символ "h".

---

← →
gsu ©   (2003-02-06 20:04) [1]

s[10]:="h"

---

← →
Kotka ©   (2003-02-06 20:05) [2]

или Insert

---

← →
Anatoly Podgoretsky ©   (2003-02-06 21:28) [3]

Строка пустая

---

← →
Palladin ©   (2003-02-06 22:31) [4]


function InsertChar(p_strSrc:string;p_cChar:char;p_nPos:integer):string;
var
i:integer;
begin
result:=p_strSrc;
if length(result)<p_nPos then
for i:=length(result) to p_nPos-1 do result:=result+" ";
insert(p_cChar,result,p_nPos);
end;


---

← →
ltexcimer   (2003-02-07 12:12) [5]

Всем большое спасибо!

---

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

Текущий архив: 2003.02.17;
Скачать: CL | DM;

Наверх

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