文件是同一类型元素的有序集合，是内存与外设间传输数据的渠道。一些外设如显示器、键盘、打印机等都可以看作文件，但最常用的还是磁盘文件，这也是我们主要讨论的对象。 De...
数据库结构：包括两张表BaseData和UserRightData，BaseData中是一张基本表，里面不区分用户，UserRightData是用户权限表，结构和BaseData一样，只是多了用户字段，增加用户时，就是从BaseData表中...
delphi只获取文件名（不带扩展名） ExtractFileName(ChangeFileExt(FileName,''));...
listbox删除 删除选中的某个： procedureTForm1.Button1Click(Sender:TObject); vari:integer; begin i:=0; whileilistbox1.Countdo//删除掉前一个后，下一个会上移，所以用while iflistbox1.selected[i]then listbox1.Items.del...
在dbgrid1cellclick事件尾部加入 formname.focuscontrol(webbrowser1); 例如下： procedure form1.dbgrid1cellclick(column: tcolumn) var oldcur:tcursor; begin oldcur := screen.cursor; screen.cursor :=crhourglass; form1.focuscontrol(webb...
uses Math; function DBGridRecordSize(mColumn: TColumn): Boolean; { 返回记录数据网格列显示最大宽度是否成功 } begin Result := False; if not Assigned(mColumn.Field) then Exit; mColumn.Field.Tag := Max(mColumn.Field.Tag, TDBG...
大多数程序设计的爱好者选择并使用Delphi来编写软件，都是被其中丰富而功能强大的VCL控件所吸引。Delphi自带的数据感知(Data-Aware)控件，更是成为开发MIS软件的程序员之首选。在那么多...
DBGrid的CellClick事件，单击当前行记录的那一行时，不发生。 原因：由于单击当前行记录时，DBGrid进入编辑状态。相当于双击了DBGrid。 处理：将DBGrid的Option属性中的dgEditing置为False。...
procedure TForm1.DBGrid2DblClick(Sender: TObject); begin edit3.Text:=DBGrid2.SelectedField.asstring; end;...