刚用Delphi,代码运行出错
procedure TForm_Main.Button_startupClick(Sender: TObject);
var
dbvar :string;
begin
dbvar :=edit1.text;
winexec(dbvar,SW_SHOW);
end;end.