Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Gövdesiz Fonksiyon
#1
Merhaba arkadaşlar
Ekran görüntüsünü resim olarak alan bir fonksiyon arıyordum aşağıdaki gibi bir fonksiyon buldum
function tform1.WindowSnap(windowHandle: HWND; bmp: TBitmap): boolean;
var
 r: TRect;
 user32DLLHandle: THandle;
 printWindowAPI: function(sourceHandle: HWND; destinationHandle: HDC;nFlags: UINT): BOOL; stdcall;
begin
 result := False;
 user32DLLHandle := GetModuleHandle(user32) ;
 if user32DLLHandle <> 0 then
 begin
   @printWindowAPI := GetProcAddress(user32DLLHandle, 'PrintWindow') ;
   if @printWindowAPI <> nil then
   begin
     GetWindowRect(windowHandle, r) ;
     bmp.Width := r.Right - r.Left;
     bmp.Height := r.Bottom - r.Top;
     bmp.Canvas.Lock;
     try
       result := printWindowAPI(windowHandle, bmp.Canvas.Handle, 0) ;
     finally
       bmp.Canvas.Unlock;
     end;
   end;
 end;
end;

Dikkat ederseniz var blogunda soyle bır tanım var;
var printWindowAPI: function(sourceHandle: HWND; destinationHandle: HDC;nFlags: UINT): BOOL; stdcall;
 
Fonksiyonun ne adı var nede gövdesi var.
Aşağıdaki satırda da ne işlem yapıpta result 'a aktarabılıyor ? Yani bir govdesi ,kod kısmı yok. 
try
       result := printWindowAPI(windowHandle, bmp.Canvas.Handle, 0) ;

Daha once bu kullanım şekline hiç rastlamadım bılgısı olan arkadaslar varmıdır. 
Örnekte yapılan işlem önemli değil yapının kullanımını merak ediyorum.
Cevapla


Bu Konudaki Yorumlar
Gövdesiz Fonksiyon - Yazar: serdar - 07-02-2020, Saat: 09:03
Cvp: Gövdesiz Fonksiyon - Yazar: elixir84 - 07-02-2020, Saat: 09:17
Gövdesiz Fonksiyon - Yazar: serdar - 07-02-2020, Saat: 09:20
Gövdesiz Fonksiyon - Yazar: sadettinpolat - 07-02-2020, Saat: 09:24
Cvp: Gövdesiz Fonksiyon - Yazar: Fesih ARSLAN - 07-02-2020, Saat: 09:28
Gövdesiz Fonksiyon - Yazar: serdar - 07-02-2020, Saat: 09:43
Cvp: Gövdesiz Fonksiyon - Yazar: Tuğrul HELVACI - 07-02-2020, Saat: 10:03
Gövdesiz Fonksiyon - Yazar: serdar - 07-02-2020, Saat: 12:02

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Fonksiyon çağırma ermanispir@gmail.com 2 645 29-10-2024, Saat: 15:51
Son Yorum: ermanispir@gmail.com
  [Ödüllü Soru] Object türüne göre nesne üreten fonksiyon Abdullah ILGAZ 2 2.135 16-07-2023, Saat: 20:18
Son Yorum: Tuğrul HELVACI
  String Fonksiyon Kullanımıyla ilgili ermanispir@gmail.com 2 1.045 01-06-2023, Saat: 11:28
Son Yorum: ermanispir@gmail.com
  SQL Server Fonksiyon hatası sametb 1 1.213 06-04-2022, Saat: 13:39
Son Yorum: sabanakman
  Delphi C# Fonksiyon Sonuç Döndürme Farkı Hayati 5 2.319 19-12-2021, Saat: 19:14
Son Yorum: Hayati



Konuyu Okuyanlar: 1 Ziyaretçi