[Ödüllü Soru] Object türüne göre nesne üreten fonksiyon

[Abdullah ILGAZ]

Arkadaşlar merhaba,

Mini bir ödüllü sorumuz var. Bu sorunun doğru cevabı için @SimaWB ve @Tuğrul HELVACIdan sizlere ekstra puan talebim olacak

Soru tanımı: WSDL Importer üzerinden projede dahil edilen xml servislerinin nesnelerinin üretilmesi için yardımcı bir fonksiyon oluşturulacak. 

Örnek çıktı:


var
_aService: AServiceSoap;
_bService: BServiceSoap;
_cService: CServiceSoap;

begin
_aService := BizimFonksiyon('ServisURL','diğer parametreler... class tipi geçilebilir'); // GetAServiceSoap fonksiyonunu tetikleyerek AServiceSoap nesnesi üretmeli.
_bService := BizimFonksiyon('ServisURL','diğer parametreler... class tipi geçilebilir'); // GetBServiceSoap fonksiyonunu tetikleyerek BServiceSoap nesnesi üretmeli.
_cService := BizimFonksiyon('ServisURL','diğer parametreler... class tipi geçilebilir'); // GetCServiceSoap fonksiyonunu tetikleyerek CServiceSoap nesnesi üretmeli.

end;


Dipnot: ServisURL, HTTPRio'nun Addr parametresine denk gelmeli. UseWSDL ve HttpRio parametreleri fonksiyon içinde tanımlanabilir, veya opsiyonel parametre olarak geçilebilir olmalı.