Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Media";
Текущий архив: 2002.07.18;
Скачать: [xml.tar.bz2];

Вниз

Скины   Найти похожие ветки 

 
anod   (2002-03-12 00:39) [0]

Подскажите, как сделать такую вещь (как в WinAmp"e), есть графичесий файл, в нем нарисованы цифры от 0..9, как мне выводить на Image определенную цифру. Т.е. чтоб не 10 файлов бало в каждом по цифре, а 1 и выделять(копировать) его определенную часть и выводить на Имайдж


 
Keymaster   (2002-03-12 00:52) [1]

Вообще, есть компоненты, которые всё это за тебя делают...
я вот юза. varian skin factory и мне оно очень нравиться


 
MBo   (2002-03-12 04:54) [2]

TImageList?


 
anod   (2002-03-12 10:01) [3]

2KeyMaster
Я знаю, но хочется самому.

2Mbo
Можно по подробнее...


 
MBo   (2002-03-12 12:51) [4]

ImageList хранит картинки одннакового размера, по индексу рисуешь, какую надо. В основной ветке пример сегодня был.


 
anod   (2002-03-12 13:44) [5]

2Mbo
А как их занести туда, одну картинку порезать на равны части и занести под определнным индексом


 
MBo   (2002-03-12 13:52) [6]

ну да. Add возвращает индекс


 
anod*   (2002-03-13 11:20) [7]

2MBo
Спасибо, работает.

А можно это сделать с JPG


 
MBo   (2002-03-13 12:42) [8]

uses Jpeg;
tjpegimage assign в bitmap а дальше так же


 
anod   (2002-03-13 14:12) [9]

jpgimg:= TJpegImage.Create;
bmp:= TBitmap.Create;
jpgimg.LoadFromFile(SFile+"skin\"+ReadINI("skin","fname"));
jpgimg.Assign(bmp);
Il.Add(bmp,bmp); //imagelist
IL.GetBitmap(10,dvt1.Picture.Bitmap);


На последней строке выдает ошибку "Invalid Image Size"


 
anod   (2002-03-13 14:57) [10]

Упс, надо было сначало книжку открыть и прочиать про TJpegImage.

Конечно же не
jpgimg.Assign(bmp);
a bmp.Assign(jpgimg);



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

Форум: "Media";
Текущий архив: 2002.07.18;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.006 c
14-58263
esu
2002-06-17 20:50
2002.07.18
http://www.metalweb.ru/forum/read.php?f=14&i=33&t=33


1-58104
Cowboy
2002-07-08 17:56
2002.07.18
Динамически создать TTabSheet с TImage на нем.


1-58165
^Sanya
2002-07-05 17:13
2002.07.18
Delphi и MSOffice:


1-58075
Sergey_
2002-07-08 10:03
2002.07.18
Подскажите начинающему плиззз. У меня есть SrringGrid


6-58240
shearhan
2002-05-09 19:53
2002.07.18
Кто-нибудь объяснит мне принцип действия проги удаленного админис





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский