WInfoAdd

(    ManId : Longint;
     Dep   : Byte;
     Type  : Byte;
     Spec  : Longint;
     Item  : String[5];
     Text  : StringZ;
     Help  : StringZ)

Vloží jednu řádku do informačního okna.

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