Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2003.09.22;
Скачать: [xml.tar.bz2];

Вниз

На конце 0   Найти похожие ветки 

 
Russko   (2003-09-01 09:38) [0]

Уважаемые мастера, помогите пожалуйста.
Как программно узнать - оканчивается строка на 0 (нуль) или нет?
Заранее благодарен!


 
stone   (2003-09-01 09:46) [1]

var
MyString: string;

if MyString[length(MyString)] = "0" then
ShowMessage("Оканчивается на ноль");


 
Reindeer Moss Eater   (2003-09-01 09:54) [2]

Russko у тебя что, типы данных могут меняться во время выполнения программы?
Если это string, то ноль есть, если shortstring то нет.


 
имя   (2003-09-01 09:54) [3]

Удалено модератором


 
sniknik   (2003-09-01 10:36) [4]

Reindeer Moss Eater © (01.09.03 09:54) [2]
> Если это string, то ноль есть, если shortstring то нет.
гдето читал (точно сказать где не могу :-() что delphi к любой строке добавляет #0 в конце для облегчения перевода в PChar.


 
Anatoly Podgoretsky   (2003-09-01 12:39) [5]

К пустым строкам это не относится


 
sniknik   (2003-09-01 14:34) [6]

Anatoly Podgoretsky © (01.09.03 12:39) [5]
т.е. это правда, про ноль (а не глюк у меня в памяти ;о)))

тогда
2 Russko © (01.09.03 09:38)
все просто
if length(MyString) <> 0 then ShowMessage("Оканчивается на ноль");



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

Форум: "Базы";
Текущий архив: 2003.09.22;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.014 c
1-71745
ramdy
2003-09-11 15:59
2003.09.22
cannot assign TIBQuery to TIBQUery???!!!


1-71657
Тих
2003-09-08 21:05
2003.09.22
HTML в CLipboard


14-71837
Knight
2003-08-31 22:48
2003.09.22
Никто не отвечает, поэтому делаю отдельную ветку...


1-71694
bon
2003-09-11 09:20
2003.09.22
Windows Desctop


1-71621
killer
2003-09-09 13:34
2003.09.22
Как в запущенной программе создать кнопку?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский