Скачать: 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 вся ветка

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



Память: 0.44 MB
Время: -0.979 c