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

Помогите програмисты,это очень важно для меня   Найти похожие ветки 

← →
Busik ©   (2006-10-23 22:15) [0]

Как програмно сделать чтобы строка введённая в Edit1 к примеру
:)Goblen12345@nextmail.ru000000000000000000, читалась программой так
Goblen12345@nextmail.ru ? То есть программа должна игнорировать метку:) и
нули которые в конце.

---

← →
Ketmar ©   (2006-10-23 22:18) [1]

так взять, и вырезать. F1, "предметный указатель", "string handling routines".

---

← →
Busik ©   (2006-10-23 22:23) [2]

Извините я начинающий можно пример на Delphi ?

---

← →
Leonid Troyanovsky ©   (2006-10-23 22:29) [3]

> Busik ©   (23.10.06 22:23) [2]

> Извините я начинающий можно пример на Delphi ?


with Edit1 do Text := Copy(Text, 3, 23);

--
Regards, LVT.

---

← →
Busik ©   (2006-10-23 22:32) [4]

Спасибо я попробую (эта проблема не даёт мне жить уже неделю)

---

← →
Busik ©   (2006-10-23 22:57) [5]

with Edit1 do Text := Copy(Text, 3, 23);//что эта строка делает?

--
Regards, LVT.//А что это?

Извиняюсь за тупость.

---

← →
Virgo_Style ©   (2006-10-23 23:06) [6]

Busik ©   (23.10.06 22:57) [5]
что эта строка делает?

Ровно то, что про нее в справке написано, а что, есть сомнения?

---

← →
TUser ©   (2006-10-23 23:24) [7]

if Edit1.Text = ":)Goblen12345@nextmail.ru000000000000000000" then
 Edit1.Text := "Goblen12345@nextmail.ru";

---

← →
Германн ©   (2006-10-23 23:48) [8]

> Busik ©   (23.10.06 22:32) [4]
>
> ... (эта проблема не даёт мне жить уже неделю)
> <Цитата>
>
> Busik ©   (23.10.06 22:57) [5]
>
> with Edit1 do Text := Copy(Text, 3, 23);//что эта строка
> делает?
>


Так и хочется вспомнить "Каникулы в Простоквашино". :-)

---

← →
Busik ©   (2006-10-24 00:04) [9]

Все мы в чём-то новички.

---

← →
metalfan ©   (2006-10-24 00:08) [10]

алгоритм:
ищем последнюю точку. от нее ищем первую цыфру. все что до цифры - адрес.
так? сами напишите я думаю?

---

← →
Palladin ©   (2006-10-24 00:09) [11]

но не до такой же степени... письменность не для профи придумали...

---

← →
Gero ©   (2006-10-24 00:12) [12]

> [9] Busik ©   (24.10.06 00:04)

Delete, цикл while, еще Delete.

---

← →
Shirson ©   (2006-10-24 09:10) [13]

Или еще вариант алгоритма.
Разворачиваем строку, находим первую не-цифру, отрезаем всё до неё, разворачиваем строку.

---

← →
Anatoly Podgoretsky ©   (2006-10-24 09:13) [14]

А подумать, ведь можно и не разворачивать

---

← →
Shirson ©   (2006-10-24 09:57) [15]

Можно. Много чего можно.

---

← →
Anatoly Podgoretsky ©   (2006-10-24 12:30) [16]

А если можно, то зачем делать лишнию работу, с обратными циклами знаком.

---

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

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



Память: 0.48 MB
Время: 0.065 c