169 похожих чатов

Привет всем! Подскажите пожалуйста по F#. Есть XML файл примерно

такой структуры:

<objectgroup name="EventsObject">
<object id="1" name="start_0" type="Event" x="0.0" y="0" width="16.0" height="304">
<properties>
<property name="beaconType" value="Start"/>
<property name="type" value="Beacon"/>
</properties>
</object>
</objectgroup>

Обращаемся к объектам из кода примерно так:

let endPositionX =
level.Objectgroups
|> Array.pick (fun group ->
if group.Name = "EventsObject"
then Some group.Objects
else None)
|> Array.pick (fun event ->
event.Name
|> Option.bind (fun name ->
if name.StartsWith("end_0")
then Some (int event.X)
else None
)
)

Переменная event типа XmlProvider<...>.Object имеет в себе свойства id, name, type, x, y, width и height к которым можно получить доступ через точку. А как получить Value от property name="beacoType" ???

1 ответов

9 просмотров

Вроде как event.properties |> Seq.find (fun p -> p.name = "beaconType") |> fun p -> p.value

Похожие вопросы

Обсуждают сегодня

А чем вам питонисты не угодили?😂
.
79
Есть какой-нибудь для Delphi/FPC T*Compression(Decompression)Stream на базе LZ4/Zstd/любой другой быстрый(и хорошо сжимающий) алгоритм А ещё лучше в pure pascal А ещё лучше од...
notme
32
Hello. Could you please help me with finding all coordinates within a radius using a spatial index, given that I have a table with coordinates? SET @lng = 37.57925; SET @lat ...
Rinchin G
7
Язык Си можно выучить за день? По книжке ANSI C на 230 страниц
Vincent Vegan
29
Не получается у меня либу Zstd статически слинковать, вылазят какие-то AV Вроде example у них не сложный есть, вроде всё делаю как там... но не выходит чего-то Вопрос - если ...
notme
4
Всем привет, написал код ниже, но он выдает сегфолт, в чем причина? #include <stdio.h> #include <stdlib.h> #include <string.h> struct product { char *name; float price; };...
buzz базз
75
Всех приветствую. Направьте меня в нужное русло. Постепенно переписываю проект с delphi на lazarus. Приложение - обычный windows/linux клиент для бд firebird. Тут все хорошо. ...
Mishutka
8
Привет всем, подскажите, есть сайт на ево 1.4, надо сделать его мультиязычным, структура документов одинаковой останется, чисто тексты разные, свои тв для каждого языка, поддо...
Oleg
7
@rouse_79 https://github.com/AlexanderBagel/FWZip/blob/8c6882a31ffaa9a23e66e22eaa5b1f7ebfcad43c/zlib_external.pas#L393 Почему Си-шная функция memset, параметр отвечающий за з...
notme
8
{"fieldValue":[ {"title":"Alkmaar","coords":"52.62689992095562, 4.771862510168792","address":"Edisonweg 1","zip":"1821 BN","city":"Alkmaar","description":"ma-vr: 07:00-17:00"...
Marc Hoogstrate
5
Карта сайта