05 2010 档案
摘要:显示进度框的例子: g_wait.show; g_wait.Update; if s_ctbz=NIL then s_ctbz:=Ts_ctbz.Create(self);s_ctbz.showmodal;
阅读全文
摘要: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...
阅读全文
摘要:摘自万一老师的博客:http://www.cnblogs.com/del/archive/2008/01/01/1022539.html
阅读全文