NetReceiveReleaseResponse Example for Delphi

procedure TForm1.LEADDicomNet1NetReceiveReleaseResponse(ASender: TObject;
  hNet: Integer);
var
   strOut: String;
begin
   //Release Response was received
   strOut:= 'Release Response was received';
   Memo1.Lines.Add(strOut);
end;