DELETE FROM MSG BASE — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м (→Смотрите также) |
||
| Строка 15: | Строка 15: | ||
[[Функции Delphi]] | [[Функции Delphi]] | ||
| + | |||
| + | [[MSG]] | ||
Версия 12:29, 28 июня 2019
DELETE_FROM_MSG_BASE - это программа из справочника R266
Удалить все из базы сообщений MSG_
Текст
local msg
try
msg := OPENFDATA( 'MSG_', 'msg', false, OPDATAPATH, ~IsCheckStr := false )
while !( msg )->( EOF() )
( msg )->( TRYTODELETE() )
end
finally
CLOSETABLE( msg )
end