[Кодер]

Уважаемые,

На форме имеется компонент ListView(name=nlist)
Данный компонент содержит 3 закладки.
Как мне добавить во вторую закладку в ячейку значение='Задание'?

[Ozerich]

Ну во первых не закладки а дитятки.
t.Items.AddChild(t.Items.Item[1],'text')

[Кодер]

Наверно мы друг друга не поняли) У меня нет такой функции AddChild

[The Shadow]

Код:

ListView1.Items.Add.SubItems.Add('Задание');

[Кодер]

Код:

unit unit_ofice;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, XPMan, ComCtrls, StdCtrls;

type
  Tfrm_ofice = class(TForm)
    nlist: TListView;
    XPManifest1: TXPManifest;
    tabc: TTabControl;
    Button1: TButton;
    procedure FormCreate(Sender: TObject);
    procedure FormActivate(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  frm_ofice: Tfrm_ofice;
  f:TStringList;
  s:String;
implementation

uses unit_today;

{$R *.dfm}
procedure nlist_reload;
begin
f:=TStringList.Create;
f.LoadFromFile('note.txt');
s:=copy(f.Strings[0],1,8);
frm_ofice.nlist.Items[1].SubItems.Add(s);
f.Free;
end;

procedure Tfrm_ofice.FormCreate(Sender: TObject);
begin
{Выравниваем стобцы в списке заданий}
nlist.Column[0].Width:=100;
nlist.Column[1].Width:=100;
nlist.Column[2].Width:=285;
nlist.Column[3].Width:=150;
end;

procedure Tfrm_ofice.FormActivate(Sender: TObject);
begin
{Показываем список заданий на сегодня}
{frm_today.ShowModal;}
end;

procedure Tfrm_ofice.Button1Click(Sender: TObject);
begin
nlist_reload;
end;

end.

Ошыбку выдает

[lmikle]

Какую ошибку?
При компиляции или при выполнении?
Если при выполнении, то на какой строке?

На вскидку:
1. Файл существует? (f.LoadFromFile('note.txt')
2. А он заполнен хоть чем-то или пустой? (s:=copy(f.Strings[0],1,8)
3. А в ListView есть как минимум 2 строки? (frm_ofice.nlist.Items[1].SubItems.Add(s)

Учимся пользоваться дебаггером.
Если программа падает, то обычно отладчик устанавливается на строку, в которой произошел сбой. Идем в начало теста пролемной функции/процедуры, ставим точку останова (F5) и запускаем снова и далее идем пошагово (F8), проверяя значения всех переменных (Ctrl+F7) и существование объектов, внещних по отношению к коду (файлы, БД и т.д.).

[lmikle]

Сорри за смайлики - случайно получилось...

[Кодер]

Файл имееться ( не пустой), в ЛистБоксе минимум 2 строки

[lmikle]

Ну так когда происходит ошибка? Как я понял при выполнении.
На какой строке останавливается отладчик?