DISKUSE
Komprese příloh (2)
14.09.2023 10:31

Chyba aplikace Notes: Soubor neexistuje. (profile)
10.05.2023 07:53

Co se děje ? Jak se pracuje v jazyce vzorců ? (2)
21.04.2023 14:15

Co se starou dokumentací k R3, R4, ...?
05.04.2023 14:41

Událost, při neexistenci přílohy. (2)
05.04.2023 11:51

Jak zjistit vložení přílohy. (4)
21.03.2023 11:14

Rámec nebo okno ? (10)
22.02.2023 10:14

Vylepseni designera 9.01 (3)
02.02.2023 20:27

14.09.2023 10:31

Chyba aplikace Notes: Soubor neexistuje. (profile)
10.05.2023 07:53

Co se děje ? Jak se pracuje v jazyce vzorců ? (2)
21.04.2023 14:15

Co se starou dokumentací k R3, R4, ...?
05.04.2023 14:41

Událost, při neexistenci přílohy. (2)
05.04.2023 11:51

Jak zjistit vložení přílohy. (4)
21.03.2023 11:14

Rámec nebo okno ? (10)
22.02.2023 10:14

Vylepseni designera 9.01 (3)
02.02.2023 20:27

ŠKOLENÍ
REKLAMA
KOMENTÁŘE
Komentáře ke článku "Vytvorte si "Simple Item Editor""
Lubomir Hornak
09.07.2003 07:22
09.07.2003 07:22
Tú chybu tam máš zámerne?
Č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?
Ľ.
Ľ.
Miro Uhlar
09.07.2003 08:38
09.07.2003 08:38
Nie, zámer to nebol :-).
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".
V prvom riadku má byť namiesto poľa "ist" správne "List".
Jarda Sedlák
09.07.2003 10:32
09.07.2003 10:32
Skvělé, díky
Navíc s tím "L" na začátku to funguje mnohem líp :-)
Martin
09.07.2003 13:07
09.07.2003 13:07
Teda
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? :-))
ivan
10.07.2003 14:56
10.07.2003 14:56
iba R6
Sikovne, len skoda ze to funguje iba v R6 :-(
Miro Uhlar
10.07.2003 16:03
10.07.2003 16:03
Dobrý postreh....
Doplním do článku aj R5 verziu.
bubux
11.07.2003 09:31
11.07.2003 09:31
stare ale dobre...:-)
stare ako Praha ale dobre...:-)
Emil Čelustka
11.07.2003 10:04
11.07.2003 10:04
TO: Bubux
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 ...
Nechcete zkusit napsat článek o nějakém triku, který znáte? A vůbec nebude vadit, když to bude starý trik ...
Miro
11.07.2003 19:38
11.07.2003 19:38
Super
Podla mna je to velmi sikovna vecicka a velmi sa mi to hodi. Len tak dalej...
Slávek B.
08.09.2003 09:09
08.09.2003 09:09
Poděkování
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
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
Miro Uhlar
09.09.2003 12:35
09.09.2003 12:35
Pochvala vždy poteší :-)
Martin Pištora
20.03.2006 09:21
20.03.2006 09:21
"Obecný agent"
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); "")
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); "")