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

Вниз

в ListView правильно SubItems.add или SubItems.Strings   Найти похожие ветки [1]

 
Garacio ©   (2007-01-14 13:54) [0]

Может возникать ошибка при компиляции, если я пытаюсь ввести значение в третью колоку, оставив приэмом вторую пустой?
Пока строка была такой:
ListView1.Items[g].SubItems.add("Ок");
Всё работало. Поменял на:
ListView1.Items[g].SubItems.Strings[1] := "Ок";
Появилась ошибка:
procedure TFormMain.FormCreate(Sender: TObject);
begin
Ini:=TiniFile.Create(extractfilepath(Application.ExeName)+"save.ini");
Edit1.Text := Ini.ReadString("tools", "Edit1", "");
if Edi1t.Text ="" //ошибка сдесь!
 then begin
 ButtonObzorClick(Sender);
 end;
Ini.Free;
end;

Что не так?


 
kaZaNoVa ©   (2007-01-14 13:55) [1]

ListView1.Items[g].SubItems.add("Ок");


 
Garacio ©   (2007-01-14 13:56) [2]

А как же тогда добавить значение в третий столбец, не добавляя во второй?


 
Garacio ©   (2007-01-14 15:27) [3]

Поменял: ListView1.Items[g].SubItems.Strings[1] := "Ок";
на: ListView1.Items.Item[g].SubItems.Strings[1] := "Ок";
Это не оказало никакого эффекта!


 
Kostafey ©   (2007-01-14 15:34) [4]

> Это не оказало никакого эффекта!

По-моему Item - просто свойство по умолчанию ?


 
Garacio ©   (2007-01-14 16:15) [5]

Народ!, ну что-же не так?
Может как-нибудь columns[2] надо вписать, чтобы в третий столбец (колонку) данные вписать?


 
FAskerQ   (2007-01-14 16:37) [6]


> Garacio ©   (14.01.07 16:15) [5]
> Народ!, ну что-же не так?


Нахрена в третий столбец добавлять пукт а во второй нет ? добавляйте во второй а третий нетрогайте


 
FAskerQ   (2007-01-14 16:39) [7]

или так

with ListView1.Items.Add do begin
   Caption:= "0";
   SubItems.Add("");
   SubItems.Add("Ok");
 end;
CODE>


 
Garacio ©   (2007-01-14 17:08) [8]

Объясню:
ListView
____________________________________
название файла | тип файла | статус     |
-----------------------------------------
121243.dll         |системный | удалён     |
453253.dll         |скрытый    | удалён     |
1dawd332.dll     |                | удалён     | <- вот для чего!
142342343.dll    |системный | удалён     |
12342443.dll      |системный | удалён     |
........
Смысл работы моей программы тот-же! При запуске я заполняю 1 и 2-й стобцы, нажимаю кнопку "Выполнить" и все файлы в папке удаляются, соответственно в 3-ий я помещаю отчёт "удалён"

Ну это ладно, можно ещё какое-нибудь слово, вроде "обычный" придумать и заполнить пустые, но остаётся вопрос: почему программа болезненно реагирует на замену строчки ListView1.Items[g].SubItems.add("Ок");, строчкой: ListView1.Items[g].SubItems.Strings[1] := "Ок"; или ListView1.Items[g].SubItems.Strings[0] := "Ок";


 
Garacio ©   (2007-01-14 17:32) [9]

Вот как сработало:
with ListView1.Items[g] do begin
         SubItems.Add("");
         SubItems.Add("Demo");

Но что, если во второй колонке до этого уже было какое-то значение?


 
FAskerQ   (2007-01-14 20:54) [10]


> Garacio ©   (14.01.07 17:32) [9]
> Но что, если во второй колонке до этого уже было какое-то
> значение?


А что мешает проверить что будет ?


 
Garacio ©   (2007-01-14 21:42) [11]

Дело в том, что мне многое для этого нужно переделать в своей программе, впереди рабочие дни... Если кто-то это уже делал, неужели ему тяжело ответить? А так придётся снова задавать вопрос и пол дня (как сегодня) ждать, что кто-нибудь ответит! Короче, философия-философией, но если знаете ответ... напишите!


 
unknown ©   (2007-01-14 22:32) [12]

 with ListView.Items[g] do
 begin
   SubItems.Clear;
   SubItems.Add("");
   SubItems.Add("Demo");
 end;



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

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

Наверх





Память: 0.47 MB
Время: 0.045 c
2-1168978640
jerriola
2007-01-16 23:17
2007.02.04
как задать элементы множества в декларативной части программы ?


2-1168937219
Cara
2007-01-16 11:46
2007.02.04
Проверка пароля.


15-1169059235
vasIzmax
2007-01-17 21:40
2007.02.04
Не у кого спросить...


9-1142684145
vrem
2006-03-18 15:15
2007.02.04
Rage 3D


1-1166014247
BBCHa
2006-12-13 15:50
2007.02.04
Интегрция с OpenOffice





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