Hal Kayıt Sistemi Web Servis

[yhackup]

Ne kadar açıklayıcı kod yazmışsınız maşallah,

Ben olsam Bu kodu,

gonder.istek[0].BildirimMalBilgileri.UretimBeldeId:= 785; 

Böyle yazardım.

Send.Req[0].NPI.BeldeId:= 785; 

Değişkenlerimi olabildiğince kısa tutuyorum, Hatta eğer yapabiliyorsam tek harf kullanıyorum

procedure hihaho;
var T:TStringList;
begin
  T := TStringList.Create;
  try
    T.Add('');
  finally
  T.Free;
  end;
end;