Delphi - Logs记录,函数实现MsgDsp
2021-02-04 03:14
标签:记录 bsp 形式 ring 代码 user begin 窗体 use Logs记录-函数实现MsgDsp 大多数时候,我们不太希望消息以交互的形式出现,这个时候我们可以在窗体上放置一个Memo,然后单独开一个线程进行监视,从而实现把消息实时的显示出来,便于开发者分析。 关键代码如下: Delphi - Logs记录,函数实现MsgDsp 标签:记录 bsp 形式 ring 代码 user begin 窗体 use 原文地址:https://www.cnblogs.com/jeremywucnblog/p/11484308.html1 procedure TFrmMain.MsgDsp(v_Str: string);
2 begin
3 mm_log.Lines.Add(‘[‘ + SYS_USERNAME + ‘] - [‘ + v_Str + ‘] - [‘ + FormatDateTime(‘YYYY-MM-DD hh:mm:ss zzz‘, Now()) + ‘]‘);
4 end;