uses filectrl;selectdirectory(...)
解决方案 »
- 如何向其他程序中的toolbar中ToolButton发送点击按钮???
- 使用teamsource时老是弹出报错对话框:
- 如何判断复制到剪贴板的excel或Word表格有几行几列?
- 有没有没有睡的兄弟呀,看看这个是在哪里加载呀:ReadVirtualMemory!在线等。。。。
- 一个小问题,求助!
- 十万火急!!!RichEdit问题?
- 请教一个问题,能给解决者我给200分,但是得有源程序!!!
- 请教,access2000+ado如何解决使用者安装目录与我开发目录不同的问题
- 自动关机,在delphi里面可以做出来么?
- 在Delphi中实现画图
- 如何制作安装程序?
- 高分求解delphi/c++builder问题,谢谢
TOpenDialog控件,用法。
procedure TForm1.Image1Click(Sender: TObject);
var
Path:String;
begin
if OpenDialog1.Execute then
begin
Path:=OpenDialog1.FileName;
Image1.Picture.LoadFromFile(Path);
end;
end;