Форум: "Основная";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];
ВнизДве колонки в ListBox Найти похожие ветки
← →
kaif (2002-01-09 01:48) [8]При записи приводи integer к Pointer:
for i := 0 to 10 do
ListBox1.Items.AddObject("MyString "+ StrToInt(i), Pointer(i));
А при чтении, наоборот, pointer к integer :
for i := 0 to 10 do
begin
ShowMessage(
ListBox1.Items[i] + "-" +
IntToStr( Integer(ListBox1.Items.Objects[i])));
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.004 c