ThaiPBL.com

PowerBuilder Library Thailand

อีเมล พิมพ์ PDF

การอ่านขนาดของรูปภาพ บิตแมพ

สวัสดีครับ

มีสคริปต์เกี่ยวกับการอ่านขนาดของรูปภาพ บิตแมพ ว่ามีขนาดกว้าง สูง เท่าใด ก็ลองเอาไปใช้กันดูนะครับ

int job
blob b
ulong width, height

job = FileOpen( "filename.bmp", StreamMode!, Read! )
FileRead( job, b )
width = Long( Integer( BlobMid( b, 19, 2 ) ),Integer( BlobMid( b, 21, 2) ) )
height = Long( Integer( BlobMid( b, 23, 2 ) ),Integer( BlobMid( b, 25, 2) ) )
FileClose( job )