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

Вниз

переведите на delphi Спасибо   Найти похожие ветки 

 
Goga ©   (2005-09-24 13:50) [0]

class CLibRAS
{
public :
BMP * LoadRAS(FILE* handle);
unsigned GetWidth(BMP *dib);
BYTE *GetBits(BMP *dib);
unsigned GetHeight(BMP *dib);
BITMAPINFO *GetInfo(BMP *dib);
unsigned GetLine(BMP *dib);
unsigned GetBPP(BMP *dib);
unsigned GetColorsUsed(BMP *dib);
RGBQUAD * GetPalette(BMP *dib);
unsigned GetPitch(BMP *dib);

private :
FILE *m_handle;
RASHEADER header;
BOOL rle;
BOOL isRGB;  

BITMAPINFOHEADER *GetInfoHeader(BMP *dib);
RASICCPROFILE * GetICCProfile(BMP *dib);
BMP * Allocate(int width, int height, int bpp, unsigned red_mask = 0, unsigned green_mask = 0, unsigned blue_mask = 0);
BMP * AllocateT(IMAGE_TYPE type, int width, int height, int bpp = 8, unsigned red_mask = 0, unsigned green_mask = 0, unsigned blue_mask = 0);
void ReadData(BYTE *buf, DWORD length);
void SwapField(unsigned long *lp);
int CalculatePitch(int line);
int CalculateUsedPaletteEntries(int bit_count);
int CalculateLine(int width, int bitdepth);
};


 
Eraser ©   (2005-09-24 15:36) [1]


> Goga ©   (24.09.05 13:50)

100 WMZ


 
saNat ©   (2005-09-24 16:53) [2]

Хе... Много я видел на форуме и сам время от времени прошу помочь Мастеров (в том числе кусочками кода), но так...


 
Goga ©   (2005-09-24 17:16) [3]

тут не много ты не видел сколькоя перевел


 
Goga ©   (2005-09-24 17:16) [4]

Удалено модератором


 
Goga ©   (2005-09-24 17:16) [5]

Удалено модератором


 
Eraser ©   (2005-09-24 18:03) [6]


> Goga ©   (24.09.05 17:16) [5]
>
> тут не много ты не видел сколькоя перевел

Если ты СТОЛЬКО перевёл, неужели возникают сложности при переводе такого элементарного кода? )



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

Форум: "Потрепаться";
Текущий архив: 2005.10.16;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.038 c
2-1127192246
извращенец2
2005-09-20 08:57
2005.10.16
Как узнать имя компьютера


9-1118048201
WandR
2005-06-06 12:56
2005.10.16
Ландшафт


3-1125497727
Dmitrich
2005-08-31 18:15
2005.10.16
Почему БД (interBase 6.0) не работает с диска?


5-1102660811
Denis_Ac
2004-12-10 09:40
2005.10.16
Изменение размеров потомка TCustomGroupBox


14-1127374918
data
2005-09-22 11:41
2005.10.16
у кого есть знакомые в Канаде, которые собираются ехать в Москву?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский