TC Kimlik Sorgulama Çalışıyor

[erdogan_ozkaya]

Arkadaşlar,

TC NO sorgulamayı yaptım fakat resmi yapamadım.
Ekte TC Kimlik sorgulamanın çalışır hali mevcut geliştiren arkadaşların tekrar paylaşırsa sevinirim.

Teşekkürler

[G.Arkas]

Bunun nedeni il değiştirdikten sonra ilçeleri yüklemek için sayfa tekrar navigate ettiriliyor. istersen online olarak dene ili değiştirdiğinde ilçe yüklenince güvenlik kodu değişiyor.Sen burada 2 aşamalı bir sorgu yaptırmalısın

* Önce ili sorgulayacaksın ve ilçeleri çekeceksin
* Sonra Formun bütününü sorgulayacaksın.

Vaktim olursa örnek hazırlayıp sunacağım İyi çalışmalar.

Kodunuzda bulunan Combobox bileşeninin OncHange olayının en altına şu kodu ekleyin

Kod: Tümünü seç

Web.OleObject.Document.GetElementByID('ctlCity').Value:=Edit10.Text;
Web.OleObject.Document.GetElementByID('ctlQueryFromData').click;

Bu kod il değişiminde sayfanın istediğimiz ile göre navigate ettirilmesini sağlayacak ve probleminiz çözülecektir.Aynı zamanda button'un onclick olayında ki

Kod: Tümünü seç

Web.Navigate('http://tckimlik.nvi.gov.tr/Web/QueryIdentityNumber.aspx');

Kodunu silin. Zaten sayfa formcreate de navigate ettiriliyor.

İyi çalışmalar. Takıldığınız başka biryer olursa sorabilirsiniz.

[erdogan_ozkaya]

Hocam Resimi image nesnesinde nasıl gösterebiliriz?

[G.Arkas]

Kod: Tümünü seç

image1.Picture:=nil;
OleDraw(web.ControlInterface, DVASPECT_DOCPRINT,
image1.Canvas.Handle, Rect(0, 0, web.Width, web.Height));

Bu şekilde sayfanın herhangi bir yerindeki resmi image nesnesine aktarabilirsin.

[erdogan_ozkaya]

Ekliyorum fakat hata alıyorum burda - OleDraw -

Kod: Tümünü seç

procedure TForm1.WebDocumentComplete(Sender: TObject;
  const pDisp: IDispatch; var URL: OleVariant);
begin
image1.Picture:=nil;
OleDraw(web.ControlInterface, DVASPECT_DOCPRINT, image1.Canvas.Handle, Rect(0, 0, web.Width, web.Height));
end;

teşekkürler

[G.Arkas]

Uses'e Activex ekle.

[erdogan_ozkaya]

Hocam bu kod eklediğimde web resmini çekip image nesnesine atıyor ölçülendirip denediğimde çalışıyor fakat diyelimki yanlış bilgi girdiğinde sayfanın başında biruyarı çıkıyor ve sayfanın boyutunu değiştiriyor değişicede image nesnesine sayfanın alakasız yerleri geliyor direkt resmi çekmeninbir yolu varmıacaba?

Teşekkürler

[G.Arkas]

Bunu şu şekilde aşabilirsin.

Kendine dönen HTML içeriğinde bir sabit belirle; Örneğin hatasız sorgu yaptığında dönen cevabı parsele sonuç doğru ise

Kod: Tümünü seç

Image1.Visible:=True;

değilse

Kod: Tümünü seç

False

yap. Böylelikle gelen cevaba göre resmi gösterme şansın olur.

[erdogan_ozkaya]

İlginiz için Teşekkürler, yaptım müsayit olunca toparlayım paylaşıcam

[G.Arkas]

Merhaba;

Makaleler bölümüne sizin kodlarınızı geliştirerek örnek bir uygululama hazırladım inceleyebilirsiniz.

[Master43]

Sanırım tc kimlik sorgulama sitesi değişmiş. Programı yeni siteye göre güncelleyebilir misin.

[erdogan_ozkaya]

Kardeş hazırladım ama evdeki bilgisayarım da mantık çok basit aslında iewebdeveloper kullanarak inputları öğrenebilirsin şuanki sitede ad kısmının adı "searchCriteriaContent_txtAd" olarak yapılmış.