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

Вниз

TIcon SetSize   Найти похожие ветки 

 
SIV5000   (2010-12-11 09:19) [0]

Народ привет. Подскажите, вот нужно нарисовать иконку размером 128 х 128, если такой размер присутствует в иконке (не растягивать).
Усли сделать так:

var
TI:TIcon;
begin
/////////
TI.LoadFromFile("D:\1.ico");  если загружаю иконку с файла
ICon.SetSize(128, 128);      тогда возможно установить размер
Form1.Canvas.Draw(100,100, BI); и рисуеться иконка нужного размера

а если получить HICON
TI.Handle:=  GetIconHandle("D:\1.mp3");
ICon.SetSize(128, 128);      тогда здесь выбивает

Почему так? Как ето обойти?
Пробовал создавать еще одну TIcon и потом
эту TempIcon.Assign(TI);
TempIcon.SetSize(128, 128);
но результат тот же;


 
SIV5000   (2010-12-11 09:21) [1]

Извените там немного не правильно написал :)

var
TI:TIcon;
begin
/////////
TI.LoadFromFile("D:\1.ico");  если загружаю иконку с файла
TI.SetSize(128, 128);      тогда возможно установить размер
Form1.Canvas.Draw(100,100, TI); и рисуеться иконка нужного размера

а если получить HICON
TI.Handle:=  GetIconHandle("D:\1.mp3");
TI.SetSize(128, 128);      тогда здесь выбивает

Почему так? Как ето обойти?
Пробовал создавать еще одну TIcon и потом
эту TempIcon.Assign(TI);
TempIcon.SetSize(128, 128);
но результат тот же;


 
Anatoly Podgoretsky ©   (2010-12-11 10:27) [2]

Выбивать можно дурь, мозги, а что у тебя выбивает?


 
Плохиш ©   (2010-12-11 12:37) [3]


> тогда здесь выбивает
>

Больно слышать (c) ИШ


 
SIV5000   (2010-12-12 00:57) [4]


> Выбивать можно дурь, мозги, а что у тебя выбивает?

Ага, а еще может свет выбить, и еще много чего!!!
Подсказываю... Ну ошибку выбивает. Какую?
Скомпилируй и узнаешь...


 
Германн ©   (2010-12-12 01:01) [5]


> Подсказываю... Ну ошибку выбивает. Какую?
> Скомпилируй и узнаешь...

А нам это нужно или мы обязаны?


 
Andy BitOff ©   (2010-12-12 01:02) [6]

> SIV5000   (12.12.10 00:57) [4]
> Ну ошибку выбивает. Какую?
> Скомпилируй и узнаешь...

Аха-ха-ха-ха!!! Моя плакаль =))))


 
SIV5000   (2010-12-12 01:53) [7]

Блин, народ, при чем тут нужно и обязан? Никто ни кого не заставляет. Просто не нужно придераться к словам. Ну если логично подумать, что может выбыть при виполнении процедуры, которая, судя с вопроса, работает не правильно??? Вот ответьте!!!
Если уже решили помочь, то посмотрите сначала пример "не рабочего кода". Если вы увидели ошибку, то можете сразу указать на нее. Если же все кажеться нормальным, то ЛОГИЧНО будет скомпилировать у себя этот код и посмотреть что же там не так.
Разве не так???
Видимо Anatoly Podgoretsky так и сделал, и у него при выполнении процедуры Дельфи выбило мозги.
Так что же заставляет эту процедурку выбивать мозги? :)


 
Германн ©   (2010-12-12 02:14) [8]


> SIV5000   (12.12.10 01:53) [7]
>
> Блин, народ, при чем тут нужно и обязан? Никто ни кого не
> заставляет. Просто не нужно придераться к словам. Ну если
> логично подумать, что может выбыть при виполнении процедуры,
>  которая, судя с вопроса, работает не правильно???
> !!

А нам это нужно или мы обязаны?

Ты не представил нам тестовый проект, который можно скомпилировать и увидеть ошибку. Ты не представил сообщение об ошибке, которое можно было бы понять. Ты представил только несколько строчек кода. А ты уверен что проблема именно в них?

Короче.
Учись задавать вопросы.


 
clickmaker ©   (2010-12-15 17:36) [9]

> TI.Handle:=  GetIconHandle("D:\1.mp3");

в mp3 есть иконки?



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

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

Наверх




Память: 0.49 MB
Время: 0.013 c
2-1292330680
TObject
2010-12-14 15:44
2011.03.06
TStringList vs. TList<string>


2-1292235834
Ikar
2010-12-13 13:23
2011.03.06
Тип Char


2-1292062969
rish
2010-12-11 13:22
2011.03.06
Integrated debugging


8-1205319739
PMak
2008-03-12 14:02
2011.03.06
Вывод текста на изображение игры


15-1290288586
Юрий
2010-11-21 00:29
2011.03.06
С днем рождения ! 21 ноября 2010 воскресенье