Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.12.19;
Скачать: CL | DM;

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.023 c
1-1102005229
Unknown user
2004-12-02 19:33
2004.12.19
Соответствие классов


1-1102326103
jiran
2004-12-06 12:41
2004.12.19
Помогите перевести с с++ на Delphi вызов функции из dll !


1-1101988769
JohnS
2004-12-02 14:59
2004.12.19
Cron Format


11-1084117025
Рома
2004-05-09 19:37
2004.12.19
PageControl


3-1101195291
Black
2004-11-23 10:34
2004.12.19
Тонкий клиент