String 未声明的标识符:Memo1?
可能重复:String 未声明的标识符:Memo1?,string,delphi,String,Delphi,可能重复: 使用此类错误消息:[error]Unit1.pas(51):未声明的标识符:“Memo1” 你能帮忙吗 我的代码 type .... private public end; var Form1: TForm1; implementation {$R *.dfm} procedure SaveStringToRegistry_LOCAL_MACHINE( sKey, sItem, sVal : string ); var reg : TRegIni
使用此类错误消息:[error]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.
我正在寻找一种方法。。
我怎么做?我几乎不懂英语。很抱歉如何清除错误?假设表单上有memo1。adf表格1。在SETTCPIPDNSADRESES程序中的memo1参考前面 问题与中的完全相同
settcpipdnsaddress
不是表单的方法,因此无法访问备忘录。