uses filectrl;selectdirectory(...)
解决方案 »
- 关于adoquery
- 100分征极限信息发布器的原理
- 数据库中的数据设置为bit,请问读出来的时候怎么能自动变成是,否?
- 想转Delphi,大家提点建议,给点经验
- 简单问题:怎样得到DirectoryListBox1中选择的路径,马上给分!
- 高手:webbrowser1.offline:=false ,为什么它还能打开不存在的页面?
- 按时查询报错,为什么?
- 大虾请进----------为什么这种字符串处理有问题?如何处理
- 帮帮我! 这是个小问题的!
- RAD Studio XE8中关于Windows API 帮助去哪里了?
- 如何制作安装程序?
- 高分求解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;