秋水的专栏

Delphi中开发使用多显示器的应用程序

procedure TMainForm.Button1Click( Sender : TObject ); var   str : string;   pStr : PWideChar;   isHZ : Boolean;   i , s, m : Integer;   byteArr : TBytes; begin   str := Trim( EditStr.Text );