Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.09.15;
Скачать: CL | DM;

Вниз

сравнение строк   Найти похожие ветки 

 
elf   (2003-09-02 15:15) [0]

Нужно сравнить edit1.tex со строкой, где 1-й символ "a", далее любые символы, за ними "f", и далее один любой символ. Как это записать?

if edit1.tex="a"+*+"f"+$


 
MBo ©   (2003-09-02 15:20) [1]

matchesmask


 
KSergey ©   (2003-09-02 15:23) [2]

Это задание для курсовой или к следующей лабе? А подумать?

Но я сейчас добрый. Ну вот именно для такой задачи я бы сделал так (не проверял, может где и подпутал что)

i: integer;

if (Length(edit1.text) > 3) AND (edit1.text[1] = "a") then
begin
i := Pos("f", edit1.text);
if (i > 1) AND (Length(edit1.text) = i+1) then
// УРА! именно то что надо!!
end;


 
KSergey ©   (2003-09-02 15:24) [3]

2 MBo © (02.09.03 15:20)

Ух ты, все уже написано до нас... Спасибо за подсказку.


 
KSergey ©   (2003-09-02 15:25) [4]

2 MBo © (02.09.03 15:20)++

Просто пока писал - вы раньше опубликовали, я еще не видел ;)


 
MBo ©   (2003-09-02 15:30) [5]

>KSergey
конечно, в частных случаях эффективнее свою функцию писать бывает, что-то вроде
l:=length(s);
if (l>=3) and (s[1]="a") and (s[l-1]="f")



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

Текущий архив: 2003.09.15;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.023 c
1-48635
Star Wars
2003-09-03 09:09
2003.09.15
Массив динамических массивов


1-48552
hawkins
2003-09-01 22:07
2003.09.15
Как скопировать изображение из TDBImage в TImage?


3-48418
val_5
2003-08-24 23:09
2003.09.15
Не вводятся русск буквы в БД


1-48569
vinter
2003-09-04 06:44
2003.09.15
Форма всегда поверх всех


14-48737
Карлсон
2003-08-27 10:32
2003.09.15
я вернулся!