var
Data: TStringList;
begin
IdHTTP1.REquest.Host:= 'vedop.mb-ggm.gov.tr';
Data:= TStringList.Create;
try
Data.Add('soyad_un=AYDIN');
Data.Add('ad=Recep');
Data.Add('baba_adi=Mehmet');
Data.Add('il=54');
Data.Add('dogum_yili=1969');
Data.Add('submit1=Sorgula'); // <-- Bu olmasa da hata vermedi ancak ne olur ne olmaz. Adamlar bunu da yollamış.
Memo1.Lines.Text:= IdHTTP1.Post('/vkn_sorgu/VKNoSorguOutput.jsp', Data);
finally
Data.Free;
end;
yukarıda yazılan satırlarda bir hata var mı. programı runladığımda memo ile başlayan satırda hep aynı hatayı veriyor.
nesnenin versiyonuna baktım. dediğiniz gibi versiyonda bir sorun yok. ancak hala sorunu çözmeedim. herhangi bir portu açmam falan mı gerekli. bir türlü sorunu bulamadım