Čau Miro, len Ťa chcem podpichnúť :-))). Tá chyba hneď na začiatku (naplnenie hodnoty do poľa, ktoré nikde nepoužiješ) sa tam vyskytla zámerne, alebo náhodou?
Ľ.

Pri kopírovaní som neoznačil prvé písmeno. Takže kým to opravím priamo v článku, tu je prvý Fix:
V prvom riadku má byť namiesto poľa "ist" správne "List".

Navíc s tím "L" na začátku to funguje mnohem líp :-)

to koukám. Né že bych to nikdy nepotřeboval, ale zatím jsem byl vždycky línej si na to dělat udělátko. Bude se jich takto objevovat více? :-))

Sikovne, len skoda ze to funguje iba v R6 :-(

Doplním do článku aj R5 verziu.

stare ako Praha ale dobre...:-)

Přijde mi to jako s vtipy - je jednoduché v polovině říct: To znám! a zkazit tak vyprávění. To zvládne každý. Někteří ani nenajdou odvahu vtipy vyprávět a ještě míň lidí vtipy vypráví opravdu dobře.
Nechcete zkusit napsat článek o nějakém triku, který znáte? A vůbec nebude vadit, když to bude starý trik ...

Podla mna je to velmi sikovna vecicka a velmi sa mi to hodi. Len tak dalej...

Miro,
vždy jsem si rychle udělal "akci" pro konkrétní problém a dál jsem se tím nezabýval. Chtěl jsem Ti jenom poděkovat, protože si to napsal opravdu dobře. Díky.
Slávek

Neznaje toto řešení, sestavil jsem si vlastní s podobným cílem: smartikonou (resp. tlačítkem panelu nástrojů) zobrazit a editovat pole dokumentu.
Jelikož používá @For a @Eval, není už k dispozici pro starší verze než R6.

Příručka uživatele:
Zadejte formuli, která se vyčíslí nad aktuálním dokumentem. Výsledek se zobrazí ve stavovém řádku. Může jít i o modifikaci dokumentu.
Pokud je výsledek delší než 1 znak, zobrazí se také ve vstupním poli, aby šel zkopírovat.
V nabídce je přichystána sada formulí, pro modifikaci polí dokumentu s jejich aktuálním obsahem. Slouží také pro kompaktní přehled polí dokumentu.
Při použití nezměněné formule z nabídky (nebo prázdného vstupu) se totéž předepíše v dalším dialogu, který už je bez nabídky, ale zato umožňuje zadat delší vstup (což bohužel pole s nabídkou neumožňuje).
Na počátku seznamu je UNID, NoteID, čas vytvoření a modifikace a cesta k databázi.

Formule:

df := @DocFields;
@For(n := 1;
n <= @Elements(df);
n := n + 1;
sep := @If(@Eval("@IsText(" + df[n] + ")"); "\""; @Eval("@IsTime(" + df[n] + ")"); "["; "");
dfr := "FIELD " + df[n] + " := " + @Implode(sep + @ReplaceSubstring(@ReplaceSubstring(@Eval("@Text(" + df[n] + ")");"\\";"\\\\"); "\""; "\\\"") + @If(sep = "["; "]"; sep); ":");
@If(@IsError(dfr); ""; dfv = ""; @Set("dfv"; dfr ); @Set("dfv"; dfv : dfr ) )
);
lst := ("@DbName = "+@Implode("\""+@Name([Abbreviate];@DbName)+"\"";":")) : ("@Created = ["+@Text(@Created)+"]") : ("@Modified = ["+@Text(@Modified)+"]") : ("\""+(@Text(@DocumentUniqueID):@NoteID)+"\"") : @Unique(dfv);
input := @Prompt([OkCancelEditCombo];"Obecný agent";"Zadejte formuli:"; ""; lst );
@If(@Left(input; 100) = @Left(dfv; 100) | input = ""; @Set("input"; @Prompt([OkCancelEdit];"Obecný agent";"Zadejte dlouhou formuli:"; input ) ); "" );
res := @Text(@Eval(input));
@StatusBar(res);
@If(@Length(res) > 1; @Prompt([OkCancelEdit]; "Obecný agent"; "Výsledek:"; res); "")