Форум: "Основная";
Текущий архив: 2005.02.13;
Скачать: [xml.tar.bz2];
ВнизКак достать объект из ListItem Найти похожие ветки
← →
ShimON © (2005-01-29 22:38) [0]Мастера! Вот какой вопрос. Записать то я его записал:
ListView.AddItem(IntToStr(index), Pointer(S));
ListView.Items[index-1].SubItems.Add(S^.Name);
А вот как его теперь оттуда достать???
← →
ShimON © (2005-01-29 22:57) [1]Если кому интересно, проблема решена так:
//Процедура добавления объекта
Procedure AddObject(List: TListView; S: PRegMusicInfo; index: integer);
var
Item: TListItem;
begin
Item:= List.Items.Add;
Item.Caption:= IntToStr(index);
Item.SubItems.AddObject(S^.Name, Pointer(S));
Item.ImageIndex:= -1;
Item.StateIndex:= 4;
end;
//А так я забираю оттуда объект
procedure TfmML.MusicMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
Item: TListItem;
Music: PRegMusicInfo;
begin
Item:= lvMusic.GetItemAt(X, Y);
if (X < 20) then
begin
//ShowMessage("Clic Play" + Item.Caption + "!!!");
Music:= PRegMusicInfo(Item.SubItems.Objects[0]);
ShowMessage(Music^.Path);
exit;
end;
end;
← →
Palladin © (2005-01-30 10:31) [2]Если кому то интересно он нажмет F1 и все поймет сам...
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2005.02.13;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.037 c