Delphi’de \u00c7al\u0131\u015ft\u0131r\u0131labilir Dosyalar\u0131n Ba\u015flat\u0131lmas\u0131 ve Oda\u011f\u0131 De\u011fi\u015ftirme<\/p>\n
Delphi geli\u015ftirme ortam\u0131nda, uygulamalar\u0131n\u0131z\u0131n di\u011fer \u00e7al\u0131\u015ft\u0131r\u0131labilir dosyalar\u0131 ba\u015flatmas\u0131 ve oda\u011f\u0131 bu yeni uygulamalara y\u00f6nlendirmesi s\u0131k\u00e7a ihtiya\u00e7 duyulan bir i\u015flemdir. Bu makalede, Delphi’de bu i\u015flemlerin nas\u0131l ger\u00e7ekle\u015ftirilece\u011fini, olas\u0131 sorunlar\u0131 ve \u00e7\u00f6z\u00fcm yollar\u0131n\u0131 detayl\u0131 bir \u015fekilde ele alaca\u011f\u0131z. \u00d6ncelikle, ShellExecute fonksiyonunun kullan\u0131m\u0131n\u0131 ve avantajlar\u0131n\u0131 inceleyece\u011fiz. Ard\u0131ndan, daha fazla kontrol sa\u011flayan CreateProcess fonksiyonuna ge\u00e7ece\u011fiz. Son olarak da, odak de\u011fi\u015ftirme i\u015flemlerinde kar\u015f\u0131la\u015f\u0131labilecek sorunlara ve bunlar\u0131n nas\u0131l \u00e7\u00f6z\u00fclebilece\u011fine de\u011finece\u011fiz. <\/p>\n
En basit y\u00f6ntem, Bu kod, not defterini a\u00e7ar. Daha fazla kontrol sa\u011flamak i\u00e7in Bu kod, Ba\u015flat\u0131lan uygulaman\u0131n otomatik olarak oda\u011f\u0131 almas\u0131 her zaman garanti de\u011fildir. \u00d6zellikle di\u011fer uygulamalar\u0131n \u00f6n planda olmas\u0131 durumunda, oda\u011f\u0131 de\u011fi\u015ftirmek i\u00e7in ek i\u015flemler gerekebilir. Bu, Bu konuda daha fazla bilgi edinmek i\u00e7in, bu \u0130ngilizce makaleye<\/a> g\u00f6z atabilirsiniz. Ayr\u0131ca, Delphi ile ilgili daha fazla bilgi i\u00e7in web sitemi<\/a> ziyaret edebilirsiniz.<\/p>\n Umar\u0131m bu makale Delphi’de \u00e7al\u0131\u015ft\u0131r\u0131labilir dosyalar\u0131n ba\u015flat\u0131lmas\u0131 ve oda\u011f\u0131 de\u011fi\u015ftirme konusunda size yard\u0131mc\u0131 olmu\u015ftur. Ba\u015fka sorular\u0131n\u0131z veya \u00f6nerileriniz varsa, l\u00fctfen bana bildirin.<\/p>\n #Etiketler: Delphi, \u00c7al\u0131\u015ft\u0131r\u0131labilir Dosya, Oda\u011f\u0131 De\u011fi\u015ftirme, ShellExecute, CreateProcess, SetForegroundWindow, Programlama, Yaz\u0131l\u0131m Geli\u015ftirme<\/p>\n","protected":false},"excerpt":{"rendered":"Delphi’de \u00c7al\u0131\u015ft\u0131r\u0131labilir Dosyalar\u0131n Ba\u015flat\u0131lmas\u0131 ve Oda\u011f\u0131 De\u011fi\u015ftirme Delphi geli\u015ftirme ortam\u0131nda, uygulamalar\u0131n\u0131z\u0131n di\u011fer \u00e7al\u0131\u015ft\u0131r\u0131labilir dosyalar\u0131 ba\u015flatmas\u0131 ve oda\u011f\u0131 bu…","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"csco_page_header_type":"","csco_page_load_nextpost":"","csco_page_subscribe_form":"","csco_page_contact_form":"","footnotes":""},"categories":[1],"tags":[],"class_list":{"0":"post-10245","1":"post","2":"type-post","3":"status-publish","4":"format-standard","6":"category-genel","7":"cs-entry","8":"cs-video-wrap"},"yoast_head":"\nShellExecute<\/code> fonksiyonudur. Bu fonksiyon, i\u015fletim sisteminin varsay\u0131lan uygulamas\u0131n\u0131 kullanarak bir dosyay\u0131 a\u00e7ar. Kullan\u0131m\u0131 olduk\u00e7a kolayd\u0131r ve \u00e7o\u011fu durumda yeterlidir. Ancak, i\u015flemin ilerlemesi \u00fczerinde s\u0131n\u0131rl\u0131 kontrol sa\u011flar. <\/p>\n\nprocedure TForm1.Button1Click(Sender: TObject);\nbegin\n ShellExecute(Handle, 'open', 'C:\\Windows\\System32\\notepad.exe', nil, nil, SW_SHOW);\nend;\n<\/code><\/pre>\n'open'<\/code> parametresi, dosyan\u0131n nas\u0131l a\u00e7\u0131laca\u011f\u0131n\u0131 belirtir. Di\u011fer parametreler ise iste\u011fe ba\u011fl\u0131d\u0131r. \u00d6rne\u011fin, SW_SHOW<\/code> parametresi, pencerenin g\u00f6r\u00fcn\u00fcr olmas\u0131n\u0131 sa\u011flar. Bu fonksiyon, ba\u015flat\u0131lan uygulaman\u0131n ba\u015far\u0131l\u0131 bir \u015fekilde \u00e7al\u0131\u015ft\u0131r\u0131l\u0131p \u00e7al\u0131\u015ft\u0131r\u0131lmad\u0131\u011f\u0131n\u0131 do\u011frudan bildirmez. Bu nedenle, hata kontrol\u00fc i\u00e7in ek i\u015flemler gerekli olabilir.<\/p>\nCreateProcess Fonksiyonu ile Daha Fazla Kontrol<\/h2>\n
CreateProcess<\/code> fonksiyonunu kullanabiliriz. Bu fonksiyon, \u00e7al\u0131\u015ft\u0131r\u0131labilir dosyay\u0131 do\u011frudan ba\u015flat\u0131r ve i\u015flemin daha fazla ayr\u0131nt\u0131s\u0131na eri\u015fim sa\u011flar. \u00d6rne\u011fin, i\u015flemin standart giri\u015f\/\u00e7\u0131k\u0131\u015f ak\u0131mlar\u0131n\u0131 y\u00f6nlendirebilir ve i\u015flemin durumunu izleyebilirsiniz. Ancak, ShellExecute<\/code>‘ye g\u00f6re daha karma\u015f\u0131k bir yap\u0131ya sahiptir.<\/p>\n\nprocedure TForm1.Button2Click(Sender: TObject);\nvar\n ProcessInfo: TProcessInformation;\nbegin\n if CreateProcess(nil, PChar('C:\\Windows\\System32\\notepad.exe'), nil, nil, False, 0, nil, nil, ProcessInfo) then\n begin\n \/\/ Ba\u015far\u0131l\u0131 bir \u015fekilde ba\u015flat\u0131ld\u0131\n CloseHandle(ProcessInfo.hProcess);\n CloseHandle(ProcessInfo.hThread);\n end\n else\n begin\n \/\/ Hata olu\u015ftu\n ShowMessage('Hata!');\n end;\nend;\n<\/code><\/pre>\nCreateProcess<\/code> fonksiyonunu kullanarak not defterini ba\u015flat\u0131r ve ba\u015far\u0131l\u0131 olup olmad\u0131\u011f\u0131n\u0131 kontrol eder. Hata durumunda bir hata mesaj\u0131 g\u00f6sterilir. CloseHandle<\/code> fonksiyonu ile olu\u015fturulan kaynaklar temizlenir.<\/p>\nOda\u011f\u0131 De\u011fi\u015ftirme<\/h2>\n
SetForegroundWindow<\/code> fonksiyonu ile yap\u0131labilir. Ancak, bu fonksiyonun her zaman ba\u015far\u0131l\u0131 olmas\u0131 garanti de\u011fildir, \u00e7\u00fcnk\u00fc i\u015fletim sistemi g\u00fcvenlik nedeniyle oda\u011f\u0131 istedi\u011finiz gibi de\u011fi\u015ftirmenize izin vermeyebilir. Bu gibi durumlarda, kullan\u0131c\u0131 deneyimini bozmamak i\u00e7in alternatif \u00e7\u00f6z\u00fcmler bulman\u0131z gerekebilir. \u00d6rne\u011fin, bir bildirim g\u00f6stererek kullan\u0131c\u0131n\u0131n uygulamay\u0131 kendisinin aktif hale getirmesini sa\u011flayabilirsiniz. <\/p>\n