65.9K
CodeProject 正在变化。 阅读更多。
Home

文本日志查看器

starIconstarIconstarIcon
emptyStarIcon
starIcon
emptyStarIcon

3.30/5 (6投票s)

2009 年 8 月 6 日

CPOL

2分钟阅读

viewsIcon

55576

downloadIcon

2357

文本日志查看器

介绍 

日志查看器是一个非常简单易用的实时日志文件查看器。 只需要打开一个基于文本的日志文件,该程序就会检查文件是否有任何更改,并自动在屏幕上显示它们。

在设置部分,您可以找到高亮和图标选项。 通过这些选项,您可以确定您提到的标准对应的行颜色、背景颜色或显示图标。

日志查看器仅显示日志的最后 100 行(可选)。 此设置可以在日志窗口中显示,并且可以增加。 对于开发者,包含透明度设置,供那些想要查看透明日志窗口的人使用。 在项目中,您会找到一个目录监视器,它会监视目录和文件的更改。 在这部分,您可以跟踪更改的文件,并可以单击打开。

这是日志查看器的第一个版本,并且在半天内编写完成。 如果您不介意,请提供反馈以改进。

有很多像这样的实用程序。 但我只是想分享这个开源、无广告的实用程序,供大家免费使用。 如果您喜欢它,请使用它并提出一些不错的建议。

背景

许多应用程序将其日志写入基于文本的文件。 在我所有的应用程序中,每个步骤或关键函数都有一个日志选项,并且我在测试或实时工作时查看这些日志。 我创建此组件就是为了这个目的。

Using the Code

日志查看器使用线程来查看文件。 您可以使用拖放打开多个文件。

Dim s_SatirSayisi As Long = 0
Do

    Dim a As New System.IO.FileInfo(Dosya.DosyaTamYol)
    If Not (a.Exists) Then
        DosyaBulunamadi()
        Exit Do
    End If

    If Dosya.DosyaSonboyut <> a.Length Then

        If Dosya.DosyaSonboyut > a.Length Then
            Dosya.DosyaSonboyut = 0
        End If

        SonIslenenDosya(Dosya.DosyaTamYol)

        Dim veri() As String = DosyaOku(Dosya.DosyaTamYol, Dosya.DosyaSonboyut)
        Dosya.DosyaSonboyut = a.Length
        s_SatirSayisi = s_SatirSayisi + veri.Length
        SatirEkle(veri)

    End If

    System.Threading.Thread.Sleep(200)

Loop While Cls_Aktif

此线程是查看日志文件的主要函数。

关注点

DataGridView 用于查看每行的日志,并带有高亮和图标选项。 通过此选项,您可以轻松地监视文件,并且我卸载了其他日志查看器。 ;)

在这个项目中,您会找到

  • 多线程
  • 打开和读取文件
  • Datagridview 的使用
  • 文件系统监视器的使用
  • 注册表的使用
  • XML 的使用

致谢

  • .NET Docking Library for Windows Forms 用于选项卡视图 (WeifenLuo.WinFormsUI.Docking)
  • XML+ Library (由 Seyfettin Öztürk 提供)

历史

  • 首次发布

下一篇

  • 查找选项(等待中)
  • Windows 事件日志查看 (日志编号在超过最大记录数后没有改变,将会修复)
  • 多语言支持 (GUI,目前仅支持英语)

özk@n

© . All rights reserved.