![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Имеется строка символов, разделенные запятыми и пробелами.
текст1,(пробел)Текст2,(пробел)текст3 Записана данная строка в Edit. Требуется разделить её на несколько Edit'ов. То есть Edit1 полная запись. Edit2 Текст1(без запятой и пробела), Edit3 Текст2(без запятой и пробела) Edit4 Текст3(без запятой и пробела). |
#2
|
||||
|
||||
![]() много раз спрашивалось и отвечалось:
Код:
var AStrings: TStrings; begin AStrings:=TStringList.Create; try AStrings.Text:=StringReplace(Edit1.Text, ', ', #13#10, [rfReplaceAll, rfIgnoreCase]); Edit2.Text:=AStrings[0]; Edit3.Text:=AStrings[1]; Edit4.Text:=AStrings[2]; finally AStrings.Free; end; end; Пишу программы за еду. __________________ |
Этот пользователь сказал Спасибо NumLock за это полезное сообщение: | ||
KaLLIaK (03.06.2012)
|
#3
|
|||
|
|||
![]() отлично работает.
только если вдруг оказывается меньше 3, выдает ошибку. Каким способом, можно при избытке или нехватке добавлять эдиты. 2 вопрос, имеется поисковик по txt файлу Поиск.rar. можно ли сделать что-бы искал во всех txt файлах в заданной папке. 3 вопрос, имеется в txt файле записи: Текст231 (пробел) Путь. Можно ли после того как поисковик нашел Текст231 остальные символы в строке распознал как путь на конце которого ждет установщик) |
#4
|
|||
|
|||
![]() вот какие тебе нафиг драйверы если такие вопросы задаеш?
|
#5
|
|||
|
|||
![]() Знаешь ответы на эти вопросы?
Смысл писать такие сообщение?! ![]() Знаешь напиши, не знаешь или считаешь ниже своего достоинства помочь, промолчи. |
#6
|
|||
|
|||
![]() Цитата:
Читай умные книжки. Особенно по алгоритмизации. |