喜欢折腾的开发，Android Java Python 就是玩儿。

只需要在窗体的创建时，添加如下代码procedure TMainForm.FormCreate(Sender: TObject);begin SetWindowLong(handle, gwl_style, getwindowlong(handle, gwl_style) xor ws_caption); hide; show;end;

1.往Excel中插入图片   用MsExcelWorkSheet.Pictures.Insert(ExtractFilePath(ParamStr(0))+'temp.jpg'); 可以放图片varExcelApp,MyWorkBook,MsExcelWorkSheet,Temple1:Variant;begin   try     ExcelApp:=CreateOle

begin if not FileExists(Edit1.Text) then //if not DirectoryExists(Edit1.Text) then 判断目录是否存在 try begin CreateDir(Edit1.Text); //ForceDirectories(Edit1.Text); 创建目录 end; fin

procedure TMainForm.FormCreate(Sender: TObject);var MyReg : TRegistry; InsDate, LastUseDate, TryDate : TDateTime; Total : PAnsiChar; TotalStr : String;begin MyReg := TRegistry.Create; My

program Project1;uses Forms, Windows, Unit1 in 'Unit1.pas' {Form1};Var hMutex : HWND; Ret : Integer;{$R *.res}begin Application.Initialize; Application.Title := 'test'; hMutex :

// 高精度的延时，精确到Ms , 100ms以内采用，或要求误差极小// 删除Application.ProcessMessages 影响精度procedure DelayMsEx(Ms: LongWord);var iFreq, iStartCounter, iEndCounter: Int64;begin QueryPerformanceFrequency(iFreq);