今天在工作过程中遇到了DBText（审核时间）换行显示问题，我想了很长时间，做了很多测试工作！由于界面的空间有限，关键是很多级审核，所以要换行显示才是美观的。 举例如下：procedure TForm822201.Query1editdateGetText(Sender: TField;  var Text: String; DisplayText: Boolean);begin 

近来工作过程中，遇到了把把execl导入数据库中的情况，经过认真的琢磨后，终于实现了。 procedure TForm568120.SpeedButton1Click(Sender: TObject);var  __Sql,__S,__SheetID,__Sql1 : string;  __a1,__a2,__a3,__a4,__a5,__a6,__a7,__a8:String;  __a

 近来的ERP系统中再打印调拨单时候，epson lq 680k连续打印出现空白页问题？ 原来用的win98时，就没有出现什么问题？但是现在都是winxp操作系统了，就出现问题了！ 具体情况是：     我先在打印机服务器属性中定义了格式：     格式名称：123     详细数据：宽度：21.5CM 高度：11.5CM     然后把Epson LQ-680 ESC/P 2属性--->设备属性

 var    F: TextFile;    __Str: string;    i,m: integer;begin    AssignFile(F, e:/1.txt);    try        Reset(F);        while not Eof(F) do        begin            Readln(F, __St

delphi软件工程师面试试题集锦。