| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Удалить символ из поля

Страницы:   < 1 2 >

Sapan ©   (2007-04-19 22:17:00) 

Можно ли удалить символ из поля edit напрямую без использования переменных? Если можно то как?

---

oxffff   (2007-04-19 22:59:00) [21]

> {RASkov}   (19.04.07 22:58) [8]
> > [2] Sapan ©   (19.04.07 22:34)
>
> function MyDelete(const S: String; const N, J: Integer):
>  String;
> begin
>  Result:=S;
>  Delete(Result, N, J);
> end;
>
> вызов:
> Edit.Text:=MyDelete(Edit.Text, 2, 1);


И здесь временные переменные.

---

{RASkov}   (2007-04-19 22:58:00) [22]

> [2] Sapan ©   (19.04.07 22:34)

function MyDelete(const S: String; const N, J: Integer): String;
begin
 Result:=S;
 Delete(Result, N, J);
end;

вызов:
Edit.Text:=MyDelete(Edit.Text, 2, 1);

---

oxffff   (2007-04-19 22:44:00) [23]

> palva ©   (19.04.07 22:41) [5]
> Вот так можно удалить четвертый символ:
> Edit1.Text := Copy(Edit1.Text, 1, 3) + Copy(Edit1.Text,
> 5);


Используются временные переменные.

> Keni ©   (19.04.07 22:41) [6]
> var s:string;
> begin
> s:=edit1.text;
> delete(s,4,3);
> edit1.text:=s;
> end;
>
> самый лучший вариант


Ты задание внимательно читал?

---

Keni   (2007-04-19 22:41:00) [24]

var s:string;
begin
s:=edit1.text;
delete(s,4,3);
edit1.text:=s;
end;

самый лучший вариант

---

palva   (2007-04-19 22:41:00) [25]

Вот так можно удалить четвертый символ:
Edit1.Text := Copy(Edit1.Text, 1, 3) + Copy(Edit1.Text, 5);

---

Kolan   (2007-04-19 22:38:00) [26]

> без использования переменных?

А что задали без доп. переменных?

---

palva   (2007-04-19 22:38:00) [27]

TEdit.Text это не переменная а свойство. У свойства нет адреса, поэтому свойство не может выступать var параметром функции Delete. В этом трудность.

---

Sapan   (2007-04-19 22:34:00) [28]

Использую процедуру delete(Edit1.text,4,3) но он пишет ошибку "Constant object cannot be passed as var parameter"

---

Jeer   (2007-04-19 22:24:00) [29]

Я те поведаю страшную тайну - TEdit.Text тоже переменная типа string.
Поэтому, научившись удалять чего-либо из string - сможешь и из TEdit.Text

---

Страницы:   < 1 2 >

Наверх