Delphi 2010 ve Delpi XE2 aynı pc üzerinde kullanımı!
Destek talebi(Lütfen oy verelim!)
Sitemiz üye alımına kapatılmıştır!
! CODEBANK 2012 !
İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.
0 Üye ve 1 Ziyaretçi konuyu incelemekte.
procedure TForm1.Button1Click(Sender: TObject);begin case Image1.Picture.Bitmap.PixelFormat of pf1bit: Label1.Caption := '1 renk'; pf4bit: Label1.Caption := '. 16 renk'; pf8bit: Label1.Caption := '. 256 renk'; pf15bit: Label1.Caption := '. 32768 renk'; pf16bit: Label1.Caption := '. 65536 renk'; pf24bit: Label1.Caption := '. 16 Milyon renk'; pf32bit: Label1.Caption := '. 32 Milyon renk' else Label1.Caption := ' Resmin renk bilgisi okunamıyor'; end;end;