有没有办法比较两个文本文件,并显示差异,如果他们在dunit不相同？
简单的开始是将它们读取到TStringList,但是用于比较两个文本文件的代码要复杂得多,而且DUnitGui中的gui对此不够.
任何的想法？建议？
使用OmniXML包,是否可以将XML代码存储在具有自己的XML数据的另一个XML文件中？
像这样:
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<root>
<data>
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<otherxml>data</otherxml>
</data>
在标签数据里面,一切都应该是数据.是否存在防止解析器将下一个数据解析为XML数据结构的转义字符？
或者OmniXML是否支持这种情况的序列化？
任何其他简单的想法也欢迎.
有谁知道log4d与log4delphi有什么区别？你能推荐一个你用过的并且满意吗？或声称他们是一样的？或者您使用其他可以推荐的"记录器"？
在log4delphi的网站上它说:
Log4D最近更新了他们的CVS 16个月前,该项目从那时起没有最近的活动.它们也没有文件发布,这意味着新用户必须从CVS存储库获取源代码,这是不好的.
Log4D也是Log4J的直接端口,而Log4Delphi松散地基于Log4J,这意味着Log4Delphi不必遵循Log4J的做法,我们可以随时偏离log4j,这是一件好事,考虑到Java之间的众多差异和德尔福.
更新:使用te delphi4d后,可以这样导出到html:
uses log4d;
var
appender:TLogFileAppender;
logger:TLoglogger;
begin
appender := TLogRollingFileAppender.Create('name','log.html');
appender.Layout := TLogHTMLLayout.Create;
TLogBasicConfigurator.Configure(appender);
TLogLogger.GetRootLogger.Level := All;
Logger := TLogLogger.GetLogger('loggerName');
Logger.Fatal('fatal output');
Logger.Error('error output');
Logger.Warn('warn output');
Logger.Info('info output');
Logger.Debug('starting debug');
end;
update2:log4delphi是针对delphi 6或delphi 7发布的.这意味着额外的工作需要升级到以后的delphi.
更新3:log4d与log4j相同,并且拾取和使用非常快.
我正在使用mssql和Delphi 2009.当表单包含连接到布尔字段的dbgrid时,值显示为True,或False.Delphi dbgrid具有翻译能力
f
fa
fal
fals
false
t
tr
tru
true
成为true或false.我想添加值,以便它可以接受其他字符串,并将它们匹配true或false.这些值可以添加到哪里？
我试图在utf-8中发布请求,但是服务器在Ascii中获取它.
尝试了帖子的TstringList格式.
尝试了流格式
尝试强制TStringStream具有UTF8编码.
尝试将indy更新为xe5 indy
这是一个示例代码:
var
server:TIdHttp;
Parameters,response:TStringStream;
begin
response := TStringStream.Create;
Parameters := TStringSTream.create(UTF8String('param1=Value1¶m2=????/???¶m3=Value3'),TEncoding.UTF8);
Server.Post(TIdURI.URLEncode('http://www.example.com/page.php'),Parameters,response);
end;
现在,阿拉伯语编码在网络嗅探器中作为Ascii传递.
0060 d8 b9 d8 b1 d8 a8 d9 8a 2f d8 b9 d8 b1 d8 a8 26 ........ /......&
如何强制Indy Http id在Utf-8中传递请求参数而不在Ascii中传递？
我应该从Delphi 2009升级到delphi XE吗？
由于我不使用所有技术,如移动,云计算,分析,64位,新的数据库驱动程序,我不需要更改为新的XE？
什么会改变我的想法？
新的Delphi IDE是否帮助我编写更少的代码？包管理更好吗？
您觉得IDE提供更多自动化吗？是否值得升级？
使用此代码:
ALTER PROCEDURE [dbo].[get](@i int)
AS
BEGIN
declare @ADate datetime
select @ADate = ADate
from table
where i=@i
and DateDiff(day ,getDate(), aDate ) > 0
and aDate is not null
order by aDate asc
return select @ADAte
END
这将返回0(或系统0日期时间,这不是数据库的预期结果).
执行代码
Declare @res datetime
exec @res = get 3
print @res
为什么？
Delphi中有没有一种方法可以逐行读取流？
有没有办法设置流的编码？
我知道
TEncoding.getEncodingPage(1250);
如何从流中获取它？
让我是整数私人
代码
procedure TForm1.Image1Click(Sender: TObject);
begin
inc(i);
ImageList1.GetIcon(i mod 4,Image1.Picture.Icon);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
i:=0;
ImageList1.GetIcon(i mod 4,Image1.Picture.Icon);
end;
如何从列表中拉伸图标以适合Image1的大小？