问几个不算大的问题,照样有分哦(100分)

1. 本人接手一个小数据库项目,与以前曾用SQL Server作过的类似，可用户坚持
; ;要用Fox数据库。请问ADO是否支持Fox数据库(效率如何)？
; 在VisualFoxpro(或Access)中是否有存储过程，在Delphi中又如何调用,请给出例子。
; （100-200分）

2. 如何调出Windows中的路径选择对话框。
; ;（参看： Delphi中点击 Projects/Options.../Directories/Conditionals/...）
; ; （50分）

3. 程序中如何获知当前文件夹(目录)的上一层文件夹(目录)，当前文件夹名不一定知道。
; ; ;（50分）

4. 如何将某一路径名称在程序安装时加入到Windows的搜索路径中。编程能实现也行。
; ; ; （50分）

5. DLL的问题： 假设项目文件由三部分组成
; ; UnitMain ;-> 主文件，编译成Exe文件，
; ; UnitA1、UnitA2... -> 编译成DLL1文件，
; ; UnitA1、UnitA2... -> 编译成DLL2文件，
; ;Exe以动态装载的方式调用DLL1、DLL2。

; 问题：Eex、DLL1、DLL2编译时必须都带包编译，Exe才能正确调用两个DLL，否则总是不能
; ; ; ; 正确调用。本希望把Bpl文件都打入文件中减少发布时的麻烦，可因为有了DLL结果却
; ; ; ; 总不能如愿。另外，如果两个DLL是在Delphi不同的版本中编译的则不管是不是带包
; ; ; ; 编译，与Exe版本不同的DLL均无法调用。为什麽？ 怎么办？？？？
; ;那位兄弟碰到过类似问题，又是如何比较满意的解决“DLL的灾难”问题的，请谈谈。
; （200分以上）

〉 3. 程序中如何获知当前文件夹(目录)的上一层文件夹(目录)，当前文件夹名不一定知道。 ; ;
〉 ; （50分）
看：
ShowMessage(ExpandFileName('..'));

2、. 如何调出Windows中的路径选择对话框

var
; dir:string;

SelectDirectory('标题','',dir);

100分就没了

foxpro 没有存储过程

同意楼上

好象vfp中有存储过程，access中只要是update,insert,delete的查询可以用TStoredProc来连接，但只能有一条SQL语句。调用与SQL server无异
得到当前目录好象是GetCurrentDirectory,上一级目录..就是了
加入搜索目录只需改Autoexec.bat的set Path语句就是了。

>>2. 如何调出Windows中的路径选择对话框。
; ;
uses QDialogs;

procedure TForm1.Button1Click(Sender: TObject);
var
; dir:string;
begin
if SelectDirectory('WHO AM I ?','c:/',dir) then
; ;begin
; ; ; Application.MessageBox(PChar('Hello world！！'),'你好',MB_OkCancel+mb_IconInformation);
; ;end;
end;

>〉 3. 程序中如何获知当前文件夹(目录)的上一层文件夹(目录)，当前文件夹名不一定知道。 ; ;
>〉 ; （50分）
>看：
>ShowMessage(ExpandFileName('..'));

procedure TForm1.Button2Click(Sender: TObject);
begin
ListBox1.Items.Add(ExpandFileName(Edit1.Text));
end;
; 得到的是绝对路径！

4.
; ; 修改注册表：
HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Windows/CurrentVersion/Explorer/FindExtensions
即可。

多人接受答案了。