windows servisi oluşturma işlemi

[murcanlat]

arkadaşlar delphi veya başka bir dille veya dos kullanarak windows servisi nasıl oluşturulur bilgisi olan varmı

[sadettinpolat]

file --> new --> other da service application var. datamodule benzeyen
birsey cikacak karsiniza
sonra delphi helpi acip tservice yazarak aratin, tserviceyi sectiginiz zaman
sag tarafta using tservice diye bir bolum var. orda ufak bir ornek ve bi
servis nasil olsturulur , nasil install edilir gibi bilgiler mevcut.

[hdayi]

Windows servisi bir kez çalışır ve durur. Devamlı olarak çalışmasını sağlamak için servisin Excute olayına şu kodu yazmak gerekiyor.

Kod: Tümünü seç

procedure TService1.ServiceExecute(Sender: TService);
begin
    while not terminated do
        ServiceThread.ProcessRequests(True);
end;

kalanı aynı. Sadece görsel bileşenler kullanılamıyor tabii olarak.
İş bittikten sonra ise

Kod: Tümünü seç

ExeAdi /install

ile servis install ediliyor

Kod: Tümünü seç

ExeAdi /uninstall

ile ise kaldırılıyor.

Kolay Gelsin...

[unicorn64]

merhaba arkadaşlar. bi client server program üzerinde çalışıyorum ve clienti servis olarak yazmaya çalışıyorum. aslında normal program olarak hazırladım ama özellikle kapatılmayı engelleme açısından servis olarak çalışması gerekir diye düşündüm.

daha önceden servis tecrübem olmadığı için denemeler yapıyorum ancak servis olarak çalışan programda bir türlü form kullanamadım. yani oluşturduğum form birtürlü görüntüye gelmiyo... hatta form kullandığımda bazen bilgisayarı yönetten hizmetlerden başlatmaya çalıştığımda başlatılamıyo... servisler ve form kullanımı hakkında bilgisi olan var mı acaba??

[hdayi]

Servis olarak yazmaniz kapatilmasini engellemez. Servislerden durdurulabilir ya da exe'si sonlandirilabilir.
Bildigim kadari ile servislerde form kullanilamaz (yaniliyor olabilirim). Bence siz normal olarak yazin, formun onclose olayina action:=canone; yazin. Bu kapatilmasini engeller.

Kolay gelsin...