桌面开发-学习笔记

delphi写入读取注册表，指定文件夹为用户上传打开的文件夹-delphi工资系统

// 保存最近打开的文件路径到注册表
procedure SaveLastPath(const Path: string);
var
Reg: TRegistry; // 注册表对象
begin
Reg := TRegistry.Create(KEY_WRITE); // 创建可写入的注册表对象
try
Reg.RootKey := HKEY_CURRENT_USER; // 指定根键为当前用户
if Reg.OpenKey(RegPath, True) then // 打开注册表项，如果不存在则创建
Reg.WriteString(RegValue, Path); // 写入路径信息
finally
Reg.Free; // 释放注册表对象
end;
end;

// 加载最近打开的文件路径
function LoadLastPath: string;
var
Reg: TRegistry; // 注册表对象
path: array [0..MaxChar] of char; // 存储路径的 Char 数组
UserFolderPath: string; // 存储用户文档目录
begin
Result := ''; // 初始化返回值为空
Reg := TRegistry.Create(KEY_READ); // 创建只读的注册表对象
try
//   UserFolderPath := GetHomePath;// 'C:\Users\ZBB\AppData\Roaming'
//   UserFolderPath :=TPath.GetHomePath; // 'C:\Users\ZBB\AppData\Roaming'
//   UserFolderPath :=GetEnvironmentVariable('USERNAME');// 'ZBB'
//   UserFolderPath :=GetEnvironmentVariable('USERPROFILE');    // 'C:\Users\ZBB
if Succeeded(SHGetFolderPath(0, CSIDL_PROFILE, 0, 0, @Path[0])) then // 获取用户文档目录
begin
UserFolderPath := Path; // 将 Char 数组转换为字符串
UserFolderPath := UserFolderPath + '\Documents'; // 拼接文档目录路径
end;
Reg.RootKey := HKEY_CURRENT_USER; // 指定根键为当前用户
if Reg.OpenKey(RegPath, False) then // 打开注册表项，不创建新项
Result := Reg.ReadString(RegValue); // 读取路径信息
finally
Reg.Free; // 释放注册表对象
end;
end;

// 创建打开文件对话框并设置初始目录为最近打开的目录
OpenDlg := TOpenDialog.Create(Self); // 使用 Self 构建 OpenDlg
OpenDlg.InitialDir := LoadLastPath; // 设置初始目录为最近打开的目录
OpenDlg.Options := [ofForceShowHidden, ofFileMustExist]; // 设置选项：显示隐藏文件，必须选择文件
OpenDlg.Filter := 'Word 文档 (.doc;.docx)|.doc;.docx|所有文件 (.)|.'; // 设置文件类型筛选器

if OpenDlg.Execute then... // 如果用户选择了文件并点击了“打开”按钮，则执行代码块

delphi调用c#编写好的dll

参考1
参考2

 public interface IBase64
    {
        string UnBase64String(string value);
        int ToBase64String(int value);
    }
    [ClassInterface(ClassInterfaceType.None)]
    public class Base64 : IBase64
    {   
        public  string UnBase64String(string value)
        {
            if (value == null || value == "")
            {
                return "";
            }
            byte[] bytes = Convert.FromBase64String(value);
            return Encoding.UTF8.GetString(bytes);
        }

        public  int ToBase64String(int value)
        {
            if (value == null || value == "")
            {
                return "";
            }
            byte[] bytes = Encoding.UTF8.GetBytes(value);
        }
    }

注意：使用regasm命令生成tlb：regasm路径（C:\Windows\Microsoft.NET\Framework64\v4.0.30319） dll路径 /tlb

delphi自定义控件需要将pas或dcu源文件路径添加到library

c#最小化图标

参考

    private void FrmMain_Resize(object sender, EventArgs e)
        {
            if (this.WindowState == FormWindowState.Minimized)
            {
                    Hide();
                    notifyIcon1.Visible = true;
            }
        }

        private void notifyIcon1_MouseDoubleClick(object sender, MouseEventArgs e)
        {
                if (WindowState == FormWindowState.Minimized)
                {
                    Show();
                    WindowState = FormWindowState.Normal;
                    notifyIcon1.Visible = false;
                }
        }

delphi调用外部Api

原生组件，但是需要引入libeay32.dll和ssleay32.dll

var
  I: Integer;
  aRSAData: TRSAData;
  fRSAOpenSSL: TRSAOpenSSL;
  aPathToPublickKey, aPathToPrivateKey: string;
  IdHTTP1: TIdHTTP;
  IdSSLIOHandlerSocketOpenSSL1: TIdSSLIOHandlerSocketOpenSSL;
  Response: string;
  LResponse: IHTTPResponse;
begin
  IdHTTP1 := TIdHTTP.Create(nil);
  IdSSLIOHandlerSocketOpenSSL1 := TIdSSLIOHandlerSocketOpenSSL.Create(nil);

  try
   // IdHTTP1.ProtocolVersion := pv1_1;

    // 设置SSL处理器
    IdSSLIOHandlerSocketOpenSSL1.SSLOptions.Method := sslvTLSv1;
    IdSSLIOHandlerSocketOpenSSL1.SSLOptions.Mode := sslmClient;

    IdHTTP1.HandleRedirects := True;
    IdHTTP1.Request.ContentType := 'application/json'; //设置交互方式为json格式
    IdHTTP1.IOHandler := IdSSLIOHandlerSocketOpenSSL1;
    // 发送请求
    Response := IdHTTP1.Get('https://jsonplaceholder.typicode.com/todos/1');

    // 处理响应
    ShowMessage(Response);
  finally
    IdHTTP1.Free;
    IdSSLIOHandlerSocketOpenSSL1.Free;
  end;
  end;

c#编写系统服务（安装、卸载、启动、停止）

参考

delphi打开系统文件夹方法、获取程序运行文件夹（exe所在文件夹）

delphi：

var
 path: array [0..MaxChar] of char;
    if Succeeded(SHGetFolderPath(0, CSIDL_PROFILE, 0, 0, @Path[0])) then  UserFolderPath := Path;
    //或者以下
   UserFolderPath := GetHomePath;// 'C:\Users\ZBB\AppData\Roaming'
   UserFolderPath :=TPath.GetHomePath; // 'C:\Users\ZBB\AppData\Roaming'
   UserFolderPath :=GetEnvironmentVariable('USERNAME');// 'ZBB'
   UserFolderPath :=GetEnvironmentVariable('USERPROFILE');    // 'C:\Users\ZBB
   //获取程序运行文件夹（exe所在文件夹）
   ExtractFilePath(ParamStr(0))

c#总结打开系统文件夹方法、获取程序运行文件夹获取方法

参考

一、获取当前文件的路径  

1.  System.Diagnostics.Process.GetCurrentProcess().MainModule.FileName  获取模块的完整路径，包括文件名。

2.  System.Environment.CurrentDirectory    获取和设置当前目录(该进程从中启动的目录)的完全限定目录。   

3.  System.IO.Directory.GetCurrentDirectory()    获取应用程序的当前工作目录。这个不一定是程序从中启动的目录啊，有可能程序放在C:\www里,这个函数有可能返回C:\Documents and Settings\ZYB\,或者C:\Program Files\Adobe\,有时不一定返回什么东东，这是任何应用程序最后一次操作过的目录，比如你用Word打开了E:\doc\my.doc这个文件，此时执行这个方法就返回了E:\doc了。   

4. System.AppDomain.CurrentDomain.BaseDirectory    获取程序的基目录。

5. System.AppDomain.CurrentDomain.SetupInformation.ApplicationBase    获取和设置包括该应用程序的目录的名称。   

6. System.Windows.Forms.Application.StartupPath    获取启动了应用程序的可执行文件的路径。效果和2、5一样。只是5返回的字符串后面多了一个"\"而已   

7. System.Windows.Forms.Application.ExecutablePath    获取启动了应用程序的可执行文件的路径及文件名，效果和1一样。   

二、操作环境变量    利用System.Environment.GetEnvironmentVariable()方法可以很方便地取得系统环境变量，如：    System.Environment.GetEnvironmentVariable("windir")就可以取得windows系统目录的路径。   

以下是一些常用的环境变量取值：   

System.Environment.GetEnvironmentVariable("windir");

System.Environment.GetEnvironmentVariable("INCLUDE");   

System.Environment.GetEnvironmentVariable("TMP");   

System.Environment.GetEnvironmentVariable("TEMP");   

System.Environment.GetEnvironmentVariable("Path");   

最后贴出我进行上面操作获得的变量值，事先说明，本人是编写了一个WinForm程序，项目文件存放于D:\Visual Studio Projects\MyApplication\LifeAssistant，编译后的文件位于D:\Visual Studio Projects\MyApplication\LifeAssistant\bin\Debug，最后的结果如下：

1、System.Diagnostics.Process.GetCurrentProcess().MainModule.FileName=D:\Visual Studio Projects\MyApplication\LifeAssistant\bin\Debug\LifeAssistant.exe   

2、System.Environment.CurrentDirectory=D:\Visual Studio Projects\MyApplication\LifeAssistant\bin\Debug   

3、System.IO.Directory.GetCurrentDirectory()=D:\Visual Studio Projects\MyApplication\LifeAssistant\bin\Debug   

1 asp.net webform用"Request.PhysicalApplicationPath获取站点所在虚拟目录的物理路径，最后包含"\"；   

2.c# winform用   

A："Application.StartupPath":获取当前应用程序所在目录的路径，最后不包含"\"；   

B："Application.ExecutablePath ":获取当前应用程序文件的路径，包含文件的名称；   

C："AppDomain.CurrentDomain.BaseDirectory":获取当前应用程序所在目录的路径，最后包含"\"；   

D："System.Threading.Thread.GetDomain().BaseDirectory":获取当前应用程序所在目录的路径，最后包含"\"；   

E："Environment.CurrentDirectory":获取当前应用程序的路径，最后不包含"\"；   

F："System.IO.Directory.GetCurrentDirectory":获取当前应用程序的路径，最后不包含"\"；    3.c# windows service用"AppDomain.CurrentDomain.BaseDirectory"或"System.Threading.Thread.GetDomain().BaseDirectory"；    用"Environment.CurrentDirectory"和"System.IO.Directory.GetCurrentDirectory"将得到" system32"目录的路径；   

如果要使用"Application.StartupPath"或"Application.ExecutablePath "，需要手动添加对"System.Windows.Forms.dll "的引用，并在程序开头用"using System.Windows.Forms"声明该引用；   

4.在卸载程序获取系统安装的目录：   

System.Reflection.Assembly curPath = System.Reflection.Assembly.GetExecutingAssembly();   

string path=curPath.Location;//得到安装程序类SetupLibrary文件的路径，获取这个文件路径所在的目录即得到安装程序的目录;   

4、System.AppDomain.CurrentDomain.BaseDirectory=D:\Visual Studio Projects\MyApplication\LifeAssistant\bin\Debug\   

5、System.AppDomain.CurrentDomain.SetupInformation.ApplicationBase=D:\Visual Studio Projects\MyApplication\LifeAssistant\bin\Debug\   

6、System.Windows.Forms.Application.StartupPath=D:\Visual Studio Projects\MyApplication\LifeAssistant\bin\Debug   

7、System.Windows.Forms.Application.ExecutablePath=D:\Visual Studio Projects\MyApplication\LifeAssistant\bin\Debug\LifeAssistant.exe    System.Environment.GetEnvironmentVariable("windir")=C:\WINDOWS   

System.Environment.GetEnvironmentVariable("INCLUDE")=C:\Program Files\Microsoft Visual Studio .NET 2003\SDK\v1.1\include\   

System.Environment.GetEnvironmentVariable("TMP")=C:\DOCUME~1\zhoufoxcn\LOCALS~1\Temp   

System.Environment.GetEnvironmentVariable("TEMP")=C:\DOCUME~1\zhoufoxcn\LOCALS~1\Temp   

System.Environment.GetEnvironmentVariable("Path")=C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\jdk1.5.0\bin;C:\MySQLServer5.0\bin;C:\Program Files\Symantec\pcAnywhere\;C:\Program Files\Microsoft SQL Server\80\Tools\BINN   

C# 相对路径 系统路径   

//获取启动了应用程序的可执行文件的路径，不包括可执行文件的名称。 

string  str5=Application.StartupPath;    //可获得当前执行的exe的文件名。 

string  str1  =Process.GetCurrentProcess().MainModule.FileName;    //获取和设置当前目录（即该进程从中启动的目录）的完全限定路径。备注  按照定义，如果该进程在本地或网络驱动器的根目录中启动，则此属性的值为驱动器名称后跟一个尾部反斜杠（如"C:\"）。如果该进程在子目录中启动，则此属性的值为不带尾部反斜杠的驱动器和子目录路径（如"C:\mySubDirectory"）。

  string  str2=Environment.CurrentDirectory;    //获取应用程序的当前工作目录。

  string  str3=Directory.GetCurrentDirectory();    //获取基目录，它由程序集冲突解决程序用来探测程序集。  string  str4=AppDomain.CurrentDomain.BaseDirectory;    //获取启动了应用程序的可执行文件的路径，不包括可执行文件的名称。  string  str5=Application.StartupPath;    //获取启动了应用程序的可执行文件的路径，包括可执行文件的名称。 

string  str6=Application.ExecutablePath;    //获取或设置包含该应用程序的目录的名称。    string  str7=AppDomain.CurrentDomain.SetupInformation.ApplicationBase;    //例子    Application.StartupPath;    //可以得到F:\learning\c#Training\win\win\bin\Debug    //注意自己补两个\    Application.StartupPath+"\\3.jpg";

在c#中，相对路径是用"."和".."表示，   "."代表当前目录，    ".."代表上一级录。    例如 假设我用vs2005在D:\My Documents\Visual Studio 2005\Projects目录里创建了一个名叫controls的项目，即在Projects文件夹里有一个controls文件夹，controls文件夹里有三个文件：controls.sln  controls文件夹  GulfOfStLawrence文件夹。    D:\My Documents\Visual Studio 2005\Projects\Controls\Controls\bin\Debug是这个简单项目能够运行的可执行文件Controls.exe    现在我想要 D:\My Documents\Visual Studio 2005\Projects\Controls\GulfOfStLawrence文件夹下的Gulf_of_St._Lawrence.mxd（arcgis desktop）工程文件路径。    那么相对路径应该就是"..\..\..\GulfOfStLawrence\Gulf_of_St._Lawrence.mxd"    即string filename = @"..\..\..\GulfOfStLawrence\Gulf_of_St._Lawrence.mxd";   

心得：

1.用相对路径能增加项目的可移植性。使一个工程在移植过程中变得简单，节省了大量布置与工程相关的文件的时间。（如果设置的是绝对路径）。 

2.使用相对路径也使程序代码变得简单 

3. 但有一点必须注意：（只能在同一个驱动器里（如：都在D:里）使用相对路径）。

c#的字符串前面加@"xxx"和不加的区别

在C#中，使用@符号作为字符串文字的前缀可以创建一个所谓的“逐字字符串”，也称为“原始字符串”。逐字字符串允许你在字符串中使用特殊字符（如反斜杠），而无需对它们进行转义。这是因为逐字字符串会将其中的所有字符视为字面量。

例如，如果你想要创建一个包含反斜杠的字符串，普通字符串需要使用两个反斜杠来表示一个反斜杠：

string myString = "\\";

然而，在逐字字符串中，只需要使用一个反斜杠即可：

string myString = @"\";

需要注意的是，逐字字符串的内容必须放在一对双引号之间，否则编译器会报错。

sqlite3更改字段为非空

-- 将表 table_name 中的非空字段 column_name 修改为可空字段

ALTER TABLE employee ADD COLUMN sex_new integer NULL;
UPDATE employee SET sex_new = sex;
ALTER TABLE employee DROP COLUMN sex;
ALTER TABLE employee RENAME COLUMN sex_new TO sex;

管理windows服务（sc.exe和installutil.exe的区别）

sc.exe 是 Windows 系统中的命令行工具，它可以用于管理 Windows 服务。使用 sc.exe 命令可以创建、删除、启动、停止和修改服务等操作。

以下是 sc.exe 常用命令的示例：

创建服务：sc create ServiceName binPath= "C:\Windows\System32\myservice.exe" start= auto
删除服务：sc delete ServiceName
启动服务：sc start ServiceName
停止服务：sc stop ServiceName
修改服务启动类型为自动启动：sc config ServiceName start= auto
需要注意的是，使用 sc.exe 命令需要以管理员权限运行命令提示符或 PowerShell 终端窗口。

sc.exe 和 InstallUtil.exe 都是 Windows 系统中用于管理服务的命令行工具，但它们在使用和功能上有所不同。

sc.exe 主要用于管理 Windows 服务，它可以创建、删除、启动、停止和修改服务等操作。sc.exe 适用于本地和远程服务的操作，并且不需要安装或配置其他组件。可以通过批处理脚本或其他程序自动化调用 sc.exe 命令行，以实现对服务的管理和控制。
而 InstallUtil.exe 则主要用于安装和卸载 .NET Framework 服务应用程序。InstallUtil.exe 可以将 .NET Framework 服务应用程序将其注册为 Windows 服务，或者从系统中卸载已经存在的服务。InstallUtil.exe 可以支持 .NET Framework 应用程序的安装自定义操作和卸载自定义操作，在安装和卸载时可以执行自定义的初始化代码或清理代码等操作。InstallUtil.exe 通常用于 .NET Framework 服务应用程序的开发和部署。

总的来说，sc.exe 更加通用，支持本地和远程服务的操作，并且可以通过批处理脚本等方式进行自动化处理；而 InstallUtil.exe 则更加专注于安装和卸载 .NET Framework 服务应用程序，并可以执行自定义的操作。

dll文件一起打包到exe

参考

托管dll和非托管dll的区别

托管DLL和非托管DLL是Windows操作系统中常用的两种动态链接库文件类型，它们有以下区别：

开发语言：托管DLL使用托管语言（如C#、VB.NET等）编写，非托管DLL使用非托管语言（如C、C++、汇编等）编写。

内存管理：托管DLL由CLR（Common Language Runtime）控制内存管理，而非托管DLL需要通过显式调用内存分配和释放函数来进行内存管理。

跨平台性：托管DLL可在不同的平台上运行，因为它们使用的是面向CLR的语言，而非托管DLL则需要根据特定的CPU架构编译。

调用约定：托管DLL使用的是“公共语言规范”（Common Language Specification）中定义的调用约定，非托管DLL使用的是标准C调用约定或其他特定平台的调用约定。

安全性：托管DLL受控于CLR，其安全性更高，可以进行.NET代码级别的访问控制。而非托管DLL可以直接访问系统资源和硬件，安全性相对较低。

总之，托管DLL和非托管DLL在开发语言、内存管理、跨平台性、调用约定和安全性等方面存在着一些区别，应根据实际需求进行选择。

c#读取json文件的方法

   //第一种： 需要安装Newtonsoft.Json包
	WebClient updateClt = new WebClient()
	byte[] bJson = updateClt.DownloadData(serverUrl);
	updateJson = System.Text.Encoding.UTF8.GetString(bJson);
	// 自定义实体类对应Json的属性名称
	RemoteVersionInfo info = new RemoteVersionInfo();
	info = JsonConvert.DeserializeObject<RemoteVersionInfo>(updateJson);

    // 第二种：需要安装Microsoft.Extensions.Configuration包
    private IConfiguration _config;    // 配置对象
    // 加载配置文件
    var builder = new ConfigurationBuilder().SetBasePath(AppDomain.CurrentDomain.BaseDirectory).AddJsonFile("backup.json");
                _config = builder.Build();
     // 获取配置项
     _backupDir = _config["BackupDir"];
     _targetDir = _config["TargetDir"];
     _interval = int.Parse(_config["Interval"]);
     _maxFiles = int.Parse(_config["MaxFiles"]);
     _enableCompression = bool.Parse(_config["EnableCompression"]);

ASP和JSP的区别

ASP （Active Server Pages）是微软公司开发的一种服务器端动态网页技术，它通常运行在 Windows 服务器上。这意味着要使用 ASP 技术，需要在 Windows 操作系统上安装 IIS（Internet Information Services）Web 服务器，并使用 ASP 的相关技术和工具进行开发和部署。因此，若想使用 ASP 技术，需要选择 Windows 操作系统作为服务器系统，并将 IIS 安装和配置好，才能部署相应的 ASP 网络应用程序。

ASP 和 JSP 是两种服务器端动态网页技术，它们都可以使 HTML 和其他静态网页内容和动态网页内容结合起来，从而实现丰富、交互性更好的 Web 应用程序。它们的主要区别如下：

语言：ASP 使用 VBScript 或 JScript 进行编程，而 JSP 使用 Java 进行编程。

服务器端：ASP 通常运行在 Windows 服务器上，而 JSP 则可以在任何支持 Java 的服务器上运行。

显示逻辑：JSP 在 HTML 页面中嵌入代码块，HTML 和代码块可以混合在一起，而 ASP 则需要将 HTML 和代码分开处理。

执行过程：JSP 页面第一次被访问时，JSP 引擎将其翻译成 Servlet，并将其编译成字节码并执行。对于每个请求，该 Servlet 就会执行。而 ASP 启动时，会将所有 ASP 程序编译为 COM 组件并加载到内存中，每个请求则调用相应的组件来处理请求。

内置对象：JSP 中的内置对象包括 request、response、session、application 等，而 ASP 中的内置对象包括 request、response、session、server、application 等。

可移植性：由于 JSP 可以跨平台运行，因此具有更高的可移植性；而 ASP 只能运行在 Windows 平台上，因此可移植性相对较差。

Apache部署vue项目

// Apache\conf\httpd.conf
DocumentRoot "D:/wamp64/www"
<Directory "D:/wamp64/www/">
    Options +Indexes +FollowSymLinks +Multiviews
    AllowOverride all
    Require all granted
</Directory>
// Apache\conf\extra\httpd-vhosts.conf
<VirtualHost *:80>
    DocumentRoot "D:\wamp64/www/dist"
    ServerName localhost
    ErrorLog "logs/rsrc-error.log"
    CustomLog "logs/rsrc-access.log" common
</VirtualHost>