![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
delete(var S:String; Index: Integer; Count: Integer); [D5, WinXP]
Peroon © (2002-11-27 01:55:00)delete(var S:String; Index: Integer; Count: Integer);
Чего-то у меня не работает эта процедура.
Ошибки не возникает, но ничего и не удаляет.
For (2002-11-27 08:58:00) [21]Скорей всего ты просто пишишь
S:="Проба";
delete(s,2,4);
Если так написать то S как была словом проба так им и останется
а чтобы от S осталась только буква П надо еще добавить после
delete(s,2,4); оператор присвоения, т.е.
S:=S;
Пример:
procedure TForm1.Button1Click(Sender: TObject);
var
S:String;
begin
S:=Edit1.Text;
Delete(S,2,4);
Edit1.Text:=S;
end;
SottNick (2002-11-27 06:45:00) [22]Можно говорить?
Ага.
Сейчас.
Значит так...
У всех работает, у вас не работает...
А драйвер процессора для поддержки работы со строковыми переменными у вас установлен?
Надо уже научиться отличать процедуру от функции.
var s,s1:string;
begin
s:="Наехали гости на бал";
s1:="Наехали гости на бал";
delete(s1,4,14);
showmessage(s+#13+s1);
end;
Сильно (2002-11-27 04:49:00) [23]сказано! Достойно книги рекордов Гиннеса! Жаль только невинно обвиненного древнеславянского бога. Он все-таки, не был столь туп!