| ( |
|
|
|||
| checks if mail is read by user with specified mailbox then returns 0. HAL-function TestReadFlagHAL could be used instead of TestReadFlag. | |||
 |
|
| Parameters: | |
| Mail Serial Number | |
| MailBox Serial Number | |
|
|
global
function string ReturnMailStatus(LongInt mailnr,LongInt mailbox)
begin
string 10 res;
res = "UNREAD";
if (TestReadFlag(mailnr,mailbox)==0) then begin
res = "READ";
end;
ReturnMailStatus = res;
end;
|
|
| Related topics: | |