круговерть с DLL

← →
Arhelon (2002-03-06 14:21) [3]

Пишешь что обоих проэктах (и exe и dll)
uses
Sharemem,
....

и потом свободно передаешь в dll что угодно
типа

function gShow(ds:TDataSet): TForm; stdcall;
var f: TfGrid;
begin
f:=TfGrid.Create(Application);
f.ds:=ds;
f.s.DataSet:=ds;
f.g.Update;
f.Show;
result:=f;
end;

exports gShow;
енто модуль dll
а в модуле exe
function gShow(ds:TDataSet): TForm; stdcall; external "pDll.dll";
и далее
procedure TForm1.bDllClick(Sender: TObject);
begin
f:=gShow(ds);
end;
вот собственно и всё что могет помоч отцу русской демократии

круговерть с DLL Найти похожие ветки