05 2010 档案

摘要:显示进度框的例子: g_wait.show; g_wait.Update; if s_ctbz=NIL then s_ctbz:=Ts_ctbz.Create(self);s_ctbz.showmodal; 阅读全文
posted @ 2010-05-24 06:43 bingege 阅读(272) 评论(0) 推荐(1)
摘要:procedure TMainForm.InputChange(Sender: TObject);var I: Integer; S, Number: string;begin Output.Text := ''; S := Input.Text; if CheckBox.Checked then begin Number := ''; for I := 1 to Length(S) do beg... 阅读全文
posted @ 2010-05-19 13:30 bingege 阅读(262) 评论(0) 推荐(0)
摘要:摘自万一老师的博客:http://www.cnblogs.com/del/archive/2008/01/01/1022539.html 阅读全文
posted @ 2010-05-02 08:22 bingege 阅读(1074) 评论(0) 推荐(0)