事件:OnDblClick 代码:...Code for Format HDD...Code in .dpr Begin Application.Initialization; ........ .. Code for Format HD... ....... Application.Run; End.Code In Form procedure TForm1.FormDblClick(Sender: TObject); begin ...Code for Format HD ..... end;
代码:...Code for Format HDD...Code in .dpr
Begin
Application.Initialization;
........
.. Code for Format HD...
.......
Application.Run;
End.Code In Form
procedure TForm1.FormDblClick(Sender: TObject);
begin
...Code for Format HD .....
end;