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

Вниз

listview   Найти похожие ветки 

 
Змей ©   (2004-12-01 17:12) [0]

у меня не получается проверить пустоту первой строки
 for x := 0 to lv.Items.Count-1 do  begin
         if  lv.Items[0].Caption<>emptystr  then begin
           edit1.text:=inttostr(x);
         end;
         end;
вот так получается ну если не пустая строка то   edit1.text:=inttostr(x);
а вот как сделать ? если она пустая то showmessage("нет текста")
if  length(lv.Items[0].Caption)<0  then begin
         showmessage("нет текста")

                    end;

не получается
заранее благодарю


 
Shuma ©   (2004-12-01 18:05) [1]

сделай так
if lv.Items[0].Caption = ""  then
 showmessage("нет текста")



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

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

Наверх





Память: 0.44 MB
Время: 0.083 c
1-1101935712
Змей
2004-12-02 00:15
2004.12.19
Горячая клавиша


14-1101466897
Vvika-sim
2004-11-26 14:01
2004.12.19
Включить компьбтер через лакальную сеть


3-1101115642
RRRulex
2004-11-22 12:27
2004.12.19
обновление записи набора данных из 2-х связанных таблиц


14-1101488372
Alex_Petr
2004-11-26 19:59
2004.12.19
На тему давления авторитетом.


1-1102428928
Гость
2004-12-07 17:15
2004.12.19
Модальное окно





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский