Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.11.05;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Начинающим";
Текущий архив: 2006.11.05;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.034 c
15-1161157669
Думкин
2006-10-18 11:47
2006.11.05
Головоломки профессора Головоломки. Гершензон


3-1157904807
Kley
2006-09-10 20:13
2006.11.05
Sql запрос


2-1161430410
d5vol1
2006-10-21 15:33
2006.11.05
Delphi 5. Рyководство pазpаботчика.


15-1160918158
PHPDeveloper
2006-10-15 17:15
2006.11.05
издатели дисков на территории СНГ


15-1161097796
SergP
2006-10-17 19:09
2006.11.05
Подскажите где взять утилитку для Low Level Format...





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский