Главная страница
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.015 c
1-48597
Basilio
2003-09-04 16:31
2003.09.15
Рождение потомка TStringList


1-48600
der
2003-09-03 10:36
2003.09.15
Через


4-48821
Still Swamp
2003-07-16 17:45
2003.09.15
Позиция клиентского RECT для окна


3-48449
Andrey V.
2003-08-22 23:10
2003.09.15
Параметры gbak.exe, gstat.exe и пр.


3-48426
koks
2003-08-25 11:11
2003.09.15
ADOTable...