Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.10.01;
Скачать: CL | DM;

Вниз

Изменение размера bmp.   Найти похожие ветки 

 
Handle   (2006-03-08 17:51) [0]

Уважаемые Мастера такой вопрос.
При загрузке, иконки 16х16  отображаются нормально, с большим разрешением  не так как надо.
Как програмно уменьшить размер иконки или как решить эту проблемму.

var
 Form1: TForm1;

 Bit: TBitmap;

procedure TForm1.FormCreate(Sender: TObject);
begin
Bit := TBitmap.Create;
Bit.LoadFromFile("c:\bmp.bmp");
ListBox1.Items.Add("Caption")
end;

procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;
 Rect: TRect; State: TOwnerDrawState);
var
 cc: TCanvas;
begin
 cc:=(Control as TListBox).Canvas;
 cc.FillRect(rect);
 cc.Draw(Rect.Left,Rect.Top,Bit);
 cc.TextOut(Rect.Left + 17,Rect.Top,ListBox1.Items[index]);
end;


 
grisme ©   (2006-03-08 19:08) [1]

Ищи описание быстрого векторного преобразования(как во Flash):) поисковик-твой друган форева!:)


 
Rouse_ ©   (2006-03-08 20:50) [2]

1. Где у тебя загрузка иконки?
2. StretchBlt
3. Зачем банальный вопрос задаешь в тематической конференции?


 
Handle   (2006-03-09 21:06) [3]


> Rouse_ ©   (08.03.06 20:50) [2]

Да bmp, сам не пойму почему написал иконки,заработался наверное.



Страницы: 1 вся ветка

Текущий архив: 2006.10.01;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.027 c
3-1154416485
~SerJant~
2006-08-01 11:14
2006.10.01
Форматирование даты в запросе в FireBird 1.5


2-1158224284
Rolf
2006-09-14 12:58
2006.10.01
Список записей.


15-1157915644
hak
2006-09-10 23:14
2006.10.01
Password and Login in Dial-Up


1-1155998036
Imhotep
2006-08-19 18:33
2006.10.01
найти буквы дисководов


6-1147323742
Tempora
2006-05-11 09:02
2006.10.01
Как правильно получить содержимое FTP при помощи idFTP - indy