function ShowOneView(aHandle:THandle;acaption:Pchar):Pchar;StdCall;
begin
 Application.Handle:=aHandle;
 F_OneView:=TF_OneView.Create(Nil);
 F_OneView.Caption :=aCaption;
 F_OneView.ShowModal;
 Result:=RName_;
 showmessage(String(RName_));
 F_OneView.Free;
//----为什么返回值最后会有其它字符呢?而有些就可以;
比如:'Edit1' ---> 'Edit(' 了 而在窗体里面showmessage(String(RName_));显
示就很正常,