好吧,哪里down. to BigApplie:谢谢,BmptoIco正好需要,至于IcoToBmp,BmpToJpg,JpgToBmp都弄懂了,对了,IcoToJpg懂不懂. to Nicrosoft;把你写在标题里,是想让大家认识你,而且在那个问题中(应该知道哪一个吧),只有你的昵称最有印象,而且回答得有说服力.继续努力吧
BigApple:你那句社会确实是不公平的是什么意思.
to taxi:那就不好意思了（我说“有病”），谢谢你的良苦用心。呵呵。
To taxi and all ; 我可没有其他的意思！！！！ 意思是说在现实生活中 个人的能力(A)和被认知认可的程度(B)之间 B = f(A)， 这个f函数不是直线。当然也不是对数指数。
hello taxi; 我认为你的问题是首先弄懂图象的格式，有没有必要了，如果是想自己编写图象处理 当然完全有必要，有一本书叫《图象文件格式大全》，好象是清大出的，被我压到箱底了。 如果追求速度了，就不要用pascal,应该用C写好在包装成dll之类. 另外在delphi中好象有一种比较简单的方法:delphi提供了关于图象文件的封装类，例如jpg to bmp 可以如下,(其他格式也许也可，试一下）记得加入 use jpeg. var MyJpeg: TJpegImage; Image1: TImage; begin Image1:= TImage.Create; MyJpeg:= TJpegImage.Create; Image1.LoadFromFile('TestImage.BMP'); // Load the Bitmap from a file MyJpeg.Assign(Image1.Picture.Bitmap); // Assign the BitMap to MyJpeg object MyJpeg.SaveToFile('MyJPEGImage.JPG'); // Save the JPEG to Disk end;
to wwwunix:虽然你号称不同意我的观点，但是我赞同你的观点，呵呵。可能你误会我的观点了，我的意思是：既然使用了可视化开发工具，就应该发挥它的特长，使用控件才能真正发挥出RAD的威力。如果是为了进行系统开发，你会在Delphi或VB下来做吗？这完全是不同的领域。进行系统开发，当然要自己处理与硬件层打交道的代码。
To Nicrosoft：呵呵！误会，误会。希望能多多交流。
if (你选择了RAD) and (你要的功能有现成的控件) then begin 下载这个控件; 使用这个控件; if 你对原理有兴趣 then 研究一下源代码; end;
为什么不提交语言规范叫“D--”做个可视化开发工具“Delphi's brother”？
高手不是自以为的，是别人封的，我就认为Nicrosoft可以算高手。
换句话说：面子不是自己挣的，是别人给的。
先是涉及版权，有的控件不能再发布给别人，要再买一堆的
使用许可证。
另外我用过的控件有一个LEADTOOL是处理图像的，好是
挺好的可是缺一点功能，而且有一点BUG，我从它的7.0换到
10.0原来能用的都不能用了。处理GIF有点复杂，象这个LEADTOOL就不能处理GIF，因为GIF
是需要单独的许可的，得另买，自己开发好像也存在类似的问题。我对自己去编解码以及显示程序没什么兴趣，一是我的知识去做
这类问题会很累，二是这些都有非常成熟的库，比自己编要安全
三是我编出来，测好了，并不能保证比现有的性能好。所以我面对
这样的问题多半是不会自己编(我也编不出来--1个月的时间：)关于ICO转换我些过一段代码(bmp->ico)，贴给你，希望有用。 if(hBit == NULL) // hBit is BitMap Handle
return NULL; CBitmap oBitmap;
oBitmap.Attach(hBit); CBitmap oBMap;
BITMAP rBitMap;
oBitmap.GetBitmap( &rBitMap );
oBMap.CreateBitmapIndirect( &rBitMap );
BYTE a[4096];
DWORD len = oBitmap.GetBitmapBits (4096,a);
for (UINT i=0; i<len; i++)
{
a[i] ^= a[i];
}
oBMap.SetBitmapBits( len, a); HICON hIcon;
if (bTheBigIcon)
{
CImageList oImagelist;
oImagelist.Create(32, 32, TRUE, 1, 1);
oImagelist.Add(&oBitmap, &oBMap);
hIcon = oImagelist.ExtractIcon( 0 );
oImagelist.DeleteImageList();
}
else
{
CImageList oImagelist;
oImagelist.Create(16, 16, TRUE, 1, 1);
oImagelist.Add(&oBitmap, &oBMap);
hIcon = oImagelist.ExtractIcon( 0 );
oImagelist.DeleteImageList();
}
m_bIcon = false;
return hIcon;
顺便说一句：社会确实是不公平的
to BigApplie:谢谢,BmptoIco正好需要,至于IcoToBmp,BmpToJpg,JpgToBmp都弄懂了,对了,IcoToJpg懂不懂.
to Nicrosoft;把你写在标题里,是想让大家认识你,而且在那个问题中(应该知道哪一个吧),只有你的昵称最有印象,而且回答得有说服力.继续努力吧
我可没有其他的意思！！！！
意思是说在现实生活中
个人的能力(A)和被认知认可的程度(B)之间
B = f(A)， 这个f函数不是直线。当然也不是对数指数。
我认为你的问题是首先弄懂图象的格式，有没有必要了，如果是想自己编写图象处理
当然完全有必要，有一本书叫《图象文件格式大全》，好象是清大出的，被我压到箱底了。
如果追求速度了，就不要用pascal,应该用C写好在包装成dll之类.
另外在delphi中好象有一种比较简单的方法:delphi提供了关于图象文件的封装类，例如jpg to bmp 可以如下,(其他格式也许也可，试一下）记得加入 use jpeg.
var
MyJpeg: TJpegImage;
Image1: TImage;
begin
Image1:= TImage.Create;
MyJpeg:= TJpegImage.Create;
Image1.LoadFromFile('TestImage.BMP'); // Load the Bitmap from a file
MyJpeg.Assign(Image1.Picture.Bitmap); // Assign the BitMap to MyJpeg
object
MyJpeg.SaveToFile('MyJPEGImage.JPG'); // Save the JPEG to Disk
end;
你的形容非常的好。
[email protected]
不要学delphi了，直接用C++bulid,或VC++算了,累一点，但懂得多得多，你不是想考程序员吗，不可能用pascal吧。
<哎呀，各位delphi同好，不要打我，C/C++才是业界标准.....声音渐远,一片寂静...>
我是搞通讯的，通讯里面最无聊的是协议，你没有发挥的余地，就象是个机器！
jpg也是一样，如果jpg压缩算法是你搞出来的也许还可以引以为荣，照着别人的算法作一个程序算什么？--苦力
有力量自己弄个高效的算法一个还差不多
begin
下载这个控件;
使用这个控件;
if 你对原理有兴趣 then
研究一下源代码;
end;