Anda mau menyimpan gambar dalam format apa? Terkompresi atau tidak terkompresi? Kalau delphi atau pascal saya tidak begitu tahu, tapi anda pasti menggunakan API windows yang sudah disediakan, dan salah satunya mempunyai fungsi GDI.

Pertama, anda dapatkan nilai-nilai pixel yang ada di form anda dengan menggunakan GetPixel

Coba anda lihat di WINAPI.hlp untuk melihat deskripsinya

The GetPixel function retrieves the red, green, blue (RGB) color value of the pixel at the specified coordinates.

COLORREF GetPixel(

    HDC hdc,   // handle of device context 
    int XPos,   // x-coordinate of pixel
    int nYPos    // y-coordinate of pixel
   );   
Parameters

hdc

Identifies the device context.

nXPos

Specifies the logical x-coordinate of the pixel to be examined.

nYPos

Specifies the logical y-coordinate of the pixel to be examined.

Return Values

If the function succeeds, the return value is an RGB value. If the pixel is outside of the current clipping region, the return value is CLR_INVALID.

Remarks

The pixel must be within the boundaries of the current clipping region.
Not all devices support GetPixel. An application should call GetDeviceCaps to determine whether a specified device supports this function.

See Also

GetDeviceCaps, SetPixel

Kedua, sediakan memory dengan sebanyakan lebar kali panjang dikali 4 ((w*h)*4), jadi format gambar anda adalah format data mentah pixel yang sepanjang 4 bytes. 

Ketiga, tuliskan memory yang anda sediakan tadi, bytes per bytes. Cuma begitu saja kok.

Kalau anda tidak tahu cara mendapatkan pixel, anda harus mempelajari WINAPI bernama GetDC untuk mendapatkan alamat hapalan layar anda, tempat untuk menampung pixel yang ditampilkan dilayar, setelah itu cukup alokasikan memory untuk disimpan, dan terakhir dapatkan semuanya sepanjang lebar dikali panjang kalikan 4 bytes, karena warna pada layar didefinisikan sebagai RGBA, dimana R-merah, G-hijau, B-biru.

Masih pusing? Tanyakan lagi lebih spesifik, biar saya pandu.

Bikin loop

while (x=0; x<width;x++)
{
 while (y=0; y<height; y++)
{
}
}

Kurang lebih seperti demikian. Setelah itu anda dapatkan nilai pixel tersebut satu persatu, misalkan

Pixel:=GetPixel(1,1);
(

Mungkin cara saya menjelaskan kurang bagus ya. Jadi intinya, anda harus tahu apaguna dari GetDC, kemudian guna dari GetPixel, kemudian bagaimana cara menampung data pada array(deretan) dua dimensi (yaitu x dan y), setelah itu menulis data ke harddisk. Cuma begitu saja kok.


Jadi begini langkahnya
1. Alokasikan memori dengan menggunakan GlobalAlloc ,GMEM_ZEROINIT or GMEM_FIXED,nSize
2. Dapatkan nilai setiap pixel yang panjangnya 4 bytes satu pixelnya disimpan ke penampung yang telah dialokasikan oleh langkah 1
3. Baru tulis data seperti yang anda inginkan.

Misalkan, 0-3 adalah panjang gambar, byte 4-7 adalah tingginya, byte 8-11 adalah kedalaman warnanya dsb dimana terakhir baru data yang ingin anda simpan.