LINUX.ORG.RU
Форум — Development  

обобщение и интерфейсы

 


0

1

Добрый день, есть несколько типов наподобие 

type T1() =
    let mutable _a = ""
    member x.a 
        with get() = _a
        and set(v) = _a <- v
    member x.Other1 = ()

type T2() =
    let mutable _a = ""
    member x.a 
        with get() = _a
        and set(v) = _a <- v
    member x.Other2 = ()
Для представления в WPF хочется создать одну модель для них, как лучше это сделать? Представлять и изменять планируется только мемберы, полностью совпадающие у классов.

Меня устроит примерно следующее, если заставить это работать: 

type IT =
    abstract member a : string

type T1() =
    let mutable _a = ""
    interface IT with
        member x.a 
            with get() = _a
            and set(v) = _a <- v
    member x.Other1 = ()

type T2() =
    let mutable _a = ""
    interface IT with
        member x.a 
            with get() = _a
            and set(v) = _a <- v
    member x.Other2 = ()

type TModel (t : IT) =
    member x.a 
        with get() = t.a
        and set(v) = t.a <- v

Ответ на: комментарий от dave

спасибо,

у меня еще один вопрос - можно как-то получить доступ к полям класса предка в объявлениях полей наследника? 

type B (p) = 
    member x.p = p

type T(path)  = 
    inherit BaseSchem(path)
    member x.pp = x.p

pseudo-cat ★★★
() автор топика
Ответ на: комментарий от dave

кстати, можно так - 

abstract member relatively : bool with get, set

pseudo-cat ★★★
() автор топика
Ответ на: комментарий от dave

а ну все верно, это моя невнимательность, спасибо

pseudo-cat ★★★
() автор топика
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.
Development