随笔分类 -  delphi将汉字转为首字母

摘要：unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs,StrUtils, StdCtrls;type TForm1 = class(TForm) Label1: TLabel; Edit1: TEdit; Label2: TLabel; ... 阅读全文