взять переменную из dll

[Stilet]

Конечно можно )

Вот ДЛЛ:

library Project2;
uses
  SysUtils,
  Classes;

{$R *.res}
   var abc:integer;  // Вот эту переменку оPUBLUCуем

   function abr:integer;
   begin
    result:=abc;
   end;
exports abc,abr; // Вот так
begin
 abc:=20;
end.

А вот проект:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
     function abr:integer; external 'project2.dll';
var   abc:^integer; h:THandle;
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
h:=LoadLibrary('project2.dll');
abc:=GetProcAddress(h,'abc');
caption:=inttostr(abc^)+' ';
abc^:=12;
caption:=caption+inttostr(abr)+' '+inttostr(abc^);
end;

end.

Вопросы ести?

[Roof]

2 Stilet да есть ^ - этот знак что значит?

[Ring0Sn]

Roof, это значит, что abc, в^"домике" и просто так к ней подобраться не получиЦо xD

[Stilet]

Ring0Sn

И к чему эта шутка?

^ - этот знак что значит?

Это указатель, переменная которой я присваиваю Адресс переменки в ДЛЛ, дабы работать по адресу. Ну просто захотелось так. Удобнее так мне.

[Roof]

2 Stilet ясно спасибо большое
2 Ring0Sn я куда угодно доберусь.

[Ring0Sn]

Сообщение от Stilet

И к чему эта шутка?

Что вы какие шутки, всё серьезно xD

Сообщение от Roof

2 Ring0Sn я куда угодно доберусь.

ага...