![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Строка из ListView передается не полностью [D7, 2000]
Perf2k2 © (2007-04-27 15:08:00)Всем прив.
В ЛистВью занесены строки такого вида:
12 Иванов C:\123\456.jpg
Просто по нажатию на кнопку вывожу путь в отдельый Label
Label6.Caption := ListView1.Items[i-1].SubItems.ValueFromIndex[1];
Выводит только :\123\456.jpg
В чем м.б. проблема?
Выводится только
iXT (2007-04-27 15:28:00) [1]Ну во первыx
SubItems: TStings
поэтому SubItems[1] ИМХО достаточно
Во вторых не видать что у тебя в этом ListView1
Perf2k2 (2007-04-27 15:27:00) [2]А так нормально... Что-то я прикола не понял....
Ну спасибо...)
{RASkov} (2007-04-27 15:27:00) [3]> [5] Perf2k2 © (27.04.07 15:27)
> А так нормально... Что-то я прикола не понял....
Посмотри, что такое ValueFromIndex и все станет ясно.
MBo (2007-04-27 15:25:00) [4]А если так:
Label6.Caption := ListView1.Items[i-1].SubItems[1];
{RASkov} (2007-04-27 15:25:00) [5]Label6.Caption := ListView1.Items[i-1].SubItems[1];
Perf2k2 (2007-04-27 15:22:00) [6]Кусок кода:
Query1.SQL.Text := 'SELECT @@IDENTITY AS LAST FROM fm_fotos';
Query1.Open;
last_foto_id := DataSource1.DataSet.FieldByName('LAST').Value;
if DirectoryExists(frmMain.global_images_path + IntToStr(last_album_id)) = false then
CreateDir(frmMain.global_images_path + IntToStr(last_album_id));
Label6.Caption := ListView1.Items[i-1].SubItems.ValueFromIndex[1];
jpg.LoadFromFile(ListView1.Items[i-1].SubItems.ValueFromIndex[1]);
bmp.Assign(jpg);
bmp.Height := 75;
bmp.Width := 100;
bmp.Canvas.StretchDraw(bmp.Canvas.Cliprect, jpg);
iXT (2007-04-27 15:18:00) [7]Чудес на свете не бывает (поктайней мере тут)
Телепатор тут тоже бессилен.
Это глюки delphi или windows
Пиши в Borland и Microsoft :) или код