小编Sal*_*dor的帖子

我正在寻找一个Delphi组件直接连接到ORACLE数据库服务器而无需安装oracle客户端.

我从DevArt了解Oracle数据访问(ODAC).还有其他具有此功能的组件吗？

ODAC为Oracle服务器提供两种连接模式:通过客户端模式下的Oracle调用接口连接,以及在直接模式下通过TCP/IP进行直接连接.基于ODAC的数据库应用程序易于部署,不需要安装其他数据提供程序层.

提前致谢.

假设我有一个像这样的单位

unit sample;

interface

function Test1:Integer;
procedure Test2;

implementation

function Test1:Integer;
begin
 result:=0;
end;

procedure Test2;
begin

end;

end.

是否可以sample在运行时枚举设备的所有过程和功能？

我需要在a中存储一个变量值TStringList,到目前为止我试试这个

var
 list : TStringList;
 v   : OleVariant;

  List..AddObject('Item1',v);

要么

  List..AddObject('Item1',TObject(v));

但在这两种情况下代码都不能编译,因为类型转换无效或类型不兼容.

所以问题是,我如何在TStringlist中存储变量值？

实际上我正在一个需要在特定打印机上打印测试页的项目中工作.测试页必须与选项打印机属性 - >打印测试页中打印Windows的页面相同.

我怎么能在delphi中做到这一点？

我在delphi IDE专家工作,现在为了避免依赖性问题,我正在考虑重建这个专家作为dll专家,正如在这些答案中提出的那样,现在我的专家(编译为bpl)访问Screen和Application全局变量(实例) Delphi IDE),所以我想知道如果我编译我的专家作为一个DLL我仍然可以访问这些变量,我也想知道which are the main differences between a bpl delphi expert and a dll delphi expert?

我在Delphi的IDE专家工作,我需要通过枚举在Delphi IDE,显示目前我使用的所有形式的Screen.Forms财产,但如果存在另一种方式来做到这一点使用OTA我想知道.因为Screen.Forms当我的专家是BPL时使用唯一的作品,但现在我正在迁移到dll专家.

如何使用Inno从exe文件或dll获取版本号,我尝试了该GetFileVersion函数,但只能在Inno预处理器中使用(我需要在[Code]我的脚本部分使用此函数).我也尝试了这个GetFileVersionInfo功能,但是Inno没有认出来.

我正在TIdHTTP.Get 线程中使用该过程来下载文件.我的问题是我如何停止(取消)下载文件？

我正在使用TResourceStream类来读取资源,知道我想修改内存中的资源,但上面类的Write方法的文档说:

应用程序不应使用TResourceStream来编写正在运行的应用程序的资源.当应用程序尝试写入应用程序的资源时,Write会覆盖继承的方法以引发EStreamError异常.

由于TResourceStream(WriteBuffer,WriteComponent)的所有其他数据写入方法都调用Write来进行实际写入,因此调用TResourceStream的任何数据写入方法都会引发异常.

问题是,有没有办法使用任何WinApi函数修改正在运行的应用程序中的资源？或者资源是否只读？

我需要使用他的实例和变量的偏移来访问类的严格私有类var值.

到目前为止尝试了这个,检查这个示例类

type
  TFoo=class
   strict private class var Foo: Integer;
   public
   constructor Create;
  end;

constructor TFoo.Create;
begin
  inherited;
  Foo:=666;
end;

//this function works only if I declare the foo var as 
//strict private var Foo: Integer;
function GetFooValue(const AClass: TFoo): Integer;
begin
  Result := PInteger(PByte(AClass) + 4)^
end;

如您所见,函数GetFooValue仅在foo变量未声明为类var时才起作用.

问题是我必须如何修改 GetFooValue才能获得Foo声明时的值strict private class var Foo: Integer;