未声明的标识符：Memo1？

Question

  

可能重复：
  Undeclared identifier: String variable

使用此类错误信息：[错误] Unit1.pas（51）：未声明的标识符：'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 form1。在settcpipdnsaddresses过程中的memo1引用前面。