mojaSymfonia FORUM
https://forum.mix-soft.pl/

FKF - dodawanie elementów do słownika
https://forum.mix-soft.pl/viewtopic.php?f=15&t=3482
Strona 1 z 1

Autor:  nick [ 2011-11-22, 16:45 ]
Tytuł:  FKF - dodawanie elementów do słownika

Witam,
Przeorałem dostępną mi dokumentację i niniejsze forum i... nic nie znalazłem (poza martwym wątkiem sprzed dwóch lat)
Czy ktoś z PT Forumowiczów może udzielić jakiejś podpowiedzi lub zamieścić fragment kodu (ambasic lub VB) jak programowo dodać element do słownika?

Autor:  wrob [ 2011-11-23, 14:50 ]
Tytuł: 

Nie napisales o jakiej wersji FKF mowisz ale jesli > 2009 to moze by trzeba uzyc bibliotek common SDK w tym celu..

Autor:  nick [ 2011-11-23, 20:00 ]
Tytuł: 

Dzięki wrob, Twój post przypomniał mi o dokumentacji o której zapomniałem (leżała sobie gdzieś w zipie nietknięta przez ponad dwa lata...). Jest taki dokument Użycie F.Common poprzez COM.

Mój kod VB:
Kod:
Dim s As Symfonia
Set s = Application.CommandAp("GetCommon")
Dim d As CDict
Set d = New CDict
s.StructTree.Dicts.GetDictByShort "słownik testowy", d
Dim e As CElement
Set e = New CElement
s.StructTree.Dicts.AddElemByInstance d.Id, "nazwa elementu", "skrót elementu", True, "1", "opis elementu", e

Autor:  rob [ 2011-11-29, 19:20 ]
Tytuł: 

Witam

zaadaptowałem powyższy kod do AMBasic'a ale nie działa (tzn. nic się dzieje bez komunikatu o błędzie) czy mogę prosić o komentarz ?

Kod:
dispatch xSlo = xFactory.NewObject( "CDict" )
dispatch xEle = xFactory.NewObject( "CElement" )   
xSlo.Load(8451) // to jest słownik, który chcę uzupełniać
dispatch s
s = Application.CommandAp("GetCommon")
dispatch d
d.create("SymfoniaCOM.CDict.10.1")
s.StructTree.Dicts.GetDictByShort( "spedycje", xSlo)
dispatch e
e.Create("SymfoniaCOM.CElement.10.1")
s.StructTree.Dicts.AddElemByInstance( xSlo, pozslo, pozslo, 1, "3", pozslo, xEle)


pozdrawiam
Robert

Strona 1 z 1 Strefa czasowa UTC+1godz. [letni]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/