首部functionSameText(constS1,S2:string):Boolean;$[SysUtils.pas功能返回两个字符串是否相等说明不区分大小写参考<NULL>例子CheckBox1.Checked:=SameText(Edit1.Text,Edit2.Text);━━━━━━━━━━━━━━━━━━━━━

voidCGetSelfnameDlg::OnButton1(){ //HANDLEhThread; charszLibPath[_MAX_PATH]; //void*pLibRemote=0; //theaddress(intheremoteprocess)where //szLibPathwillbecopiedto; //DWORDhLibModule=0; //baseadressofloadedmodule

unitUnit1;interfaceuses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms, Dialogs,StdCtrls,ExtCtrls;type TForm1=class(TForm)  Panel1:TPanel;  Edit1:TEdit;  Button1:TButton;  Button2:TButton;