Arsip: TOLO....ng konfersi dari image ke biner menggunakan delphi..

 
user image
more 13 years ago

sketsa

bagi para semua pecinta delphi, saya mau minta tolong barangkali ada yang bisa membantu saya... saya sedang melakukan tugas akhir temanya kompresi image menggunakan metode run-length. tapi saya kepentok ma teknik konfersi image (bitmap) ke biner. bagi yang mau membantu saya ucapkan amat teramat terimakasih banya... saya harap bagi para pencinta delphi mudah-mudahan ada yang mau membantu saya.. :( :( :( :( :( :( :( :( :( :( terimakasih.... :D :D :D :D :D
user image
more 13 years ago

sketsa

gimana ya coding cara konfersi image (bitmap) ke biner???
user image
more 13 years ago

zuyo

Coba lihat link ini : http://www.delphipages.com/threads/thread.cfm?ID=137863&G=137815 (Hex) dan http://www.delphipages.com/threads/thread.cfm?ID=137879&G=137815 (final to Binary)
user image
more 13 years ago

zuyo

Kombinasi antara FileOpen dan FileRead juga bisa digunakan, tapi hati2 dengan Header BMP, jangan lupa cara pembacaan BMP sedikit unik, bottom right to upper left :mrgreen: header structure of a standard 24 bit BMP file :
bfType1 : Byte ; ( "B" ) bfType2 : Byte ; ( "M" ) bfSize : LongInt ; ( Size of File. Zero is acceptable ) bfReserved1 : Word ; ( Zero ) bfReserved2 : Word ; ( Zero ) bfOffBits : LongInt ; ( Offset to beginning of BitMap ) biSize : LongInt ; ( Number of Bytes in Structure ) biWidth : LongInt ; ( Width of BitMap in Pixels ) biHeight : LongInt ; ( Height of BitMap in Pixels ) biPlanes : Word ; ( Planes in target device = 1 ) biBitCount : Word ; ( Bits per Pixel 1, 4, 8, or 24 ) biCompression : LongInt ; ( BI_RGB = 0, BI_RLE8, BI_RLE4 ) biSizeImage : LongInt ; ( Size of Image Part (often ignored) ) biXPelsPerMeter : LongInt ; ( Always Zero ) biYPelsPerMeter : LongInt ; ( Always Zero ) biClrUsed : LongInt ; ( Number of Colors used in Palette ) biClrImportant : LongInt ; (* Number of Colors that are Important
user image
more 13 years ago

sketsa

duh... trimakasih ya... mudah mudahan para pecinta delphi lainnya ada yang mau ikut bergabung untuk membantu pertanyaan saya ini. trimakasih....
user image
more 13 years ago

zuyo

@zuyo: Coba lihat link ini : http://www.delphipages.com/threads/thread.cfm?ID=137863&G=137815 (Hex) dan http://www.delphipages.com/threads/thread.cfm?ID=137879&G=137815 (final to Binary)
versi load finalnya ternyata di http://www.delphipages.com/threads/thread.cfm?ID=142429&G=137815 sori regards zuyo
user image
more 13 years ago

sketsa

terimakasih banyak semuanya nanti aku coba...
more ...
  • Pages:
  • 1
Share to

Random Topic

Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com