घर
Top.Mail.Ru Yandeks.Metrika
मंच: "मीडिया";
वर्तमान संग्रह: 2003.02.03;
डाउनलोड करें: [xml.tar.bz2];

नीचे

छवि को * .bmp फ़ाइल के रूप में सहेजें इसी तरह की शाखाएँ खोजें


White1   (2002-10-17 13:32) [0]

कृपया मेरी मदद करें, मैं * .bmp फ़ाइल में स्क्रीन के किसी भी स्थान (आयताकार क्षेत्र) की छवि को प्रोग्रामेटिक रूप से कैसे सहेज सकता हूं? बेहतर स्रोत कोड।
अग्रिम धन्यवाद!



Song   (2002-10-17 14:27) [1]

CopyRect()
TBitMap.SaveToFile()



k   (2002-10-19 01:45) [2]

экрана? не формы? тогда...

procedure SaveRect(Rect:TRect; FileName:String);
var dc:HDC;
bm:TBitMap;
begin
bm := TBitmap.Create;
//Rect - структура, задающая прямоугольник (см. хелп по TRect)
bm.Width := abs(Rect.Right - Rect.Left);
bm.Height:= abs(Rect.Bottom - Rect.Top);

try
//опять WinAPI - это как наркотик :)
dc := GetDC(0);//контекст рабочего стола
BitBlt(bm.Canvas.handle,0,0 , bm.Width, bm.Height, dc, Rect.Left, Rect.Top, SRCCOPY);
bm.SaveToFile(FileName);
finally
bm.free;
ReleaseDC(0,dc);
end;//fin

end;//proc

такова идея.....



पन्ने: 1 पूरी शाखा

मंच: "मीडिया";
वर्तमान संग्रह: 2003.02.03;
डाउनलोड करें: [xml.tar.bz2];

ऊपर





मेमोरी: 0.54 एमबी
समय: 0.026 c
1-5056
Erden
2003-01-24 12:01
2003.02.03
डेल्फी


7-5305
MenyaZovutLion
2002-11-20 03:56
2003.02.03
LPT पोर्ट को प्रोग्राम करने में मेरी मदद करें


14-5143
यूरी
2003-01-17 16:12
2003.02.03
RxLib


1-4911
Shuma
2003-01-25 22:24
2003.02.03
आकार छोटा करना


1-4830
Asu-1
2003-01-24 11:01
2003.02.03
मोड़





अफ्रीकी अल्बानियन अरबी भाषा अर्मेनियाई आज़रबाइजानी बस्क बेलारूसी बल्गेरियाई कैटलन सरलीकृत चीनी) चीनी पारंपरिक) क्रोएशियाई चेक डेनिश डच अंग्रेज़ी एस्तोनियावासी फिलिपिनो फिनिश फ्रेंच
गैलिशियन् जॉर्जियाई जर्मन यूनानी हाईटियन यहूदी हिंदी हंगरी आइसलैंड का इन्डोनेशियाई आयरिश इतालवी जापानी कोरियाई लात्वीयावासी लिथुआनियाई मेसीडोनियन मलायी मोलतिज़ नार्वेजियन
फ़ारसी पोलिश पुर्तगाली रोमानियाई रूसी सर्बियाई स्लोवाक स्लोवेनियाई स्पेनिश स्वाहिली स्वीडिश थाई तुर्की यूक्रेनी उर्दू वियतनामी वेल्श यहूदी बंगाली बोस्नियाई
सिबुआनो एस्पेरांतो गुजराती हौसा हमोंग ईग्बो जावानीस कन्नड़ खमेर लाओ लैटिन माओरी मराठी मंगोलियन नेपाली पंजाबी सोमाली तामिल तेलुगु योरूबा
ज़ुलु
Английский Французский Немецкий Итальянский Португальский Русский Испанский