dinphi的专栏

1.Append 　　功能说明：追加内容到文件中。文件必须要存在。 　　参考实例： 　　var 　　 　S: String; 　　 　F: TextFile; 　　begin 　　 　S := 'This is a book.'; 　　AssignFile(F, 'C:\MyFile.txt');    // 将C:\MyFile.txt文件与F变量建立连接，后面可以使用F变量对文

在Delphi 7下要制作系统托盘，只能制作一个比较简单的系统托盘，因为ShellAPI文件定义的TNotifyIconData结构体是比较早的版本。定义如下： 1 2 3 4 5 6 7 8 9 _NOTIFYICONDATAA = record    cbSize: DWORD;    Wnd: HWND;    uID: