string - 未声明的标识符：Memo1?

Question

可能重复：
未声明的标识符：字符串变量

使用此类错误消息：[Error] Unit1.pas(51): Undeclared identifier: 'Memo1'

你能帮忙吗。

我的代码；

type
 ....
  private

  public

  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}


procedure SaveStringToRegistry_LOCAL_MACHINE( sKey, sItem, sVal : string );
var
  reg : TRegIniFile;
begin
  reg := TRegIniFile.Create('');
  reg.RootKey := HKEY_LOCAL_MACHINE;
  reg.WriteString( sKey, sItem, sVal + #0 );
  reg.Free;
end;



procedure SetTCPIPDNSAddresses(sIPs : String);
begin
  SaveStringToRegistry_LOCAL_MACHINE(
  'SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\' +
    memo1.text, 'NameServer', sIPs);

end;


procedure TForm1.Button3Click(Sender: TObject);
 begin
  Get_AdaptersInfo( memo1.lines );
 end;

procedure TForm1.Button1Click(Sender: TObject);
 begin
 SetTCPIPDNSAddresses(Edit1.text+','+ Edit2.Text);
 end;

end.

我正在寻找一种方法..我该怎么做？我知道少许英文。对不起。如何清除错误？

Answer 1

假设您的表单上有 memo1 。adf 表格 1. 在 settcpipdnsaddresses 过程中的 memo1 引用前面。