WInfoAdd
( ManId : Longint;
Dep : Byte;
Type : Byte;
Spec : Longint;
Item : String[5];
Text : StringZ;
Help : StringZ)
Vloží jednu řádku do informačního okna.
-
ManId - Ident zaměstnance, kterému řádka patří. Jestliže bude existovat
záznam s jiným identem, budou napřed všechny řádky
smazány. Jestliže bude ManId=0, nebude
předchozí obsah smazán. Tohoto se využívá v případě výstupu informací o
souběžných pracovních poměrech. Tedy informacích sice souvisejících, ale k
jinému zaměstnanci. Řádky s identem 0 budou podbarveny šedivou barvou a nebude z
nich možno vyhledat položku!
-
Dep - Typ oddělení pro které je řádek vytvořen (dbtO, dbtP, dbtM). Podle
tohoto oddělení je pak možno cíleně mazat řádky pouze tohoto jednoho oddělení (WInfoClear). Rozsah však není omezen pouze na tyto tři tabulky (dbtO, dbtP, dbtM), takže lze používat i vlastní čísla.
-
Type - Typ řádky. Podle tohoto typu se řídí barva řádky.
- wiInfo
- wiWarning
- wiError
- wiFatalError
-
Spec - Specifikace řádky. Slouží pro účely bližšího určení chyby nebo
upozornění.
-
Item - Položka oddělení O,P nebo M, které se řádka týká. Používá se k
rychlému vyhledání položky (O0100, ...). Neplatí u řádek, kde ManId=0.
-
Text - Zobrazovaný text.
-
Help - Cesta k HTML popisu chyby nebo upozornění. Stránka se hledá
relativně od kořene v souboru pomoci Pam.chm. Testovací strana je:
'WinInfo\Test.htm'.
Podívejte se na: Práce s
informačním oknem
Příklad:
if(_WInfoIsOpen)then
WInfoClear;
WInfoAdd(O[dbIdent], dbtO, wiInfo, 10, "","Tohle je zobrazení pro 'wiInfo' !", "WinInfo\Test.htm");
WInfoAdd(O[dbIdent], dbtO, wiWarning, 20, "","Tohle je zobrazení pro 'wiWarning' !", "");
WInfoAdd(O[dbIdent], dbtO, wiError, 30, "","Tohle je zobrazení pro 'wiError' !", "");
WInfoAdd(O[dbIdent], dbtO, wiFatalError, 40, "","Tohle je zobrazení pro 'wiFatalError' !", "");
else
...
endif