所以我在Delphi 2007工作,我正在清理我的代码.我注意到在很多程序中我声明了许多相同类型的不同变量.
例如我现在正在查看的一个程序我声明了4个不同的字符串列表,我必须var1 := TStringList.Create为每个列表输入.
我有想法制作一个程序,它接受一个开放的变量数组,我的4个变量列表,然后创建它们.电话会是这样的
CreateStringLists([var1,var2,var3,var4]);
Run Code Online (Sandbox Code Playgroud)
但据我所知,你不能通过引用传递开放数组,因此不能做我希望的事情.有没有人对此有任何有趣的想法?
delphi delphi-2007 variable-initialization open-array-parameters
我有这个javascript通过ajax请求拉取一些数据该方法返回一部分html,
$('.tooltip_target').click(function(e){
$('.tooltip').remove();
var self = $(this);
$.ajax({
type: "POST",
url: self.attr('href'),
data: "",
success: function(html){
var popup = html
self.parent().parent().parent().append(html).css({
position: "absolute",
top: e.pageY,
left: e.pageX
});
}
});
e.preventDefault();
});
Run Code Online (Sandbox Code Playgroud)
我想要做的是将弹出窗口放在用户点击的绝对位置,但是我正在努力做到正确,有些人可以指导我,下面是我试图附加弹出窗口的HTML.
<div id="wrapper">
<li>
<a href="/jobwall/viewjob/<?php echo $job['employer_id'];?>" class="tooltip_target">
<img src="<?php echo base_url();?>media/images/employers/<?php echo $job['logo_filename'];?>" />
</a>
</li>
</div>
Run Code Online (Sandbox Code Playgroud)
此用户单击该链接,并且应该出现弹出窗口,用户单击该链接,理论上它应该位于链接的顶部,因此它不会干扰页面布局.
make -k我运行时Emacs默认使用该命令compile.但是,我几乎从不认为make在错误之后继续运行是有用的,所以我总是删除-k标志.有没有办法改变我的默认值,.emacs以便它只是make?
我正在尝试在Perl中创建一个简单的递归阶乘函数,它将从命令行中获取一个数字,然后返回它的阶乘,例如
>./factorial.pl 3
>6
Run Code Online (Sandbox Code Playgroud)
我的子程序似乎没有采用命令行参数.但是,如果我在没有子包装器的情况下使用完全相同的代码,它会采用命令行参数,但显然不能用作子例程.以下是代码:
#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;
sub fact() {
my $number = shift or return;
return 0 if $number < 0;
my $results = 1;
while ($number--) { $results *= $number--};
return $results;
}
Run Code Online (Sandbox Code Playgroud) 我正在构建一个使用FB connect的Web应用程序(PHP).我在facebook提供的PHP库的帮助下成功注册/登录用户.我也可以使用此代码发布到墙上
Facebook::$CURL_OPTS[CURLOPT_SSL_VERIFYPEER] = false;
Facebook::$CURL_OPTS[CURLOPT_SSL_VERIFYHOST] = 2;
$facebook = new Facebook(array(
'appId' => $fb_key,
'secret' => $fb_secret,
'cookie' => true, // enable optional cookie support
));
$session = $facebook->getSession();
if ($session)
{
$facebook->api('/me/feed', 'POST', array('message'=>$message, 'link'=>$link['href'], 'name'=>$link['text']));
}
Run Code Online (Sandbox Code Playgroud)
但是,如果我手动转到浏览器的cookie管理器并删除存储FB会话的cookie,则代码不起作用.我唯一拥有的是用户的FB ID,我存储在DB中.即使FB会话丢失,有没有办法发布到用户的墙上?将用户的FB访问令牌存储在DB中以便稍后发布到墙上或访问令牌是否相对短暂是否有意义?
以下是我的应用程序中可能出现的一个示例情况:用户单击fb按钮,授权我的应用程序,重定向回我的网站,我根据FB提供的数据自动创建帐户,同时我存储用户的FB ID以便我可以签名在这个用户以后.现在他浏览网站,输入一些信息,这些信息会发布到他的墙上.到目前为止一切都很好,因为用户的浏览器保存了FB创建的cookie.现在用户离开了站点并联系了站点管理员.管理员打开自己的浏览器,转到管理界面并代表此用户发布内容.现在,拥有该用户的FB ID并假设用户尚未撤销权限,我仍然可以将其发布到他的墙上吗?
我的HomeController中有以下代码:
public ActionResult Edit(int id)
{
var ArticleToEdit = (from m in _db.ArticleSet where m.storyId == id select m).First();
return View(ArticleToEdit);
}
[ValidateInput(false)]
[AcceptVerbs(HttpVerbs.Post)]
public ActionResult Edit(Article ArticleToEdit)
{
var originalArticle = (from m in _db.ArticleSet where m.storyId == ArticleToEdit.storyId select m).First();
if (!ModelState.IsValid)
return View(originalArticle);
_db.ApplyPropertyChanges(originalArticle.EntityKey.EntitySetName, ArticleToEdit);
_db.SaveChanges();
return RedirectToAction("Index");
}
Run Code Online (Sandbox Code Playgroud)
这是Edit方法的视图:
<% using (Html.BeginForm()) {%>
<fieldset>
<legend>Fields</legend>
<p>
<label for="headline">Headline</label>
<%= Html.TextBox("headline") %>
</p>
<p>
<label for="story">Story <span>( HTML Allowed )</span></label>
<%= Html.TextArea("story") %>
</p>
<p>
<label for="image">Image …Run Code Online (Sandbox Code Playgroud) 我有类似的东西
semantic_form_for @whatever, :url => whatever_url
Run Code Online (Sandbox Code Playgroud)
从中生成一个
method="post"
Run Code Online (Sandbox Code Playgroud)
我需要它,我已经尝试过:
semantic_form_for @whatever, :url => whatever_url, :html => {:method => "put"}
Run Code Online (Sandbox Code Playgroud)
和
semantic_form_for @whatever, :url => whatever_url, :html => {:method => :put}
Run Code Online (Sandbox Code Playgroud)
和
semantic_form_for @whatever, :url => whatever_url, :html_args => {:method => :put}
Run Code Online (Sandbox Code Playgroud)
没有效果.有什么想法怎么做?
我们在办公室工作的程序可以通过VBScript文件自动执行,但文件保存的扩展名为*.RVB,然后是*.VBS.我想使用Visual Studio作为我的编辑器/调试器,它正在工作.然而,如果打开*.VBS文件,它就不会像代码那样着色.
在工具 - >选项 - >文件扩展名下,我添加了"RVB"并将其编辑器设置为Microsoft Visual Basic,但它仍未对我的文件应用任何语法高亮显示.我错过了什么?
我有一个通过绑定填充的属性.Color属性设置为Color属性的值
<Rectangle.Fill>
<SolidColorBrush Color="{Binding Path=Color}"/>
</Rectangle.Fill>
Run Code Online (Sandbox Code Playgroud)
我怎样才能将其重构为条件绑定:
<Rectangle.Fill>
<SolidColorBrush Color="{Binding Path=SomeBooleanProperty ? #FF0000 : #00FF00 }"/>
</Rectangle.Fill>
Run Code Online (Sandbox Code Playgroud) 在我的ASP.NET的Web Config文件中,我定义了以下位置元素:
<location path="">
<system.web>
<authorization>
<deny users="?"/>
</authorization>
</system.web>
</location>
<location path="dir1">
<system.web>
<authorization>
<allow users="?"/>
</authorization>
</system.web>
</location>
<location path="dir2">
<system.web>
<authorization>
<allow users="?"/>
</authorization>
</system.web>
</location>
Run Code Online (Sandbox Code Playgroud)
上面的示例指定除了两个目录dir1和dir2之外,所有目录都将被锁定到匿名用户.
我很好奇是否有我可以使用的语法,这将允许我在一个位置元素中定义多个目录.例如,如果我们可以做这样的事情会很方便......
<location path="dir1,dir2,etc">
<system.web>
<authorization>
<allow users="?"/>
</authorization>
</system.web>
</location>
Run Code Online (Sandbox Code Playgroud) ajax ×1
asp.net ×1
asp.net-mvc ×1
css ×1
delphi ×1
delphi-2007 ×1
dot-emacs ×1
emacs ×1
facebook ×1
fbconnect ×1
formtastic ×1
html ×1
jquery ×1
location ×1
oauth ×1
path ×1
perl ×1
php ×1
web-config ×1
wpf ×1