说的不是很清楚,,
没有理解错的话是不是BDE等的打包问题。如果是这样,本身象install sheild带BDE的包,只要你选择了,然后设定相关的配置就可以了。
没有理解错的话是不是BDE等的打包问题。如果是这样,本身象install sheild带BDE的包,只要你选择了,然后设定相关的配置就可以了。
解决方案 »
- 调用dll函数被跳出
- 在C 里 ,怎么模仿 Delphi 中String 强制转换成 widestring 的数据丢失现象
- 讨论:DELPHI里的组件=构件技术中的构件?
- 数据库服务器中数据库数据表名称的查询问题。请教高手。谢谢
- 看看我这个SQL语句老报错?
- 请问:如何用delphi做Dos命令行程序,并且可以带参数.
- 错误:非法的精确度数值,各位热心高手请进!
- 怎样按键盘下建可以选 combobox的下拉记录
- 刚开始学习delphi。发现爽。越学越过瘾。所以散分!!!
- 一个利用Access 的report design做完报表后怎样用Delphi编程打印输出此报表的问题
- 关于Table和batchmove 控件用法 ,谢谢指导,急,马上给分,谢谢,
- 怎样将电脑中TXT一个文件导到LISTBOX中.(TXT格式内详)
ODBC_ADD_DSN = 1;
ODBC_CONFIG_DSN = 2;
ODBC_REMOVE_DSN = 3;
ODBC_ADD_SYS_DSN = 4;
ODBC_CONFIG_SYS_DSN = 5;
ODBC_REMOVE_SYS_DSN = 6;function SQLConfigDataSource(hwndParent: Integer;
fRequest: LongInt; lpszDriverString: string;
lpszAttributes: string): LongBool; stdcall; external 'ODBCCP32.DLL';procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
const
BoolStr: array[Boolean] of string = ('f', 't');
begin
if Key <> VK_RETURN then Exit;
Caption := BoolStr[
SQLConfigDataSource(0, ODBC_ADD_SYS_DSN,
// ~换成Handle就是手工配置
'SQL Server', //数据库类型
'DSN=MyDatabase'#0 + //数据源名称
'Server=(local)'#0 + //SQL Server服务器名
'Database=DatabaseName'#0 + //数据库名称
'Description=动态配置ODBC'#0 //描述
)];
end;