Как передать (изменить) данные в Edit (любой текст или сумму или отнять) используя .dll. Получаю ошибку при компиляции set.dll в виде: [dcc32 Error] Project1.dpr(8): E2003 Undeclared identifier: 'Edit1'
Проект set.dll:
library Project1;
uses
System.SysUtils, System.Classes, Vcl.Dialogs;
procedure EditPROC; export;
begin
Edit1.Text:='OK';
end;
exports EditPROC;
{$R *.res}
begin
end.
А вот код самой программы VCL:
unit Unit1;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
// подключаем set.dll
procedure EditPROC; external 'set.dll';
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
// Запускаем set.dll и передаем данные из EditPROC в программу
EditPROC;
end;
end.
Где допускаю ошибку ?
Edit1
?