delphi顽疾收集
delphi顽疾收集
delphi发布已经十多年了，很多bug 一直未得到修正，看看大家都遇到什么顽疾
1. delphi7开始继承的dbgrid不能删除新加的列，直到delphi2010 还存在 (必然)
2. delphi5开始遇到 增加新的事件驱动程序后把 最后 的 .end 搞乱套,直到delphi2010 还存在 (经常)
观望一下
呵呵，玩的少。还不知道有bug。
（也许是5玩的方向于bug擦肩而过了吧）
Delphi(Pascal) code:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, IniFiles;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
FCacheConfigList: THashedStringlist;
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
t: Cardinal;
i: Integer;
begin
t := GetTickCount;
for i := 0 to 10000 do
FCacheConfigList.Add(IntToStr(i + 1));
FCacheConfigList.Sort;{问题在这里，第一次排序很快，如果再点击一次Button1就排序很耗时，等待大约5分钟以后排序完成，再点击button1就没问题了}
ShowMessage(IntToStr(GetTickCount - t));
ShowMessage(IntToStr(FCacheConfigList.Count));
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
FCacheConfigList := THashedStr
相关问答：
返回的内容是如下代码,怎么能渠道2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......
select * from shuju.DB where 开盘价-收盘价<=0.02
开盘价 与收盘价 是数据库里的字段
select * from aTableName where ((开盘价-收盘价) <=0.02 )
开盘价比收盘价低两分以下的情况
Mark!!!!!!
se ......
我们导师让我们用delphi做一个界面,以前没有学过,感觉有好多控件要学,不是很懂,有谁能够指导指导啊,谢谢!!
打开delphi，在上面找控件，往form上拖就是了，布局设置好就行了
开delphi，把控件栏上的控件拖到窗体� ......
我自学的D7，发现很混乱，特别是访问ACCESS的方法有好多，例如可以用adoconnection控件连接库，还可以用字符串，增删改的方式也好几种，都不知道该用哪种方法了。
哪位能给我点例子：
需要的是显示记录、添加记录� ......
