Иконка дла скрытого файла

← →
ctapik-net © (2002-11-08 01:16) [0]

В Explore"ре скрытые файлы отображаются более прозрачными иконками. Вопрос. Как имея иконку файла получить иконку как если бы этот файл бал скрытый? аранее благодарен.

← →
Alex-eraser (2002-11-08 01:29) [1]

Попробуй загнать иконку в TImageList, а там, по-моему, есть спец. функции для этого, точно не уверен, посмотри в справке.

← →
Оливейра © (2002-11-08 02:06) [2]

Нехрен самопальными методами иконки выдирать, работайте через SHGetFileInfo, SHGetImageList и т.п., см. Shell Programmers Guide в MSDN, и будет у вас красотища.
См. также пример VirtualListView

← →
ctapik-net © (2002-11-08 06:39) [3]

Дык нехрена ShGetFileInfo не выдает такую иконку для скрытого файла!!! Ина обычная!!!

← →
Николай Быков © (2002-11-08 06:52) [4]

procedure TForm1.Button1Click(Sender: TObject); var i,j:integer; begin for i:=0 to Image1.Picture.Bitmap.Width do for j:=0 to Image1.Picture.Bitmap.Height do begin Image1.Canvas.Pixels[i,j]:=Image1.Canvas.Pixels[i,j] or $aaaaaa; end; end;
Ну можно что-то типа этого сделать.

← →
ctapik-net © (2002-11-08 06:57) [5]

А насчет примера VirtualListView так меня он не открывается dfm файл запорот. Может кто в меня его кинет, а то даже на диске с дельфи он запорот.

Знаете, как это, оказывается, делает Эксплорер?
TListItem.Cut:=true;
Можете проверить - зайдите в папку со скрытыми файлами и нажмите на одном из них Ctrl+X - вуаля - все остальные файлы потеряют свою невинность(пардон, прозрачность 8-)

Всем ответившим большое спасибо!!!! Вопрос снят благодоря Cobalt"у

Иконка дла скрытого файла Найти похожие ветки