Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.25;
Скачать: CL | DM;

Вниз

вопос   Найти похожие ветки 

 
bondik   (2002-11-14 15:57) [0]

У меня есть вопрос какн аписать в Delphi аналог процедуры Insert, но процедурой Delete и функцией Copy не пользоваться.


 
stone ©   (2002-11-14 16:00) [1]

а поконкретнее можно? Какой именно Insert?


 
BSD   (2002-11-14 16:14) [2]

Если ты о строках, то можно например так:

function MyInsert(Source,St:string;pos:integer):string;
var
i:integer;
begin
Result:="";
for i:=1 to pos-1 do Result:=Result+St[i];
for i:=1 to Length(Source) do Result:=Result+Source[i];
for i:=pos to Length(St) do Result:=Result+St[i];
end;

Только Range cheking сделай.



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

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

Наверх




Память: 0.46 MB
Время: 0.021 c
3-82668
xxxxxx
2002-11-06 17:53
2002.11.25
Чем экспортировать таблицу .gdb в текстовый файл.


1-82693
K_O_T
2002-11-14 14:36
2002.11.25
Глюк с ListView


1-82752
Lola
2002-11-13 13:29
2002.11.25
Печать из QReport в RTF-файл.


1-82757
vitnt
2002-11-15 13:15
2002.11.25
StrToDateTime


1-82725
Программист
2002-11-15 06:54
2002.11.25
Как определить, что мышь уже не находится над картинкой.