Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 26.06.2010, 09:52
Аватар для T-dayne
T-dayne T-dayne вне форума
Начинающий
 
Регистрация: 26.01.2010
Сообщения: 180
Репутация: 31
По умолчанию Добавить в ListView иконку с прозрачностью

В Icon есть иконка, мне нужно добавить ее на ListView, делаю через
Код:
Imagelist.addicon(icon);
, при этом, качество иконки оставляет желать лучшего(нет прозрачности):

Так вот, как сделать нормальное отображение в ListView иконки?
Спасибо.

Последний раз редактировалось T-dayne, 26.06.2010 в 09:57.
Ответить с цитированием
  #2  
Старый 26.06.2010, 10:07
Аватар для Marvel
Marvel Marvel вне форума
Начинающий
 
Регистрация: 14.06.2010
Адрес: Пятигорск
Сообщения: 121
Репутация: 24
По умолчанию

а выложи-ка иконку
__________________
Коли навчався в школі я - в мені росли мозгЫ. КудИж вони поділися? гы-гы гы-гы гы-гы...


ICQ: 593977748
Nick: Marvel
Ответить с цитированием
  #3  
Старый 26.06.2010, 10:19
Аватар для T-dayne
T-dayne T-dayne вне форума
Начинающий
 
Регистрация: 26.01.2010
Сообщения: 180
Репутация: 31
По умолчанию

Marvel, эм, зачем? Иконку получаю с помощью ряда API функций, качество у нее нормальное, кстати говоря, если добавить ее в Image то все отлично с прозрачностью. Т.е. видимо проблема с ListView

Ну если нужно:
Вложения
Тип файла: rar chinese.rar (43.9 Кбайт, 15 просмотров)
Ответить с цитированием
  #4  
Старый 26.06.2010, 10:22
Аватар для Marvel
Marvel Marvel вне форума
Начинающий
 
Регистрация: 14.06.2010
Адрес: Пятигорск
Сообщения: 121
Репутация: 24
По умолчанию

щас посмотрим
__________________
Коли навчався в школі я - в мені росли мозгЫ. КудИж вони поділися? гы-гы гы-гы гы-гы...


ICQ: 593977748
Nick: Marvel
Ответить с цитированием
  #5  
Старый 26.06.2010, 10:28
Аватар для Marvel
Marvel Marvel вне форума
Начинающий
 
Регистрация: 14.06.2010
Адрес: Пятигорск
Сообщения: 121
Репутация: 24
По умолчанию

в ImageList какой размер задаёшь иконке? 32x32?
__________________
Коли навчався в школі я - в мені росли мозгЫ. КудИж вони поділися? гы-гы гы-гы гы-гы...


ICQ: 593977748
Nick: Marvel
Ответить с цитированием
  #6  
Старый 26.06.2010, 10:47
Аватар для T-dayne
T-dayne T-dayne вне форума
Начинающий
 
Регистрация: 26.01.2010
Сообщения: 180
Репутация: 31
По умолчанию

Marvel
да, вот свойства:

Код:
object Imglist: TImageList
    AllocBy = 1
    Height = 32
    Width = 32
    Left = 160
    Top = 72
  end
Ответить с цитированием
  #7  
Старый 26.06.2010, 10:54
Аватар для Marvel
Marvel Marvel вне форума
Начинающий
 
Регистрация: 14.06.2010
Адрес: Пятигорск
Сообщения: 121
Репутация: 24
По умолчанию

можно сделать так (но это не совсем правильное решение, но фон будет прозрачный, то есть белый):
Код:
const
  ExtrFileName = 'C:\WINDOWS\system32\notepad.exe';
var
  icon: TIcon;
  bmp: TBitmap;
begin
  icon := TIcon.Create;
  icon.Handle := ExtractIcon(Handle, PChar(ExtrFileName), 0);
  bmp := TBitmap.Create;
  bmp.Width := Icon.Width;
  bmp.Height := Icon.Height;
  bmp.Canvas.Draw(0,0,Icon);
  ImageList1.Add(bmp,nil);
  ListView1.Items.Add.ImageIndex := 0;
  bmp.Free;
  icon.Free;
end;
__________________
Коли навчався в школі я - в мені росли мозгЫ. КудИж вони поділися? гы-гы гы-гы гы-гы...


ICQ: 593977748
Nick: Marvel

Последний раз редактировалось Marvel, 26.06.2010 в 11:01.
Ответить с цитированием
  #8  
Старый 26.06.2010, 11:19
Аватар для T-dayne
T-dayne T-dayne вне форума
Начинающий
 
Регистрация: 26.01.2010
Сообщения: 180
Репутация: 31
По умолчанию

Marvel
Большое спасибо, прибавил репутации тебе.
Ответить с цитированием
  #9  
Старый 26.06.2010, 11:19
Аватар для Marvel
Marvel Marvel вне форума
Начинающий
 
Регистрация: 14.06.2010
Адрес: Пятигорск
Сообщения: 121
Репутация: 24
По умолчанию

обращайтесь
__________________
Коли навчався в школі я - в мені росли мозгЫ. КудИж вони поділися? гы-гы гы-гы гы-гы...


ICQ: 593977748
Nick: Marvel
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 01:29.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025