zcmrp 
2011/10/09 00:11
你那里还有没有完 美 服 务 端
这是一条隐藏评论/留言。请输入密码查看：
叛逆者
2011/04/19 21:18
有偿找你写个东西 如果愿意 请加Q 40032688 注明delphi网关
万事如意
2011/04/05 12:53
您好!有生意找您合作!请加我QQ:863911012
支持你
菜鸟少将
2009/11/14 15:48
wuxing
2009/08/29 03:44
终于找到一个常德的高手了，加我QQ103113，我也是常德的，多交流啊！
青色咖啡 回复于 2009/09/17 21:05
有机会到联系我吧，我很忙的。
kk.lsc 
2009/06/09 14:34
问下.发布的QQ状态查询器.什么查不出状态来?是不是不支持10位数的号码.显示号码不存在.明明在线登陆了的.
青色咖啡 回复于 2009/06/18 17:55
可能是QQ服务器的问题，这个我也无法解决。
请教
2009/01/10 19:23
你好，想请教有关delphi写程序的问题：
我初学delphi，试着制作一款flash转换软件遇到难题了；我想通过listbox来实现批量转换，应该如何做？
我初学delphi，试着制作一款flash转换软件遇到难题了；我想通过listbox来实现批量转换，应该如何做？
青色咖啡 回复于 2009/01/13 01:26
var
I:Integer;
begin
//首先,用一个枚举函数枚举用户指定目录的所有以 *.swf 结尾的文件,
//生成一个文件列表,保存为文本,如 FileSwf.txt
//格式为 C:\File\FileSwf.Swf
// *:\*.Swf ...
ListBox1.Items.LoadFromFile('FileSwf.txt'); //载入该文本文件
for I:=0 to ListBox1.Items.Count -1 do //枚举所有SWF 格式文件数量
begin
//批量转换 你的转换函数:=ListBox1.Items.Strings[i];
//枚举结束后保存文件列表,
end;
end;
I:Integer;
begin
//首先,用一个枚举函数枚举用户指定目录的所有以 *.swf 结尾的文件,
//生成一个文件列表,保存为文本,如 FileSwf.txt
//格式为 C:\File\FileSwf.Swf
// *:\*.Swf ...
ListBox1.Items.LoadFromFile('FileSwf.txt'); //载入该文本文件
for I:=0 to ListBox1.Items.Count -1 do //枚举所有SWF 格式文件数量
begin
//批量转换 你的转换函数:=ListBox1.Items.Strings[i];
//枚举结束后保存文件列表,
end;
end;
kk.lsc
2008/12/06 11:32
<黑客记事本>软件的作者你好,感谢你的软件,是一个很好的软件,在这我以精神上的支持你们,这个软件在"DOS命令"栏中要是在改进一下就好了,在输完命令时,要想在输命令是要删除已前的命令才能在输入,把她改成"运行"命令完后自动清空已前的命令就好了.还是非常谢谢作者的开发,你们辛苦了,
青色咖啡 回复于 2009/01/13 01:27
谢谢你的支持,我会在下次开发同类软件的时候做的更好.
分页： 1/1 
