0

重複の可能性:
宣言されていない識別子: 文字列変数

そのような使用、エラーメッセージ: [エラー] 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.

方法を探しています..どうやって作るのですか?私は英語を少ししか知りません。ごめん。エラーをクリアするにはどうすればよいですか?

4

1 に答える 1

0

フォームに memo1 があると仮定します。adf フォーム 1。settcpipdnsaddresses プロシージャの memo1 参照の前。

于 2012-06-15T05:29:32.700 に答える