Вниз
Скачать: CL | DM;

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

← →
Handler   (2012-06-11 11:15) [0]

S1 := "Led/ Жк телевизор BBK LED1955DT";
S2 := "Led/ ЖК телевизор BBK LED1955DT";

 ShowMessage(BoolToStr(SameText(S1, S2)));

Результат сравнения - False. Почему? Сравнение ведь происходит без учета регистра.


← →
Anatoly Podgoretsky ©   (2012-06-11 11:22) [1]

> Handler  (11.06.2012 11:15:00)  [0]

А может с учетом, проверь измени букву <К>


← →
Anatoly Podgoretsky ©   (2012-06-11 11:23) [2]

> Handler  (11.06.2012 11:15:00)  [0]

Кроме того как ты различаешь - где пробел, а где скажем табуляция или другой
непечатный символ, например на разрывный пробел.
Ты что расчитываешь, что мы за тебя сделаем отладку?


← →
Handler   (2012-06-11 11:26) [3]

Почему-то при сравнении SameText, CompareText получается, что строки не равны, а если использовать ANSICompareText - равны


procedure TForm1.FormCreate(Sender: TObject);
var
 S1, S2: string;
 SL: TStrings;
begin
 S1 := "Led/ Жк телевизор BBK LED1955DT";
 S2 := "Led/ ЖК телевизор BBK LED1955DT";

 ShowMessage(BoolToStr(S1 <> S2, True)); // S1 <> S2

 SL := TStringList.Create;
 try
   SL.Add(S1);
   ShowMessage(IntToStr(SL.IndexOf(S2))); // S1 = S2
 finally
   SL.Free;
 end;

end;


← →
sniknik ©   (2012-06-11 11:31) [4]

различие в русских буквах а функция используется без учета локали, т.е. либо английской части буквы увеличивай, а русские не трожь, либо функцию меняй на AnsiSameText.


← →
Sha ©   (2012-06-11 11:32) [5]

Попробуй в среде Delphi навести курсор на имена этих функций
(SameText, CompareText, ANSICompareText) и нажать кнопку F1.

Ответ получишь раньше, чем за 11 минут.



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

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



Память: 0.46 MB
Время: 0.057 c
2-1348491706
Дениска
2012-09-24 17:01
2013.03.22
Кеширующий HTTP прокси сервер на основе IndyHTTPProxyServer


15-1353081080
Артём
2012-11-16 19:51
2013.03.22
нужен совет!


2-1348424060
buddypetrovich
2012-09-23 22:14
2013.03.22
serversocket1 vs clientsocket1


3-1283937300
Den
2010-09-08 13:15
2013.03.22
Запись изображения в БД


15-1333119005
Baks
2012-03-30 18:50
2013.03.22
#10008 - replace hard disk1




   Наверх