Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

Доброго времени суток 


Вадим   (2001-12-14 19:53) [9]

case? Приплыли, всю ночь гребли, а лодку отвязать забыли...

function IsRus(s: string): boolean;
var
i: integer;
const
RusChars = ["А".."Я", "а".."я"];
begin
Result := False;
for i := 1 to Length(s) do
if s[i] in RusChars then
begin
Result := True;
Break;
end;




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх








Память: 0.74 MB
Время: 0.024 c
14-22395          Alien                 2001-11-07 01:15  2002.01.08  
Чем бардак отличается от порядка?


6-22291           Leviathan             2001-10-09 22:02  2002.01.08  
Вопрос по компоненту NMFTP


14-22414          wHammer               2001-11-12 10:48  2002.01.08  
Delphi 5 and(or(xor)) C++ Builder 5?


6-22268           Voha                  2001-10-05 13:25  2002.01.08  
В компоненте WebBrowser нет параметра referer


1-22171           Dim                   2001-12-20 14:19  2002.01.08  
Возможно ли чудо?